Theorem: MM0.no_meta_var_and_all_free_in_list_map_sub (FOL/MM0/MM0.lean)

State before:
F : Formula
vs : List VarName
σ : Instantiation
τ : MetaInstantiation
h1 : NoMetaVarAndAllFreeInList vs F
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ F)
Tactic:
induction F generalizing vs
State after:
case meta_var_
σ : Instantiation
τ : MetaInstantiation
a✝ : MetaVarName
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (meta_var_ a✝)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (meta_var_ a✝))

case pred_
σ : Instantiation
τ : MetaInstantiation
a✝¹ : PredName
a✝ vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (pred_ a✝¹ a✝)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (pred_ a✝¹ a✝))

case eq_
σ : Instantiation
τ : MetaInstantiation
a✝¹ a✝ : VarName
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (eq_ a✝¹ a✝)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (eq_ a✝¹ a✝))

case true_
σ : Instantiation
τ : MetaInstantiation
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs true_
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ true_)

case not_
σ : Instantiation
τ : MetaInstantiation
a✝ : Formula
a_ih✝ :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs a✝ → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ a✝)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs a✝.not_
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ a✝.not_)

case imp_
σ : Instantiation
τ : MetaInstantiation
a✝¹ a✝ : Formula
a_ih✝¹ :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs a✝¹ → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ a✝¹)
a_ih✝ :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs a✝ → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ a✝)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (a✝¹.imp_ a✝)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (a✝¹.imp_ a✝))

case forall_
σ : Instantiation
τ : MetaInstantiation
a✝¹ : VarName
a✝ : Formula
a_ih✝ :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs a✝ → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ a✝)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (forall_ a✝¹ a✝)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (forall_ a✝¹ a✝))

case def_
σ : Instantiation
τ : MetaInstantiation
a✝¹ : DefName
a✝ vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (def_ a✝¹ a✝)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (def_ a✝¹ a✝))

State before:
σ : Instantiation
τ : MetaInstantiation
X : MetaVarName
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (meta_var_ X)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (meta_var_ X))
Tactic:
case meta_var_ X =>
  unfold NoMetaVarAndAllFreeInList at h1
  contradiction
State after:
no goals

State before:
σ : Instantiation
τ : MetaInstantiation
X : PredName
xs vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (pred_ X xs)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (pred_ X xs))
Tactic:
case pred_ X xs =>
  unfold sub
  unfold NoMetaVarAndAllFreeInList
  exact List.map_subset σ.1 h1
State after:
no goals

State before:
σ : Instantiation
τ : MetaInstantiation
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs true_
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ true_)
Tactic:
case true_ =>
  unfold sub
  unfold NoMetaVarAndAllFreeInList
  simp
State after:
no goals

State before:
σ : Instantiation
τ : MetaInstantiation
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs phi.not_
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi.not_)
Tactic:
case not_ phi phi_ih =>
  unfold NoMetaVarAndAllFreeInList at h1
  unfold sub
  unfold NoMetaVarAndAllFreeInList
  exact phi_ih vs h1
State after:
no goals

State before:
σ : Instantiation
τ : MetaInstantiation
x : VarName
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (forall_ x phi)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (forall_ x phi))
Tactic:
case forall_ x phi phi_ih =>
  unfold NoMetaVarAndAllFreeInList at h1
  unfold sub
  unfold NoMetaVarAndAllFreeInList
  simp only [← List.map_cons]
  exact phi_ih (x :: vs) h1
State after:
no goals

State before:
σ : Instantiation
τ : MetaInstantiation
X : DefName
xs vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (def_ X xs)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (def_ X xs))
Tactic:
case def_ X xs =>
  unfold sub
  unfold NoMetaVarAndAllFreeInList
  exact List.map_subset σ.val h1
State after:
no goals

State before:
σ : Instantiation
τ : MetaInstantiation
X : MetaVarName
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (meta_var_ X)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (meta_var_ X))
Tactic:
unfold NoMetaVarAndAllFreeInList at h1
State after:
σ : Instantiation
τ : MetaInstantiation
X : MetaVarName
vs : List VarName
h1 : False
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (meta_var_ X))

