* D>S ( d.d -- n ) result is the numeric equivalent of d. If the double number was greater than what could fit into a single cell number, the modulo cellsize will be left since the higher-significant bits are just DROPed
D>S
( d.d -- n )
DROP
double ordinary primitive