] option list *
(Cic.context * Cic.term) list
-(** locate_in_term what where
+(** locate_in_conjecture what where
* [what] must be a physical pointer to a subterm of [where]
* It returns the context of [what] in [where] *)
-val locate_in_term: Cic.term -> where:Cic.term -> Cic.context
+val locate_in_conjecture: Cic.term -> Cic.conjecture -> Cic.context
(* saturate_term newmeta metasenv context ty *)
(* Given a type [ty] (a backbone), it returns its head and a new metasenv in *)