State before:
σ : Instantiation
τ : MetaInstantiation
X : MetaVarName
vs : List VarName
h1 : False
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (meta_var_ X))
Tactic:
contradiction
State after:
no goals

State before:
σ : Instantiation
τ : MetaInstantiation
X : PredName
xs vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (pred_ X xs)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (pred_ X xs))
Tactic:
unfold sub
State after:
σ : Instantiation
τ : MetaInstantiation
X : PredName
xs vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (pred_ X xs)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (pred_ X (List.map (↑σ) xs))

State before:
σ : Instantiation
τ : MetaInstantiation
X : PredName
xs vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (pred_ X xs)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (pred_ X (List.map (↑σ) xs))
Tactic:
unfold NoMetaVarAndAllFreeInList
State after:
σ : Instantiation
τ : MetaInstantiation
X : PredName
xs vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (pred_ X xs)
⊢ List.map (↑σ) xs ⊆ List.map (↑σ) vs

State before:
σ : Instantiation
τ : MetaInstantiation
X : PredName
xs vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (pred_ X xs)
⊢ List.map (↑σ) xs ⊆ List.map (↑σ) vs
Tactic:
exact List.map_subset σ.1 h1
State after:
no goals

State before:
σ : Instantiation
τ : MetaInstantiation
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs true_
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ true_)
Tactic:
unfold sub
State after:
σ : Instantiation
τ : MetaInstantiation
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs true_
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) true_

State before:
σ : Instantiation
τ : MetaInstantiation
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs true_
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) true_
Tactic:
unfold NoMetaVarAndAllFreeInList
State after:
σ : Instantiation
τ : MetaInstantiation
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs true_
⊢ True

State before:
σ : Instantiation
τ : MetaInstantiation
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs true_
⊢ True
Tactic:
simp
State after:
no goals

State before:
σ : Instantiation
τ : MetaInstantiation
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs phi.not_
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi.not_)
Tactic:
unfold NoMetaVarAndAllFreeInList at h1
State after:
σ : Instantiation
τ : MetaInstantiation
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs phi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi.not_)

State before:
σ : Instantiation
τ : MetaInstantiation
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs phi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi.not_)
Tactic:
unfold sub
State after:
σ : Instantiation
τ : MetaInstantiation
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs phi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi).not_

State before:
σ : Instantiation
τ : MetaInstantiation
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs phi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi).not_
Tactic:
unfold NoMetaVarAndAllFreeInList
State after:
σ : Instantiation
τ : MetaInstantiation
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs phi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)

State before:
σ : Instantiation
τ : MetaInstantiation
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs phi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
Tactic:
exact phi_ih vs h1
State after:
no goals

State before:
σ : Instantiation
τ : MetaInstantiation
phi psi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
psi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs psi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (phi.imp_ psi)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (phi.imp_ psi))
Tactic:
unfold NoMetaVarAndAllFreeInList at h1
State after:
σ : Instantiation
τ : MetaInstantiation
phi psi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
psi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs psi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs phi ∧ NoMetaVarAndAllFreeInList vs psi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (phi.imp_ psi))

State before:
σ : Instantiation
τ : MetaInstantiation
phi psi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
psi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs psi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs phi ∧ NoMetaVarAndAllFreeInList vs psi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (phi.imp_ psi))
Tactic:
unfold sub
State after:
σ : Instantiation
τ : MetaInstantiation
phi psi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
psi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs psi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs phi ∧ NoMetaVarAndAllFreeInList vs psi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) ((sub σ τ phi).imp_ (sub σ τ psi))

State before:
σ : Instantiation
τ : MetaInstantiation
phi psi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
psi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs psi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs phi ∧ NoMetaVarAndAllFreeInList vs psi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) ((sub σ τ phi).imp_ (sub σ τ psi))
Tactic:
unfold NoMetaVarAndAllFreeInList
State after:
σ : Instantiation
τ : MetaInstantiation
phi psi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
psi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs psi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs phi ∧ NoMetaVarAndAllFreeInList vs psi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi) ∧
    NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)

State before:
σ : Instantiation
τ : MetaInstantiation
phi psi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
psi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs psi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs phi ∧ NoMetaVarAndAllFreeInList vs psi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi) ∧
    NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)
