(print "------------------------------------------------")
(print "Testing if/elif/else, quote")

(def swap
  (fun (n1 n2 nums) :
    (if (nums == nil)
        then nil
        elif ((car nums) == n1)
        then (cons n2 (swap n1 n2 (cdr nums)))
        elif ((car nums) == n2)
        then (cons n1 (swap n1 n2 (cdr nums)))
        else (cons (car nums) (swap n1 n2 (cdr nums))))))

(with [numbers = (list 1 0 1 0 9 9 1)] :
  (print)
  (print numbers)
  (print "swapping 0 and 1...")
  (print (swap 0 1 numbers)))

(with [letters = '(l o l l i p o p)] :
  (print)
  (print letters)
  (print "swapping o and i...")
  (print (swap 'o 'i letters)))