1 exception Impossible of int
2 exception NotWellTyped of string
3 exception WrongUriToConstant of string
4 exception WrongUriToVariable of string
5 exception WrongUriToMutualInductiveDefinitions of string
7 exception RelToHiddenHypothesis
9 type types = {synthesized : Cic.term ; expected : Cic.term option};;
14 val find : 'a t -> Cic.term -> 'a
19 Cic.metasenv -> Cic.context -> Cic.term -> Cic.term option -> types CicHash.t
21 (** Auxiliary functions **)
23 (* does_not_occur n te *)
24 (* returns [true] if [Rel n] does not occur in [te] *)
25 val does_not_occur : int -> Cic.term -> bool