dc -e{Fk[d/]sx??sp,lp**p}d2-lp*2+lp*r1=xr