!~( x a-addr -- )
@~( a-addr -- x )
+~( n1 n2 -- n3 )
-~( n1 n2 -- n3 )
*~( n1 n2 -- n3 )
/~( n1 n2 -- n3 )
=~( x1 x2 -- flag )
<~( n1 n2 -- flag )
>~( n1 n2 -- flag )
0=~( x -- flag )
0<~( n -- flag )
AND~( x1 x2 -- x3 )
OR~( x1 x2 -- x3 )
XOR~( x1 x2 -- x3 )
INVERT~( x1 -- x2 )
NEGATE~( n1 -- n2 )
ABS~( n -- u )
MAX~( n1 n2 -- n3 )
MIN~( n1 n2 -- n3 )
MOD~( n1 n2 -- n3 )
DROP~( x -- )
DUP~( x -- x x )
SWAP~( x1 x2 -- x2 x1 )
OVER~( x1 x2 -- x1 x2 x1 )
ROT~( x1 x2 x3 -- x2 x3 x1 )
2DUP~( x1 x2 -- x1 x2 x1 x2 )
2DROP~( x1 x2 -- )
2SWAP~( x1 x2 x3 x4 -- x3 x4 x1 x2 )
2OVER~( x1 x2 x3 x4 -- x1 x2 x3 x4 x1 x2 )
?DUP~( x -- 0 | x x )
>R~( x -- ) ( R: -- x )
R>~( -- x ) ( R: x -- )
R@~( -- x ) ( R: x -- x )
DEPTH~( -- +n )
HERE~( -- addr )
ALLOT~( n -- )
CELLS~( n1 -- n2 )
CELL+~( a-addr1 -- a-addr2 )
C@~( c-addr -- char )
C!~( char c-addr -- )
EMIT~( x -- )
KEY~( -- char )
CR~( -- )
SPACE~( -- )
SPACES~( n -- )
.~( n -- )
TYPE~( c-addr u -- )
COUNT~( c-addr1 -- c-addr2 u )
MOVE~( addr1 addr2 u -- )
FILL~( c-addr u char -- )
EXECUTE~( i*x xt -- j*x )