syndicate-2017/racket/typed/examples/roles/provides.rkt

#lang typed/syndicate/roles

(provide a-fun)

(define (a-fun [x : Int] -> Int)
  (+ x 1))

#;(a-fun 5)