home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
lifeos2.zip
/
LIFE-1.02
/
TESTS
/
REFOUT
/
PRINT_TE.REF
< prev
next >
Wrap
Text File
|
1996-06-04
|
1KB
|
140 lines
*** Yes
> > > > > > > > []
*** Yes
> > [a,b,c]
*** Yes
> > [a,b|c]
*** Yes
> > [a,b,C: c,d,C]
*** Yes
C = c.
--1>
*** No
> [a,b|L: [c,d,L,e]]
*** Yes
L = [c,d,L,e].
--1>
*** No
> A: [a,b,A]
*** Yes
A = [a,b,A].
--1>
*** No
> A: [a,b|A]
*** Yes
A = [a,b|A].
--1>
*** No
> [[]]
*** Yes
> > A: [A|A]
*** Yes
A = [A|A].
--1>
*** No
> cons(a)
*** Yes
> > cons(2 => b)
*** Yes
> > [a,b|cons(2 => c)]
*** Yes
> > [a,b|cons(c)]
*** Yes
> > [a,b|cons(2 => [])]
*** Yes
> > [a,b|nil(1,2,3)]
*** Yes
> > [a|cons(b,[c],d)]
*** Yes
> > >
*** Yes
> mud(a,mud(b,mud(c,[])))
*** Yes
> > > {}
*** Yes
> > {(a, b, c)}
*** Yes
> > {(a, b)|c}
*** Yes
> > {(a, b, C: c, d, C)}
*** Yes
C = c.
--1>
*** No
> {(a, b)|L: (` {(c, d, L, e)})}
*** Yes
L = ` {(c, d, L, e)}.
--1>
*** No
> A: {(a, b, A)}
*** Yes
A = {(a, b, A)}.
--1>
*** No
> A: {(a, b)|A}
*** Yes
A = {(a, b)|A}.
--1>
*** No
> {{}}
*** Yes
> > A: {A|A}
*** Yes
A = {A|A}.
--1>
*** No
> disj(a)
*** Yes
> > disj(2 => b)
*** Yes
> > {a;b|disj(2 => c)}
*** Yes
> > {a;b|disj(c)}
*** Yes
> > {a;b|disj(2 => {})}
*** Yes
> > {a;b|{}(1,2,3)}
*** Yes
> > {a|disj(b,{c},d)}
*** Yes
> >
*** Yes
A = [c,b,a], X = @.
--1>
*** No
>