FLIT
[] no special info, see general notes
FORTH/BASE floating_misc ordinary primitive
F0
FORTH/BASE floating_misc threadstate variable
FLOAT-INPUT
* FP@ ( -- addr ) returns the floating point stack pointer
FP@
( -- addr )
* FP! ( addr -- ) sets the floating point stack pointer - this is the inverse of FP@
FP!
( addr -- )
F=
F<>
F>
F<=
F>=
/* more useful nonstandard words */
* S>F ( n -- x )
S>F
( n -- x )
* FTRUNC>S ( x -- n )
FTRUNC>S
( x -- n )
* FROUND>S ( x -- n )
FROUND>S
F>S
FORTH/BASE floating_misc forthword synonym
* FTRUNC ( x -- x' )
FTRUNC
( x -- x' )
* -FROT ( x1 x2 x3 -- x3 x1 x2 )
-FROT
( x1 x2 x3 -- x3 x1 x2 )
F-ROT
* FNIP ( x1 x2 -- x2 )
FNIP
( x1 x2 -- x2 )
* FTUCK ( x1 x2 -- x2 x1 x2 )
FTUCK
( x1 x2 -- x2 x1 x2 )
* 1/F ( x -- 1/x )
1/F
( x -- 1/x )
* F^2 ( x -- x^2 )
F^2
( x -- x^2 )
* F^N ( x u -- x^u ) For large exponents, use F** instead. Of course u=-1 is large.
F^N
( x u -- x^u )
* F2/ ( x -- x/2 )
F2/
( x -- x/2 )
* F2* ( x -- x*2 )
F2*
( x -- x*2 )
* F0> (f: x -- s: flag )
F0>
(f: x -- s: flag )
F0<>