Module Costlang.Ty
Runtime type
type _ t = | Unit : unit t| Num : Num.t t| Int : int t| Float : float t| String : string t| Bool : bool t| Arrow : 'a t * 'b t -> ('a -> 'b) t
val arrow : 'a t -> 'b t -> ('a -> 'b) ttype (_, _) eq = | Refl : ('a, 'a) eq
val equal : 'a t -> 'b t -> ('a, 'b) eq option