home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
lifeos2.zip
/
LIFE-1.02
/
TESTS
/
IN
/
BOOLPRED.IN
< prev
next >
Wrap
Text File
|
1996-06-04
|
223b
|
30 lines
p(a).
X,X=p(A)?
.
X=p(A),X?
.
f(X:int) -> write(boo,X).
f(44)?
f(X)?
X=44?
.
Y=f(X),Y?
X=44?
.
X=44,Y=f(X),Y?
.
X=44,Y,Y=f(X)?
.
Y,X=44,Y=f(X)?
.
Y,Y=f(X),X=44?
.
Y=f(X),Y,X=44?
.
Y=f(X),X=44,Y?
.
f(X),X=44?
.
X=44,f(X)?
.