(progn (quote 5) ((lambda (x) 3) 5) (label ((foo 3)) foo) (cond (false 5) (true 3)) (atom 5) (atom (quote "foo")) (atom (quote (1 2 3))) (atom (quote (1 . 2))) (atom (quote socrates)) (cons (quote foo) (quote bar)) (cons 1 (cons 2 (cons 3 nil))) (car (quote (foo bar))) (cdr (quote (foo bar))) (eq "foo" "bar") (eq "foo" "foo") ((lambda xs (car xs)) 1 2 3) (setq three 3) three (setq fst (lambda (a b) a)) (fst 9 8) (setq a (quote (1 2 3))) (setq b (quote (4 5))) (nconc a b) (macro q (lambda (x) (list (quote quote) (car x)))) (q foo) (quote (1 2 3)) (quasiquote (1 (unquote (+ 2 3)) 4)) `(1 ,(+ 2 3) 4) (+ 1 2 3) (* 2 3 5) (/ 3 5) (// 6 5) (% 6 5) (** 3 4) (atan2 0 -1) true)