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

State before:
F : Formula
E : Env
σ : Instantiation
h1 : IsMetaVarOrAllDefInEnv E F
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ F)
Tactic:
induction F
State after:
case meta_var_
E : Env
σ : Instantiation
a✝ : MetaVarName
h1 : IsMetaVarOrAllDefInEnv E (meta_var_ a✝)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (meta_var_ a✝))

case pred_
E : Env
σ : Instantiation
a✝¹ : PredName
a✝ : List VarName
h1 : IsMetaVarOrAllDefInEnv E (pred_ a✝¹ a✝)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (pred_ a✝¹ a✝))

case eq_
E : Env
σ : Instantiation
a✝¹ a✝ : VarName
h1 : IsMetaVarOrAllDefInEnv E (eq_ a✝¹ a✝)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (eq_ a✝¹ a✝))

case true_
E : Env
σ : Instantiation
h1 : IsMetaVarOrAllDefInEnv E true_
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ true_)

case not_
E : Env
σ : Instantiation
a✝ : Formula
a_ih✝ : IsMetaVarOrAllDefInEnv E a✝ → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ a✝)
h1 : IsMetaVarOrAllDefInEnv E a✝.not_
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ a✝.not_)

case imp_
E : Env
σ : Instantiation
a✝¹ a✝ : Formula
a_ih✝¹ : IsMetaVarOrAllDefInEnv E a✝¹ → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ a✝¹)
a_ih✝ : IsMetaVarOrAllDefInEnv E a✝ → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ a✝)
h1 : IsMetaVarOrAllDefInEnv E (a✝¹.imp_ a✝)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (a✝¹.imp_ a✝))

case forall_
E : Env
σ : Instantiation
a✝¹ : VarName
a✝ : Formula
a_ih✝ : IsMetaVarOrAllDefInEnv E a✝ → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ a✝)
h1 : IsMetaVarOrAllDefInEnv E (forall_ a✝¹ a✝)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (forall_ a✝¹ a✝))

case def_
E : Env
σ : Instantiation
a✝¹ : DefName
a✝ : List VarName
h1 : IsMetaVarOrAllDefInEnv E (def_ a✝¹ a✝)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (def_ a✝¹ a✝))

State before:
E : Env
σ : Instantiation
X : MetaVarName
h1 : IsMetaVarOrAllDefInEnv E (meta_var_ X)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (meta_var_ X))
Tactic:
case meta_var_ X =>
  unfold sub
  unfold IsMetaVarOrAllDefInEnv
  simp only
State after:
no goals

State before:
E : Env
σ : Instantiation
X : PredName
xs : List VarName
h1 : IsMetaVarOrAllDefInEnv E (pred_ X xs)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (pred_ X xs))
Tactic:
case pred_ X xs =>
  unfold sub
  unfold IsMetaVarOrAllDefInEnv
  simp only
State after:
no goals

State before:
E : Env
σ : Instantiation
x y : VarName
h1 : IsMetaVarOrAllDefInEnv E (eq_ x y)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (eq_ x y))
Tactic:
case eq_ x y =>
  unfold sub
  unfold IsMetaVarOrAllDefInEnv
  simp only
State after:
no goals

State before:
E : Env
σ : Instantiation
h1 : IsMetaVarOrAllDefInEnv E true_
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ true_)
Tactic:
case true_ =>
  unfold sub
  unfold IsMetaVarOrAllDefInEnv
  simp only
State after:
no goals

State before:
E : Env
σ : Instantiation
phi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
h1 : IsMetaVarOrAllDefInEnv E phi.not_
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi.not_)
Tactic:
case not_ phi phi_ih =>
  unfold IsMetaVarOrAllDefInEnv at h1
  unfold sub
  unfold IsMetaVarOrAllDefInEnv
  exact phi_ih h1
State after:
no goals

State before:
E : Env
σ : Instantiation
x : VarName
phi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
h1 : IsMetaVarOrAllDefInEnv E (forall_ x phi)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (forall_ x phi))
Tactic:
case forall_ x phi phi_ih =>
  unfold IsMetaVarOrAllDefInEnv at h1
  unfold sub
  unfold IsMetaVarOrAllDefInEnv
  exact phi_ih h1
State after:
no goals

State before:
E : Env
σ : Instantiation
X : DefName
xs : List VarName
h1 : IsMetaVarOrAllDefInEnv E (def_ X xs)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (def_ X xs))
Tactic:
case def_ X xs =>
  unfold IsMetaVarOrAllDefInEnv at h1
  unfold sub
  unfold IsMetaVarOrAllDefInEnv
  simp
  exact h1
