?store-exponent ( float-parse n expt/f -- float-parse' n/f )


Vocabulary
math.parser.private

Inputs
float-parsean object
nan object
expt/fan object


Outputs
float-parse'an object
n/fan object


Definition


: ?store-exponent
( float-parse n expt/f -- float-parse' n/f )
[ store-exponent ] [ drop f ] if* ; inline