Tactic:
cases h1
State after:
case intro
σ : Instantiation
τ : MetaInstantiation
phi psi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
psi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs psi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)
vs : List VarName
left✝ : NoMetaVarAndAllFreeInList vs phi
right✝ : NoMetaVarAndAllFreeInList vs psi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi) ∧
    NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)

State before:
σ : Instantiation
τ : MetaInstantiation
phi psi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
psi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs psi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)
vs : List VarName
h1_left : NoMetaVarAndAllFreeInList vs phi
h1_right : NoMetaVarAndAllFreeInList vs psi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi) ∧
    NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)
Tactic:
constructor
State after:
case left
σ : Instantiation
τ : MetaInstantiation
phi psi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
psi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs psi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)
vs : List VarName
h1_left : NoMetaVarAndAllFreeInList vs phi
h1_right : NoMetaVarAndAllFreeInList vs psi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)

case right
σ : Instantiation
τ : MetaInstantiation
phi psi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
psi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs psi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)
vs : List VarName
h1_left : NoMetaVarAndAllFreeInList vs phi
h1_right : NoMetaVarAndAllFreeInList vs psi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)

State before:
case left
σ : Instantiation
τ : MetaInstantiation
phi psi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
psi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs psi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)
vs : List VarName
h1_left : NoMetaVarAndAllFreeInList vs phi
h1_right : NoMetaVarAndAllFreeInList vs psi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
Tactic:
exact phi_ih vs h1_left
State after:
no goals

State before:
case right
σ : Instantiation
τ : MetaInstantiation
phi psi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
psi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs psi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)
vs : List VarName
h1_left : NoMetaVarAndAllFreeInList vs phi
h1_right : NoMetaVarAndAllFreeInList vs psi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ psi)
Tactic:
exact psi_ih vs h1_right
State after:
no goals

State before:
σ : Instantiation
τ : MetaInstantiation
x y : VarName
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (eq_ x y)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (eq_ x y))
Tactic:
unfold NoMetaVarAndAllFreeInList at h1
State after:
σ : Instantiation
τ : MetaInstantiation
x y : VarName
vs : List VarName
h1 : x ∈ vs ∧ y ∈ vs
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (eq_ x y))

State before:
σ : Instantiation
τ : MetaInstantiation
x y : VarName
vs : List VarName
h1 : x ∈ vs ∧ y ∈ vs
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (eq_ x y))
Tactic:
unfold sub
State after:
σ : Instantiation
τ : MetaInstantiation
x y : VarName
vs : List VarName
h1 : x ∈ vs ∧ y ∈ vs
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (eq_ (↑σ x) (↑σ y))

State before:
σ : Instantiation
τ : MetaInstantiation
x y : VarName
vs : List VarName
h1 : x ∈ vs ∧ y ∈ vs
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (eq_ (↑σ x) (↑σ y))
Tactic:
unfold NoMetaVarAndAllFreeInList
State after:
σ : Instantiation
τ : MetaInstantiation
x y : VarName
vs : List VarName
h1 : x ∈ vs ∧ y ∈ vs
⊢ ↑σ x ∈ List.map (↑σ) vs ∧ ↑σ y ∈ List.map (↑σ) vs

State before:
σ : Instantiation
τ : MetaInstantiation
x y : VarName
vs : List VarName
h1 : x ∈ vs ∧ y ∈ vs
⊢ ↑σ x ∈ List.map (↑σ) vs ∧ ↑σ y ∈ List.map (↑σ) vs
Tactic:
cases h1
State after:
case intro
σ : Instantiation
τ : MetaInstantiation
x y : VarName
vs : List VarName
left✝ : x ∈ vs
right✝ : y ∈ vs
⊢ ↑σ x ∈ List.map (↑σ) vs ∧ ↑σ y ∈ List.map (↑σ) vs

State before:
σ : Instantiation
τ : MetaInstantiation
x y : VarName
vs : List VarName
h1_left : x ∈ vs
h1_right : y ∈ vs
⊢ ↑σ x ∈ List.map (↑σ) vs ∧ ↑σ y ∈ List.map (↑σ) vs
Tactic:
constructor
State after:
case left
σ : Instantiation
τ : MetaInstantiation
x y : VarName
vs : List VarName
h1_left : x ∈ vs
h1_right : y ∈ vs
⊢ ↑σ x ∈ List.map (↑σ) vs

