(load "basic.scm")
(display (double 1))
(newline)
(display (double 2))
(newline)
(display (powof2 3))
(newline)
(display (powof2 4))
(newline)
(display (sum (cons 3 (cons 4 '()))))
(newline)
(display (applyToList double (cons 5 (cons 6 '()))))
(newline)
(display (applyToList powof2 (cons 7 (cons 8 '()))))
(newline)