constant  ( comp: n -- <name> | exec: -- n )

published: 28 January 2023 / updated 31 January 2023

Lire cette page en français

 

Creation word. Defines a simple precision constant.

Example:

\ definition of constant 
130 constant speed-max 
speed-max .     \ display 130