State after:
no goals

State before:
E : Env
σ : Instantiation
X : MetaVarName
h1 : IsMetaVarOrAllDefInEnv E (meta_var_ X)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (meta_var_ X))
Tactic:
unfold sub
State after:
E : Env
σ : Instantiation
X : MetaVarName
h1 : IsMetaVarOrAllDefInEnv E (meta_var_ X)
⊢ IsMetaVarOrAllDefInEnv E (meta_var_ X)

State before:
E : Env
σ : Instantiation
X : MetaVarName
h1 : IsMetaVarOrAllDefInEnv E (meta_var_ X)
⊢ IsMetaVarOrAllDefInEnv E (meta_var_ X)
Tactic:
unfold IsMetaVarOrAllDefInEnv
State after:
E : Env
σ : Instantiation
X : MetaVarName
h1 : IsMetaVarOrAllDefInEnv E (meta_var_ X)
⊢ True

State before:
E : Env
σ : Instantiation
X : MetaVarName
h1 : IsMetaVarOrAllDefInEnv E (meta_var_ X)
⊢ True
Tactic:
simp only
State after:
no goals

State before:
E : Env
σ : Instantiation
X : PredName
xs : List VarName
h1 : IsMetaVarOrAllDefInEnv E (pred_ X xs)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (pred_ X xs))
Tactic:
unfold sub
State after:
E : Env
σ : Instantiation
X : PredName
xs : List VarName
h1 : IsMetaVarOrAllDefInEnv E (pred_ X xs)
⊢ IsMetaVarOrAllDefInEnv E (pred_ X (List.map (↑σ) xs))

State before:
E : Env
σ : Instantiation
X : PredName
xs : List VarName
h1 : IsMetaVarOrAllDefInEnv E (pred_ X xs)
⊢ IsMetaVarOrAllDefInEnv E (pred_ X (List.map (↑σ) xs))
Tactic:
unfold IsMetaVarOrAllDefInEnv
State after:
E : Env
σ : Instantiation
X : PredName
xs : List VarName
h1 : IsMetaVarOrAllDefInEnv E (pred_ X xs)
⊢ True

State before:
E : Env
σ : Instantiation
X : PredName
xs : List VarName
h1 : IsMetaVarOrAllDefInEnv E (pred_ X xs)
⊢ True
Tactic:
simp only
State after:
no goals

State before:
E : Env
σ : Instantiation
x y : VarName
h1 : IsMetaVarOrAllDefInEnv E (eq_ x y)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (eq_ x y))
Tactic:
unfold sub
State after:
E : Env
σ : Instantiation
x y : VarName
h1 : IsMetaVarOrAllDefInEnv E (eq_ x y)
⊢ IsMetaVarOrAllDefInEnv E (eq_ (↑σ x) (↑σ y))

State before:
E : Env
σ : Instantiation
x y : VarName
h1 : IsMetaVarOrAllDefInEnv E (eq_ x y)
⊢ IsMetaVarOrAllDefInEnv E (eq_ (↑σ x) (↑σ y))
Tactic:
unfold IsMetaVarOrAllDefInEnv
State after:
E : Env
σ : Instantiation
x y : VarName
h1 : IsMetaVarOrAllDefInEnv E (eq_ x y)
⊢ True

State before:
E : Env
σ : Instantiation
x y : VarName
h1 : IsMetaVarOrAllDefInEnv E (eq_ x y)
⊢ True
Tactic:
simp only
State after:
no goals

State before:
E : Env
σ : Instantiation
h1 : IsMetaVarOrAllDefInEnv E true_
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ true_)
Tactic:
unfold sub
State after:
E : Env
σ : Instantiation
h1 : IsMetaVarOrAllDefInEnv E true_
⊢ IsMetaVarOrAllDefInEnv E true_

State before:
E : Env
σ : Instantiation
h1 : IsMetaVarOrAllDefInEnv E true_
⊢ IsMetaVarOrAllDefInEnv E true_
Tactic:
unfold IsMetaVarOrAllDefInEnv
State after:
E : Env
σ : Instantiation
h1 : IsMetaVarOrAllDefInEnv E true_
⊢ True

State before:
E : Env
σ : Instantiation
h1 : IsMetaVarOrAllDefInEnv E true_
⊢ True
Tactic:
simp only
State after:
no goals

State before:
E : Env
σ : Instantiation
phi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
h1 : IsMetaVarOrAllDefInEnv E phi.not_
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi.not_)
Tactic:
unfold IsMetaVarOrAllDefInEnv at h1
State after:
E : Env
σ : Instantiation
phi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
h1 : IsMetaVarOrAllDefInEnv E phi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi.not_)

