7 lines
101 B
Racket
7 lines
101 B
Racket
#lang typed/racket
|
|
|
|
(define-type F (-> String F String))
|
|
|
|
(: f F)
|
|
(define (f x g) (string-append x))
|