#lang scheme/base (require prim-tools) (ex-gen "sc")