sample scheme

hello, world! here
#!/usr/bin/guile -s
!#
(write "hello, world!")

define function
(define square (lambda (n) (* n n) ) )
(write (square 3) ) ; output 9

link1: The Scheme Programming Language 3/e
link2: Scheme Tutorial