TEST 1:

1 + 2 * 3

TEST 2:

(1 + 2) * 3

TEST 3:

f()

TEST 4:

function? ()

TEST 5:

f(x)

TEST 6:

f(x,y,z)

TEST 7:

+-~+-~~~false

TEST 8:

 42-------+++++++---+++-+12
 
 
TEST 9:
 
 x:=3;
  y:=4;
  z:=cons?(function?(x * ~y), cons(-arity(x))); 
  t:= rest(null?(true),list?(false),first(null));
 
TEST 10:
 
if l = null then null
else if p(first(l)) then filter(p,rest(l))
else cons(first(l),filter(p,rest(l)))
 
TEST 11:
 
 f:=(g(x,y,z))(null?(true),list?(false),first(null));
 y:=(a,b,c,d);
 z:= if term1 = term2 then noop else rand();