#lang s-exp typed-scheme/minimal (require typed/scheme/base (subtract-in scheme typed/scheme/base scheme/contract)) (provide (all-from-out typed/scheme/base scheme))