* >= ( a b -- flag ) simulate : >= < 0= ;
>=
( a b -- flag )
simulate : >= < 0= ;
FORTH/BASE core_misc ordinary primitive