S>F
* S>F ( n -- x )

FORTH/BASE floating_misc ordinary primitive