type_of_aux' (to get the type of a term in a given environment and context)

[helm.git] / helm / ocaml / cic_proof_checking / cicTypeChecker.mli

diff --git a/helm/ocaml/cic_proof_checking/cicTypeChecker.mli b/helm/ocaml/cic_proof_checking/cicTypeChecker.mli
index 72dd63c574a46e4902ebb826f5dbcec6fff6d26c..8c0354398e4d375d21eacdf59d9e1940c3818aef 100644 (file)
--- a/helm/ocaml/cic_proof_checking/cicTypeChecker.mli
+++ b/helm/ocaml/cic_proof_checking/cicTypeChecker.mli
@@ -32,3 +32,7 @@ exception NotPositiveOccurrences of string
 exception NotWellFormedTypeOfInductiveConstructor of string
 exception WrongRequiredArgument of string
 val typecheck : UriManager.uri -> unit
+
+(* used only in the toplevel *)
+(* type_of_aux' metasenv context term *)
+val type_of_aux': (int * Cic.term) list -> Cic.term list -> Cic.term -> Cic.term