<cl> (scheme-interpreter) ==> 1 1 ==> 2 2 ==> 3 3 ==> (begin 1 2 3) 3 ==> (begin (car '(a b c))) A ==> (car '(a b c)) A ==> ((if (= (+ 1 1) 2) list cons) 'a 'b) (A B)