modify 2.40.scm