define nil ((0))
define (pair (?x) (?y)) ((?x ?y))
define (first (?x ?y)) (?x)
define (second (?x ?y)) (?y)
define (quote ?x) (quote ?x)
define test (first pair (A) (pair (B) (pair (C) nil)))