#!/usr/local/bin/gosh
(use srfi-1)
(print
(define (square x) (* 5 5))
(square 5 5)
)