(* lift n t *)
(* lifts [t] of [n] *)
+(* NOTE: the opposite function (delift_rels) is defined in CicMetaSubst *)
+(* since it needs to restrict the metavariables in case of failure *)
val lift : int -> Cic.term -> Cic.term
+
(* lift from n t *)
(* as lift but lifts only indexes >= from *)
val lift_from: int -> int -> Cic.term -> Cic.term
val subst_vars :
Cic.term Cic.explicit_named_substitution -> Cic.term -> Cic.term
-(* TODO CSC rename to subst_meta *)
-
-(* lift_meta [t_1 ; ... ; t_n] t *)
+(* subst_meta [t_1 ; ... ; t_n] t *)
(* returns the term [t] where [Rel i] is substituted with [t_i] *)
(* [t_i] is lifted as usual when it crosses an abstraction *)
-val lift_meta : (Cic.term option) list -> Cic.term -> Cic.term
+val subst_meta : (Cic.term option) list -> Cic.term -> Cic.term