### x.scm (contains module m)

(module m (f)
 (import chicken scheme)
 (define (f x) (- x)))



### y.scm (the main application)

(use inclub)
(inclub "x")

(module y (main)
 (import chicken scheme)
 (import m)
 (define (main) (f 1))
 (print (main)))

compile with:

  $ csc y.scm