dc -e[2*]sa?dsx*d1rvlx=a2*r1-r/p