(module B (say-B)
	(import scheme chicken)
	
	(define say-B (lambda ()
		"B"
	))
)