F2*
F2*
F2/
F2*
*
F2*
( x -- x*2 )
EXTENSIONS
fpnostack
ordinary primitive