4$s
*(dsup)>d
<d,#(#(<d))$<dsup.nxt
