mirror of
https://github.com/hsoft/collapseos.git
synced 2024-12-25 04:38:05 +11:00
2d9a07d215
This was becoming heavy to manage.
13 lines
452 B
Plaintext
13 lines
452 B
Plaintext
Logic
|
|
|
|
= n1 n2 -- f Push true if n1 == n2
|
|
< n1 n2 -- f Push true if n1 < n2
|
|
> n1 n2 -- f Push true if n1 > n2
|
|
>< n l h -- f Push true if l < n < h
|
|
=><= n l h -- f Push true if l <= n <= h
|
|
CMP n1 n2 -- n Compare n1 and n2 and set n to -1, 0, or 1.
|
|
n=0: a1=a2. n=1: a1>a2. n=-1: a1<a2.
|
|
MIN a b -- n Returns the lowest of a and b
|
|
MAX a b -- n Returns the highest of a and b
|
|
NOT f -- f Push the logical opposite of f
|