7 lines
138 B
Racket
7 lines
138 B
Racket
#lang typed-scheme
|
|
|
|
(let: ((x : Any 3)) (if (number? x) (add1 x) 12))
|
|
(let: ((v : (Un Number Boolean) #f)) (if (boolean? v) 5 (+ v 1)))
|
|
|
|
|