syndicate-2017/racket/typed/examples/require:typed/opaque/client.rkt

9 lines
130 B
Racket

#lang typed/syndicate
(require/typed "lib.rkt"
[#:opaque Vec]
[ones : Vec]
[vec+ : (→fn Vec Vec Vec)])
(vec+ ones ones)