(include "defstruct") (include "loops") (include "matchable") (module main () (import chicken) (import defstruct) (import loops) (import matchable) (import scheme) (defstruct point x y) )