* D2/ ( d1.d1 -- d1.d1' ) the double-cell arithmetic shiftright-by-1 operation ( 2/ )
D2/
( d1.d1 -- d1.d1' )
2/
double ordinary primitive