;;;; run.scm (load "samples-run.scm") (run) (load "loops-run.scm") (run)