begin{@ox=0}; $d=$x-@ox; @ox=$x
