モジュールシステム (3)

extendによる継承
      (define-module foo
        (export y z)
        (define (x) 3)
        (define (y) (+ (x) (x)))
        (define (z) (+ (y) (y))))
      (define-module bar
        (extend foo)
        (export w)
        (define (w) (+ (z) (z))))
bar内ではfooの全ての束縛が見える
barの利用者に見えるのは
barでexportした束縛
fooでexportした束縛