 







structure atom(index:number):sexpr 
          nil:sexpr
          cons(car:sexpr,cdr:sexpr):sexpr.



     
   
