>
DUP DROP SWAP OVER ROT NIP TUCK 2DUP 2DROP 2SWAP 2OVER PICK ROLL DEPTH .S
+ - * / MOD /MOD NEGATE ABS MIN MAX
= <> < > 0= 0< U<
AND OR XOR INVERT LSHIFT RSHIFT
@ ! C@ C! +! HERE ALLOT , C, CELLS CELL+ MOVE FILL
. U. .R U.R EMIT CR SPACE SPACES TYPE ." .S
: ; VARIABLE CONSTANT VALUE CREATE DOES> DEFER IS
IF ELSE THEN DO LOOP +LOOP I J LEAVE BEGIN UNTIL WHILE REPEAT AGAIN