Require Export FcEtt.ett_ind.
Require Export FcEtt.ett_par. (* FIXME: the axioms about toplevel shouldn't be there *)
Require Export FcEtt.erase_syntax.  (* lc_erase *)
Module fc_dec_aux (wf : fc_wf_sig) (weak : fc_weak_sig) (subst : fc_subst_sig) (unique: fc_unique_sig).
(**** Decision procedures for a few auxiliary relations ****)

Lemma Value_AbsIrrel_inversion : forall A a,
Value (a_Abs Irrel A a)
-> lc_tm A /\ forall x, x `notin` fv_tm a -> CoercedValue (open_tm_wrt_tm a (a_Var_f x)).