case right
σ : Instantiation
τ : MetaInstantiation
x y : VarName
vs : List VarName
h1_left : x ∈ vs
h1_right : y ∈ vs
⊢ ↑σ y ∈ List.map (↑σ) vs

State before:
case left
σ : Instantiation
τ : MetaInstantiation
x y : VarName
vs : List VarName
h1_left : x ∈ vs
h1_right : y ∈ vs
⊢ ↑σ x ∈ List.map (↑σ) vs
Tactic:
exact List.mem_map_of_mem σ.val h1_left
State after:
no goals

State before:
case right
σ : Instantiation
τ : MetaInstantiation
x y : VarName
vs : List VarName
h1_left : x ∈ vs
h1_right : y ∈ vs
⊢ ↑σ y ∈ List.map (↑σ) vs
Tactic:
exact List.mem_map_of_mem σ.val h1_right
State after:
no goals

State before:
σ : Instantiation
τ : MetaInstantiation
x : VarName
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (forall_ x phi)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (forall_ x phi))
Tactic:
unfold NoMetaVarAndAllFreeInList at h1
State after:
σ : Instantiation
τ : MetaInstantiation
x : VarName
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList (x :: vs) phi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (forall_ x phi))

State before:
σ : Instantiation
τ : MetaInstantiation
x : VarName
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList (x :: vs) phi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (forall_ x phi))
Tactic:
unfold sub
State after:
σ : Instantiation
τ : MetaInstantiation
x : VarName
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList (x :: vs) phi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (forall_ (↑σ x) (sub σ τ phi))

State before:
σ : Instantiation
τ : MetaInstantiation
x : VarName
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList (x :: vs) phi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (forall_ (↑σ x) (sub σ τ phi))
Tactic:
unfold NoMetaVarAndAllFreeInList
State after:
σ : Instantiation
τ : MetaInstantiation
x : VarName
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList (x :: vs) phi
⊢ NoMetaVarAndAllFreeInList (↑σ x :: List.map (↑σ) vs) (sub σ τ phi)

State before:
σ : Instantiation
τ : MetaInstantiation
x : VarName
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList (x :: vs) phi
⊢ NoMetaVarAndAllFreeInList (↑σ x :: List.map (↑σ) vs) (sub σ τ phi)
Tactic:
simp only [← List.map_cons]
State after:
σ : Instantiation
τ : MetaInstantiation
x : VarName
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList (x :: vs) phi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) (x :: vs)) (sub σ τ phi)

State before:
σ : Instantiation
τ : MetaInstantiation
x : VarName
phi : Formula
phi_ih :
  ∀ (vs : List VarName), NoMetaVarAndAllFreeInList vs phi → NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ phi)
vs : List VarName
h1 : NoMetaVarAndAllFreeInList (x :: vs) phi
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) (x :: vs)) (sub σ τ phi)
Tactic:
exact phi_ih (x :: vs) h1
State after:
no goals

State before:
σ : Instantiation
τ : MetaInstantiation
X : DefName
xs vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (def_ X xs)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (sub σ τ (def_ X xs))
Tactic:
unfold sub
State after:
σ : Instantiation
τ : MetaInstantiation
X : DefName
xs vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (def_ X xs)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (def_ X (List.map (↑σ) xs))

State before:
σ : Instantiation
τ : MetaInstantiation
X : DefName
xs vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (def_ X xs)
⊢ NoMetaVarAndAllFreeInList (List.map (↑σ) vs) (def_ X (List.map (↑σ) xs))
Tactic:
unfold NoMetaVarAndAllFreeInList
State after:
σ : Instantiation
τ : MetaInstantiation
X : DefName
xs vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (def_ X xs)
⊢ List.map (↑σ) xs ⊆ List.map (↑σ) vs

State before:
σ : Instantiation
τ : MetaInstantiation
X : DefName
xs vs : List VarName
h1 : NoMetaVarAndAllFreeInList vs (def_ X xs)
⊢ List.map (↑σ) xs ⊆ List.map (↑σ) vs
Tactic:
exact List.map_subset σ.val h1
State after:
no goals