add withdraw.scm .