#lang typed-scheme (require "simple-poly.rkt")