module TypePoly:sig..end
module TI: TermInner
module Builtin: TI.TyBuiltin
typeid =ID.t
type'avar ='a Var.t
type'aprinter =Format.formatter -> 'a -> unit
type 'a view =
| |
Builtin of |
(* |
Builtin type
| *) |
| |
Const of |
|||
| |
Var of |
|||
| |
Meta of |
|||
| |
App of |
|||
| |
Arrow of |
|||
| |
Forall of |
module type S =sig..end
TypePoly.S.is_ty
module Make(T:TI.REPR):sig..end
val default : (module TypePoly.S with type T.t = TI.Default.t)