typed-racket/typed-racket-test/succeed/pair-test.rkt
2014-12-16 10:07:25 -05:00

9 lines
127 B
Racket

#lang typed-scheme
(define: x : (Number . Boolean) (cons 3 #f))
(define: y : Number (car x))
(define: z : Boolean (cdr x))