#lang scheme/base

(require "c.ss")

(require scheme/unit)

(define-values/invoke-unit/infer both@)