12 lines
282 B
OCaml
12 lines
282 B
OCaml
module Make(M : Utils.MonadPlus) : sig
|
|
module Untyped := Untyped.Make(M)
|
|
module Constraint := Constraint.Make(M)
|
|
module Infer := Infer.Make(M)
|
|
|
|
val untyped : Untyped.term
|
|
|
|
val constraint_ : (STLC.term, Infer.err) Constraint.t
|
|
|
|
val typed : depth:int -> STLC.term M.t
|
|
end
|