State before:
E : Env
σ : Instantiation
phi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
h1 : IsMetaVarOrAllDefInEnv E phi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi.not_)
Tactic:
unfold sub
State after:
E : Env
σ : Instantiation
phi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
h1 : IsMetaVarOrAllDefInEnv E phi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi).not_

State before:
E : Env
σ : Instantiation
phi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
h1 : IsMetaVarOrAllDefInEnv E phi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi).not_
Tactic:
unfold IsMetaVarOrAllDefInEnv
State after:
E : Env
σ : Instantiation
phi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
h1 : IsMetaVarOrAllDefInEnv E phi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)

State before:
E : Env
σ : Instantiation
phi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
h1 : IsMetaVarOrAllDefInEnv E phi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
Tactic:
exact phi_ih h1
State after:
no goals

State before:
E : Env
σ : Instantiation
phi psi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
psi_ih : IsMetaVarOrAllDefInEnv E psi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)
h1 : IsMetaVarOrAllDefInEnv E (phi.imp_ psi)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (phi.imp_ psi))
Tactic:
unfold IsMetaVarOrAllDefInEnv at h1
State after:
E : Env
σ : Instantiation
phi psi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
psi_ih : IsMetaVarOrAllDefInEnv E psi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)
h1 : IsMetaVarOrAllDefInEnv E phi ∧ IsMetaVarOrAllDefInEnv E psi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (phi.imp_ psi))

State before:
E : Env
σ : Instantiation
phi psi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
psi_ih : IsMetaVarOrAllDefInEnv E psi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)
h1 : IsMetaVarOrAllDefInEnv E phi ∧ IsMetaVarOrAllDefInEnv E psi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (phi.imp_ psi))
Tactic:
unfold sub
State after:
E : Env
σ : Instantiation
phi psi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
psi_ih : IsMetaVarOrAllDefInEnv E psi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)
h1 : IsMetaVarOrAllDefInEnv E phi ∧ IsMetaVarOrAllDefInEnv E psi
⊢ IsMetaVarOrAllDefInEnv E ((sub σ meta_var_ phi).imp_ (sub σ meta_var_ psi))

State before:
E : Env
σ : Instantiation
phi psi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
psi_ih : IsMetaVarOrAllDefInEnv E psi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)
h1 : IsMetaVarOrAllDefInEnv E phi ∧ IsMetaVarOrAllDefInEnv E psi
⊢ IsMetaVarOrAllDefInEnv E ((sub σ meta_var_ phi).imp_ (sub σ meta_var_ psi))
Tactic:
unfold IsMetaVarOrAllDefInEnv
State after:
E : Env
σ : Instantiation
phi psi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
psi_ih : IsMetaVarOrAllDefInEnv E psi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)
h1 : IsMetaVarOrAllDefInEnv E phi ∧ IsMetaVarOrAllDefInEnv E psi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi) ∧ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)

State before:
E : Env
σ : Instantiation
phi psi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
psi_ih : IsMetaVarOrAllDefInEnv E psi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)
h1 : IsMetaVarOrAllDefInEnv E phi ∧ IsMetaVarOrAllDefInEnv E psi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi) ∧ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)
Tactic:
cases h1
State after:
case intro
E : Env
σ : Instantiation
phi psi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
psi_ih : IsMetaVarOrAllDefInEnv E psi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)
left✝ : IsMetaVarOrAllDefInEnv E phi
right✝ : IsMetaVarOrAllDefInEnv E psi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi) ∧ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)

State before:
E : Env
σ : Instantiation
phi psi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
psi_ih : IsMetaVarOrAllDefInEnv E psi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)
h1_left : IsMetaVarOrAllDefInEnv E phi
h1_right : IsMetaVarOrAllDefInEnv E psi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi) ∧ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)
Tactic:
constructor
State after:
case left
E : Env
σ : Instantiation
phi psi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
psi_ih : IsMetaVarOrAllDefInEnv E psi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)
h1_left : IsMetaVarOrAllDefInEnv E phi
h1_right : IsMetaVarOrAllDefInEnv E psi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)

case right
E : Env
σ : Instantiation
phi psi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
psi_ih : IsMetaVarOrAllDefInEnv E psi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)
h1_left : IsMetaVarOrAllDefInEnv E phi
h1_right : IsMetaVarOrAllDefInEnv E psi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)

State before:
case left
E : Env
σ : Instantiation
phi psi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
psi_ih : IsMetaVarOrAllDefInEnv E psi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)
h1_left : IsMetaVarOrAllDefInEnv E phi
h1_right : IsMetaVarOrAllDefInEnv E psi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
Tactic:
exact phi_ih h1_left
State after:
no goals

