dc -e'Fk[sa1]sx[d2-lp*2+lp*r2>x]sy??splyxrlyx*lp*p'