add 69.scm
two implementation of srfi 17