compile with:

  $ csc y.scm