]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/components/ng_kernel/nCicEnvironment.mli
...
[helm.git] / helm / software / components / ng_kernel / nCicEnvironment.mli
index 029cd94d18818a0c3520f0ce0f2360f6829b56ae..758b44be90b8c62096e32e851ad636eef906fde3 100644 (file)
@@ -29,6 +29,7 @@ val universe_leq: NCic.universe -> NCic.universe -> bool
    true -> strict check (<); false -> loose check (<=)
 *)
 val add_constraint: bool -> NCic.universe -> NCic.universe -> unit
+val sup : NCic.universe -> NCic.universe option
 val pp_constraints: unit -> string
 
 val get_checked_def: