(print (quote Hallo) (quote ik) (quote ben) (quote een) (quote string) (quote !)) (print 'Hallo 'wereld, 'dit 'is 'een 'testprogramma 'in 'Martins 'eigen 'Lisp-dialectje..) (print '(Zonder die gekke quootjes werkt het trouwens ook best, want een onbekende string wordt default gewoon getoond)) (print (quote (5 6 7))) (print (/ (+ (* 3 3 3 3) 1 1 1) 2)) (print (= (+ 3 4) (- 10 3))) (print (eq 'bla 'bla)) (print (= (+ 3 4) (- 10 6))) (print (eq (quote bla) (quote boe))) (define (f x) (+ x 3)) (print (f 8)) (if (= 3 4) (print Ja!) (print Nee!)) (define (fac n) (if (= n 1) 1 (* n (fac (- n 1))))) (print Faculteit van 10: (fac 10)) (print (+ (bigint 10000000000000000000000000000000000000000000) 2 3)) (print Faculteit van 1000: (fac (bigint 1000)))