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

5 lines
118 B
Racket

#lang typed/scheme
(: lon? (Any -> Boolean : (Listof Number)))
(define (lon? x)
(and (list? x) (andmap number? x)))