PPT Slide

( defun myfun ( x y )

( * ( + x 2 ) ( + y 3 ) ) )

( defun xor ( conscell )

( not ( equal ( car conscell )

( cdr conscell ) ) ) )

( defun push ( x s )

( cons x s ) )

( defun pop ( s )

( cdr s ) )

( defun exists ( x ) ( not ( null x ) ) )

( defun le ( a b ) ( not ( > a b ) ) )

1.16

Previous slide

Next slide

Back to first slide

View graphic version