8 lines
116 B
Racket
8 lines
116 B
Racket
#lang typed-scheme
|
|
|
|
(: id (All (a) (a -> a)))
|
|
(define (id x) x)
|
|
|
|
(: f (String -> String))
|
|
(define f #{id @ String})
|