Update ex_1_22.scm