Update 3A.scm