modified:   euler-2.scm