Users' Mathboxes Mathbox for Mario Carneiro < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  2goelgoanfmla1 Structured version   Visualization version   GIF version

Theorem 2goelgoanfmla1 35988
Description: Two Godel-sets of membership combined with a Godel-set for NAND is a Godel formula of height 1. (Contributed by AV, 17-Nov-2023.)
Hypothesis
Ref Expression
satfv1fvfmla1.x 𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝐾𝑔𝐿))
Assertion
Ref Expression
2goelgoanfmla1 (((𝐼 ∈ ω ∧ 𝐽 ∈ ω) ∧ (𝐾 ∈ ω ∧ 𝐿 ∈ ω)) → 𝑋 ∈ (Fmla‘1o))

Proof of Theorem 2goelgoanfmla1
Dummy variables 𝑖 𝑗 𝑘 𝑛 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simpll 779 . . . . . 6 (((𝐼 ∈ ω ∧ 𝐽 ∈ ω) ∧ (𝐾 ∈ ω ∧ 𝐿 ∈ ω)) → 𝐼 ∈ ω)
2 simplr 781 . . . . . 6 (((𝐼 ∈ ω ∧ 𝐽 ∈ ω) ∧ (𝐾 ∈ ω ∧ 𝐿 ∈ ω)) → 𝐽 ∈ ω)
3 simprl 783 . . . . . 6 (((𝐼 ∈ ω ∧ 𝐽 ∈ ω) ∧ (𝐾 ∈ ω ∧ 𝐿 ∈ ω)) → 𝐾 ∈ ω)
4 simprr 785 . . . . . . . 8 (((𝐼 ∈ ω ∧ 𝐽 ∈ ω) ∧ (𝐾 ∈ ω ∧ 𝐿 ∈ ω)) → 𝐿 ∈ ω)
5 oveq2 7424 . . . . . . . . . . 11 (𝑛 = 𝐿 → (𝐾𝑔𝑛) = (𝐾𝑔𝐿))
65oveq2d 7432 . . . . . . . . . 10 (𝑛 = 𝐿 → ((𝐼𝑔𝐽)⊼𝑔(𝐾𝑔𝑛)) = ((𝐼𝑔𝐽)⊼𝑔(𝐾𝑔𝐿)))
76eqeq2d 2773 . . . . . . . . 9 (𝑛 = 𝐿 → (𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝐾𝑔𝑛)) ↔ 𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝐾𝑔𝐿))))
87adantl 487 . . . . . . . 8 ((((𝐼 ∈ ω ∧ 𝐽 ∈ ω) ∧ (𝐾 ∈ ω ∧ 𝐿 ∈ ω)) ∧ 𝑛 = 𝐿) → (𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝐾𝑔𝑛)) ↔ 𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝐾𝑔𝐿))))
9 satfv1fvfmla1.x . . . . . . . . 9 𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝐾𝑔𝐿))
109a1i 11 . . . . . . . 8 (((𝐼 ∈ ω ∧ 𝐽 ∈ ω) ∧ (𝐾 ∈ ω ∧ 𝐿 ∈ ω)) → 𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝐾𝑔𝐿)))
114, 8, 10rspcedvd 3581 . . . . . . 7 (((𝐼 ∈ ω ∧ 𝐽 ∈ ω) ∧ (𝐾 ∈ ω ∧ 𝐿 ∈ ω)) → ∃𝑛 ∈ ω 𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝐾𝑔𝑛)))
1211orcd 887 . . . . . 6 (((𝐼 ∈ ω ∧ 𝐽 ∈ ω) ∧ (𝐾 ∈ ω ∧ 𝐿 ∈ ω)) → (∃𝑛 ∈ ω 𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝐾𝑔𝑛)) ∨ 𝑋 = ∀𝑔𝐾(𝐼𝑔𝐽)))
13 oveq1 7423 . . . . . . . . . . 11 (𝑖 = 𝐼 → (𝑖𝑔𝑗) = (𝐼𝑔𝑗))
1413oveq1d 7431 . . . . . . . . . 10 (𝑖 = 𝐼 → ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) = ((𝐼𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)))
1514eqeq2d 2773 . . . . . . . . 9 (𝑖 = 𝐼 → (𝑋 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ↔ 𝑋 = ((𝐼𝑔𝑗)⊼𝑔(𝑘𝑔𝑛))))
1615rexbidv 3188 . . . . . . . 8 (𝑖 = 𝐼 → (∃𝑛 ∈ ω 𝑋 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ↔ ∃𝑛 ∈ ω 𝑋 = ((𝐼𝑔𝑗)⊼𝑔(𝑘𝑔𝑛))))
17 eqidd 2763 . . . . . . . . . 10 (𝑖 = 𝐼𝑘 = 𝑘)
1817, 13goaleq12d 35915 . . . . . . . . 9 (𝑖 = 𝐼 → ∀𝑔𝑘(𝑖𝑔𝑗) = ∀𝑔𝑘(𝐼𝑔𝑗))
1918eqeq2d 2773 . . . . . . . 8 (𝑖 = 𝐼 → (𝑋 = ∀𝑔𝑘(𝑖𝑔𝑗) ↔ 𝑋 = ∀𝑔𝑘(𝐼𝑔𝑗)))
2016, 19orbi12d 932 . . . . . . 7 (𝑖 = 𝐼 → ((∃𝑛 ∈ ω 𝑋 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑋 = ∀𝑔𝑘(𝑖𝑔𝑗)) ↔ (∃𝑛 ∈ ω 𝑋 = ((𝐼𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑋 = ∀𝑔𝑘(𝐼𝑔𝑗))))
21 oveq2 7424 . . . . . . . . . . 11 (𝑗 = 𝐽 → (𝐼𝑔𝑗) = (𝐼𝑔𝐽))
2221oveq1d 7431 . . . . . . . . . 10 (𝑗 = 𝐽 → ((𝐼𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) = ((𝐼𝑔𝐽)⊼𝑔(𝑘𝑔𝑛)))
2322eqeq2d 2773 . . . . . . . . 9 (𝑗 = 𝐽 → (𝑋 = ((𝐼𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ↔ 𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝑘𝑔𝑛))))
2423rexbidv 3188 . . . . . . . 8 (𝑗 = 𝐽 → (∃𝑛 ∈ ω 𝑋 = ((𝐼𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ↔ ∃𝑛 ∈ ω 𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝑘𝑔𝑛))))
25 eqidd 2763 . . . . . . . . . 10 (𝑗 = 𝐽𝑘 = 𝑘)
2625, 21goaleq12d 35915 . . . . . . . . 9 (𝑗 = 𝐽 → ∀𝑔𝑘(𝐼𝑔𝑗) = ∀𝑔𝑘(𝐼𝑔𝐽))
2726eqeq2d 2773 . . . . . . . 8 (𝑗 = 𝐽 → (𝑋 = ∀𝑔𝑘(𝐼𝑔𝑗) ↔ 𝑋 = ∀𝑔𝑘(𝐼𝑔𝐽)))
2824, 27orbi12d 932 . . . . . . 7 (𝑗 = 𝐽 → ((∃𝑛 ∈ ω 𝑋 = ((𝐼𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑋 = ∀𝑔𝑘(𝐼𝑔𝑗)) ↔ (∃𝑛 ∈ ω 𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑋 = ∀𝑔𝑘(𝐼𝑔𝐽))))
29 oveq1 7423 . . . . . . . . . . 11 (𝑘 = 𝐾 → (𝑘𝑔𝑛) = (𝐾𝑔𝑛))
3029oveq2d 7432 . . . . . . . . . 10 (𝑘 = 𝐾 → ((𝐼𝑔𝐽)⊼𝑔(𝑘𝑔𝑛)) = ((𝐼𝑔𝐽)⊼𝑔(𝐾𝑔𝑛)))
3130eqeq2d 2773 . . . . . . . . 9 (𝑘 = 𝐾 → (𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝑘𝑔𝑛)) ↔ 𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝐾𝑔𝑛))))
3231rexbidv 3188 . . . . . . . 8 (𝑘 = 𝐾 → (∃𝑛 ∈ ω 𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝑘𝑔𝑛)) ↔ ∃𝑛 ∈ ω 𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝐾𝑔𝑛))))
33 id 23 . . . . . . . . . 10 (𝑘 = 𝐾𝑘 = 𝐾)
34 eqidd 2763 . . . . . . . . . 10 (𝑘 = 𝐾 → (𝐼𝑔𝐽) = (𝐼𝑔𝐽))
3533, 34goaleq12d 35915 . . . . . . . . 9 (𝑘 = 𝐾 → ∀𝑔𝑘(𝐼𝑔𝐽) = ∀𝑔𝐾(𝐼𝑔𝐽))
3635eqeq2d 2773 . . . . . . . 8 (𝑘 = 𝐾 → (𝑋 = ∀𝑔𝑘(𝐼𝑔𝐽) ↔ 𝑋 = ∀𝑔𝐾(𝐼𝑔𝐽)))
3732, 36orbi12d 932 . . . . . . 7 (𝑘 = 𝐾 → ((∃𝑛 ∈ ω 𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑋 = ∀𝑔𝑘(𝐼𝑔𝐽)) ↔ (∃𝑛 ∈ ω 𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝐾𝑔𝑛)) ∨ 𝑋 = ∀𝑔𝐾(𝐼𝑔𝐽))))
3820, 28, 37rspc3ev 3596 . . . . . 6 (((𝐼 ∈ ω ∧ 𝐽 ∈ ω ∧ 𝐾 ∈ ω) ∧ (∃𝑛 ∈ ω 𝑋 = ((𝐼𝑔𝐽)⊼𝑔(𝐾𝑔𝑛)) ∨ 𝑋 = ∀𝑔𝐾(𝐼𝑔𝐽))) → ∃𝑖 ∈ ω ∃𝑗 ∈ ω ∃𝑘 ∈ ω (∃𝑛 ∈ ω 𝑋 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑋 = ∀𝑔𝑘(𝑖𝑔𝑗)))
391, 2, 3, 12, 38syl31anc 1400 . . . . 5 (((𝐼 ∈ ω ∧ 𝐽 ∈ ω) ∧ (𝐾 ∈ ω ∧ 𝐿 ∈ ω)) → ∃𝑖 ∈ ω ∃𝑗 ∈ ω ∃𝑘 ∈ ω (∃𝑛 ∈ ω 𝑋 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑋 = ∀𝑔𝑘(𝑖𝑔𝑗)))
409ovexi 7450 . . . . . 6 𝑋 ∈ V
41 eqeq1 2766 . . . . . . . . . 10 (𝑥 = 𝑋 → (𝑥 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ↔ 𝑋 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛))))
4241rexbidv 3188 . . . . . . . . 9 (𝑥 = 𝑋 → (∃𝑛 ∈ ω 𝑥 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ↔ ∃𝑛 ∈ ω 𝑋 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛))))
43 eqeq1 2766 . . . . . . . . 9 (𝑥 = 𝑋 → (𝑥 = ∀𝑔𝑘(𝑖𝑔𝑗) ↔ 𝑋 = ∀𝑔𝑘(𝑖𝑔𝑗)))
4442, 43orbi12d 932 . . . . . . . 8 (𝑥 = 𝑋 → ((∃𝑛 ∈ ω 𝑥 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑥 = ∀𝑔𝑘(𝑖𝑔𝑗)) ↔ (∃𝑛 ∈ ω 𝑋 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑋 = ∀𝑔𝑘(𝑖𝑔𝑗))))
4544rexbidv 3188 . . . . . . 7 (𝑥 = 𝑋 → (∃𝑘 ∈ ω (∃𝑛 ∈ ω 𝑥 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑥 = ∀𝑔𝑘(𝑖𝑔𝑗)) ↔ ∃𝑘 ∈ ω (∃𝑛 ∈ ω 𝑋 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑋 = ∀𝑔𝑘(𝑖𝑔𝑗))))
46452rexbidv 3229 . . . . . 6 (𝑥 = 𝑋 → (∃𝑖 ∈ ω ∃𝑗 ∈ ω ∃𝑘 ∈ ω (∃𝑛 ∈ ω 𝑥 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑥 = ∀𝑔𝑘(𝑖𝑔𝑗)) ↔ ∃𝑖 ∈ ω ∃𝑗 ∈ ω ∃𝑘 ∈ ω (∃𝑛 ∈ ω 𝑋 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑋 = ∀𝑔𝑘(𝑖𝑔𝑗))))
4740, 46elab 3636 . . . . 5 (𝑋 ∈ {𝑥 ∣ ∃𝑖 ∈ ω ∃𝑗 ∈ ω ∃𝑘 ∈ ω (∃𝑛 ∈ ω 𝑥 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑥 = ∀𝑔𝑘(𝑖𝑔𝑗))} ↔ ∃𝑖 ∈ ω ∃𝑗 ∈ ω ∃𝑘 ∈ ω (∃𝑛 ∈ ω 𝑋 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑋 = ∀𝑔𝑘(𝑖𝑔𝑗)))
4839, 47sylibr 237 . . . 4 (((𝐼 ∈ ω ∧ 𝐽 ∈ ω) ∧ (𝐾 ∈ ω ∧ 𝐿 ∈ ω)) → 𝑋 ∈ {𝑥 ∣ ∃𝑖 ∈ ω ∃𝑗 ∈ ω ∃𝑘 ∈ ω (∃𝑛 ∈ ω 𝑥 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑥 = ∀𝑔𝑘(𝑖𝑔𝑗))})
4948olcd 888 . . 3 (((𝐼 ∈ ω ∧ 𝐽 ∈ ω) ∧ (𝐾 ∈ ω ∧ 𝐿 ∈ ω)) → (𝑋 ∈ ({∅} × (ω × ω)) ∨ 𝑋 ∈ {𝑥 ∣ ∃𝑖 ∈ ω ∃𝑗 ∈ ω ∃𝑘 ∈ ω (∃𝑛 ∈ ω 𝑥 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑥 = ∀𝑔𝑘(𝑖𝑔𝑗))}))
50 elun 4103 . . 3 (𝑋 ∈ (({∅} × (ω × ω)) ∪ {𝑥 ∣ ∃𝑖 ∈ ω ∃𝑗 ∈ ω ∃𝑘 ∈ ω (∃𝑛 ∈ ω 𝑥 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑥 = ∀𝑔𝑘(𝑖𝑔𝑗))}) ↔ (𝑋 ∈ ({∅} × (ω × ω)) ∨ 𝑋 ∈ {𝑥 ∣ ∃𝑖 ∈ ω ∃𝑗 ∈ ω ∃𝑘 ∈ ω (∃𝑛 ∈ ω 𝑥 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑥 = ∀𝑔𝑘(𝑖𝑔𝑗))}))
5149, 50sylibr 237 . 2 (((𝐼 ∈ ω ∧ 𝐽 ∈ ω) ∧ (𝐾 ∈ ω ∧ 𝐿 ∈ ω)) → 𝑋 ∈ (({∅} × (ω × ω)) ∪ {𝑥 ∣ ∃𝑖 ∈ ω ∃𝑗 ∈ ω ∃𝑘 ∈ ω (∃𝑛 ∈ ω 𝑥 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑥 = ∀𝑔𝑘(𝑖𝑔𝑗))}))
52 fmla1 35951 . 2 (Fmla‘1o) = (({∅} × (ω × ω)) ∪ {𝑥 ∣ ∃𝑖 ∈ ω ∃𝑗 ∈ ω ∃𝑘 ∈ ω (∃𝑛 ∈ ω 𝑥 = ((𝑖𝑔𝑗)⊼𝑔(𝑘𝑔𝑛)) ∨ 𝑥 = ∀𝑔𝑘(𝑖𝑔𝑗))})
5351, 52eleqtrrdi 2873 1 (((𝐼 ∈ ω ∧ 𝐽 ∈ ω) ∧ (𝐾 ∈ ω ∧ 𝐿 ∈ ω)) → 𝑋 ∈ (Fmla‘1o))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 401  wo 861   = wceq 1570  wcel 2145  {cab 2740  wrex 3088  cun 3900  c0 4282  {csn 4587   × cxp 5657  cfv 6537  (class class class)co 7416  ωcom 7865  1oc1o 8451  𝑔cgoe 35897  𝑔cgna 35898  𝑔cgol 35899  Fmlacfmla 35901
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2734  ax-rep 5236  ax-sep 5255  ax-nul 5267  ax-pow 5334  ax-pr 5402  ax-un 7739  ax-inf2 9623
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-nel 3064  df-ral 3079  df-rex 3089  df-reu 3368  df-rab 3415  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4283  df-if 4486  df-pw 4562  df-sn 4588  df-pr 4590  df-op 4594  df-uni 4871  df-iun 4956  df-br 5108  df-opab 5172  df-mpt 5191  df-tr 5217  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-ov 7419  df-oprab 7420  df-mpo 7421  df-om 7866  df-1st 7989  df-2nd 7990  df-frecs 8283  df-wrecs 8314  df-recs 8363  df-rdg 8402  df-1o 8458  df-map 8831  df-goel 35904  df-goal 35906  df-sat 35907  df-fmla 35909
This theorem is used by:  satefvfmla1  35989
  Copyright terms: Public domain W3C validator