(load "util.scm") (display "\nex-4.1\n")