>FLOAT
[] no special info, see general notes
EXTENSIONS fpnostack ordinary primitive
D>F
F!
F*
F+
F-
F/
F0<
F0=
F<
F>
F=
F<>
F<=
F>=
F>D
F@
FALIGN
FALIGNED
FCONSTANT
EXTENSIONS fpnostack defining primitive
FDEPTH
FDROP
FDUP
FLITERAL
EXTENSIONS fpnostack compiling primitive
FLOAT+
FLOATS
FLOOR
FMAX
FMIN
FNEGATE
FOVER
FROT
FROUND
FSWAP
FVARIABLE
REPRESENT
/* floating point extension words */
DF!
DF@
DFALIGN
DFALIGNED
DFLOAT+
DFLOATS
F**
F.
FABS
FACOS
FACOSH
FALOG
FASIN
FASINH
FATAN
FATAN2
FATANH
FCOS
FCOSH
FE.
FEXP
FEXPM1
FLN
FLNP1
FLOG
FS.
FSIN
FSINCOS
FSINH
FSQRT
FTAN
FTANH
F~
PRECISION
EXTENSIONS fpnostack loader code P4_DVaL
SET-PRECISION
SF!
SF@
SFALIGN
/* alias cell-aligned */
SFALIGNED
SFLOAT+
SFLOATS
/* 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
EXTENSIONS fpnostack 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<>
ENVIRONMENT FLOATING
ENVIRONMENT fpnostack ordinary constant
ENVIRONMENT FPNOSTACK-EXT
ENVIRONMENT MAX-FLOAT
ENVIRONMENT fpnostack ordinary primitive
ENVIRONMENT FPNOSTACK-LOADED
ENVIRONMENT fpnostack constructor primitive
# if ! DOUBLE_ALIGNED
ENVIRONMENT CELL-FALIGNED
# endif