Module erase (wf : fc_wf_sig) (weak : fc_weak_sig) (subst : fc_subst_sig)
(e_invert : ext_invert_sig).
Include e_invert.
Module e_red := ext_red e_invert.
Module invert := fc_invert wf weak subst.
Module unique := fc_unique wf subst.
Set Implicit Arguments.
Set Bullet Behavior "Strict Subproofs".

(* Specifications: *)
Lemma Path_erase : forall T a, Path T a -> Path T (erase a).
Hint Constructors Typing PropWff Iso DefEq Ctx.