* http://cs.unibo.it/helm/.
*)
-(* mk_fresh_name context name typ *)
+(* mk_fresh_name metasenv context name typ *)
(* returns an identifier which is fresh in the context *)
(* and that resembles [name] as much as possible. *)
(* [typ] will be the type of the variable *)
-val mk_fresh_name : Cic.context -> Cic.name -> typ:Cic.term -> Cic.name
+val mk_fresh_name :
+ Cic.metasenv -> Cic.context -> Cic.name -> typ:Cic.term -> Cic.name