append = (x, y) => nil(x) ? y : cons(car(x), append(cdr(x), y))

assertEqual(append(list('A', 'B'), list('C', 'D', 'E')),
            list('A', 'B', 'C', 'D', 'E'))
