(load "test1.scm")
(load "test2.scm")