State before:
case right
E : Env
σ : Instantiation
phi psi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
psi_ih : IsMetaVarOrAllDefInEnv E psi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)
h1_left : IsMetaVarOrAllDefInEnv E phi
h1_right : IsMetaVarOrAllDefInEnv E psi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ psi)
Tactic:
exact psi_ih h1_right
State after:
no goals

State before:
E : Env
σ : Instantiation
x : VarName
phi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
h1 : IsMetaVarOrAllDefInEnv E (forall_ x phi)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (forall_ x phi))
Tactic:
unfold IsMetaVarOrAllDefInEnv at h1
State after:
E : Env
σ : Instantiation
x : VarName
phi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
h1 : IsMetaVarOrAllDefInEnv E phi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (forall_ x phi))

State before:
E : Env
σ : Instantiation
x : VarName
phi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
h1 : IsMetaVarOrAllDefInEnv E phi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (forall_ x phi))
Tactic:
unfold sub
State after:
E : Env
σ : Instantiation
x : VarName
phi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
h1 : IsMetaVarOrAllDefInEnv E phi
⊢ IsMetaVarOrAllDefInEnv E (forall_ (↑σ x) (sub σ meta_var_ phi))

State before:
E : Env
σ : Instantiation
x : VarName
phi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
h1 : IsMetaVarOrAllDefInEnv E phi
⊢ IsMetaVarOrAllDefInEnv E (forall_ (↑σ x) (sub σ meta_var_ phi))
Tactic:
unfold IsMetaVarOrAllDefInEnv
State after:
E : Env
σ : Instantiation
x : VarName
phi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
h1 : IsMetaVarOrAllDefInEnv E phi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)

State before:
E : Env
σ : Instantiation
x : VarName
phi : Formula
phi_ih : IsMetaVarOrAllDefInEnv E phi → IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
h1 : IsMetaVarOrAllDefInEnv E phi
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ phi)
Tactic:
exact phi_ih h1
State after:
no goals

State before:
E : Env
σ : Instantiation
X : DefName
xs : List VarName
h1 : IsMetaVarOrAllDefInEnv E (def_ X xs)
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (def_ X xs))
Tactic:
unfold IsMetaVarOrAllDefInEnv at h1
State after:
E : Env
σ : Instantiation
X : DefName
xs : List VarName
h1 : ∃ d ∈ E, X = d.name ∧ xs.length = d.args.length
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (def_ X xs))

State before:
E : Env
σ : Instantiation
X : DefName
xs : List VarName
h1 : ∃ d ∈ E, X = d.name ∧ xs.length = d.args.length
⊢ IsMetaVarOrAllDefInEnv E (sub σ meta_var_ (def_ X xs))
Tactic:
unfold sub
State after:
E : Env
σ : Instantiation
X : DefName
xs : List VarName
h1 : ∃ d ∈ E, X = d.name ∧ xs.length = d.args.length
⊢ IsMetaVarOrAllDefInEnv E (def_ X (List.map (↑σ) xs))

State before:
E : Env
σ : Instantiation
X : DefName
xs : List VarName
h1 : ∃ d ∈ E, X = d.name ∧ xs.length = d.args.length
⊢ IsMetaVarOrAllDefInEnv E (def_ X (List.map (↑σ) xs))
Tactic:
unfold IsMetaVarOrAllDefInEnv
State after:
E : Env
σ : Instantiation
X : DefName
xs : List VarName
h1 : ∃ d ∈ E, X = d.name ∧ xs.length = d.args.length
⊢ ∃ d ∈ E, X = d.name ∧ (List.map (↑σ) xs).length = d.args.length

State before:
E : Env
σ : Instantiation
X : DefName
xs : List VarName
h1 : ∃ d ∈ E, X = d.name ∧ xs.length = d.args.length
⊢ ∃ d ∈ E, X = d.name ∧ (List.map (↑σ) xs).length = d.args.length
Tactic:
simp
State after:
E : Env
σ : Instantiation
X : DefName
xs : List VarName
h1 : ∃ d ∈ E, X = d.name ∧ xs.length = d.args.length
⊢ ∃ d ∈ E, X = d.name ∧ xs.length = d.args.length

State before:
E : Env
σ : Instantiation
X : DefName
xs : List VarName
h1 : ∃ d ∈ E, X = d.name ∧ xs.length = d.args.length
⊢ ∃ d ∈ E, X = d.name ∧ xs.length = d.args.length
Tactic:
exact h1
State after:
no goals