Theorem goalrlem 32643

Description: Lemma for goalr 32644 (induction step). (Contributed by AV, 22-Oct-2023.)

Assertion

Ref	Expression
goalrlem	⊢ (𝑁 ∈ ω → ((∀𝑔𝑖𝑎 ∈ (Fmla‘suc 𝑁) → 𝑎 ∈ (Fmla‘suc 𝑁)) → (∀𝑔𝑖𝑎 ∈ (Fmla‘suc suc 𝑁) → 𝑎 ∈ (Fmla‘suc suc 𝑁))))

Distinct variable groups:   𝑖,𝑁   𝑖,𝑎

Allowed substitution hint:   𝑁(𝑎)

Proof of Theorem goalrlem

Dummy variables 𝑗 𝑢 𝑣 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		peano2 7602	. . . . 5 ⊢ (𝑁 ∈ ω → suc 𝑁 ∈ ω)
2		df-goal 32589	. . . . . 6 ⊢ ∀𝑔𝑖𝑎 = ⟨2o, ⟨𝑖, 𝑎⟩⟩
3		opex 5356	. . . . . 6 ⊢ ⟨2o, ⟨𝑖, 𝑎⟩⟩ ∈ V
4	2, 3	eqeltri 2909	. . . . 5 ⊢ ∀𝑔𝑖𝑎 ∈ V
5		isfmlasuc 32635	. . . . 5 ⊢ ((suc 𝑁 ∈ ω ∧ ∀𝑔𝑖𝑎 ∈ V) → (∀𝑔𝑖𝑎 ∈ (Fmla‘suc suc 𝑁) ↔ (∀𝑔𝑖𝑎 ∈ (Fmla‘suc 𝑁) ∨ ∃𝑢 ∈ (Fmla‘suc 𝑁)(∃𝑣 ∈ (Fmla‘suc 𝑁)∀𝑔𝑖𝑎 = (𝑢⊼𝑔𝑣) ∨ ∃𝑗 ∈ ω ∀𝑔𝑖𝑎 = ∀𝑔𝑗𝑢))))
6	1, 4, 5	sylancl 588	. . . 4 ⊢ (𝑁 ∈ ω → (∀𝑔𝑖𝑎 ∈ (Fmla‘suc suc 𝑁) ↔ (∀𝑔𝑖𝑎 ∈ (Fmla‘suc 𝑁) ∨ ∃𝑢 ∈ (Fmla‘suc 𝑁)(∃𝑣 ∈ (Fmla‘suc 𝑁)∀𝑔𝑖𝑎 = (𝑢⊼𝑔𝑣) ∨ ∃𝑗 ∈ ω ∀𝑔𝑖𝑎 = ∀𝑔𝑗𝑢))))
7	6	adantr 483	. . 3 ⊢ ((𝑁 ∈ ω ∧ (∀𝑔𝑖𝑎 ∈ (Fmla‘suc 𝑁) → 𝑎 ∈ (Fmla‘suc 𝑁))) → (∀𝑔𝑖𝑎 ∈ (Fmla‘suc suc 𝑁) ↔ (∀𝑔𝑖𝑎 ∈ (Fmla‘suc 𝑁) ∨ ∃𝑢 ∈ (Fmla‘suc 𝑁)(∃𝑣 ∈ (Fmla‘suc 𝑁)∀𝑔𝑖𝑎 = (𝑢⊼𝑔𝑣) ∨ ∃𝑗 ∈ ω ∀𝑔𝑖𝑎 = ∀𝑔𝑗𝑢))))
8		fmlasssuc 32636	. . . . . . . . . 10 ⊢ (suc 𝑁 ∈ ω → (Fmla‘suc 𝑁) ⊆ (Fmla‘suc suc 𝑁))
9	1, 8	syl 17	. . . . . . . . 9 ⊢ (𝑁 ∈ ω → (Fmla‘suc 𝑁) ⊆ (Fmla‘suc suc 𝑁))
10	9	sseld 3966	. . . . . . . 8 ⊢ (𝑁 ∈ ω → (𝑎 ∈ (Fmla‘suc 𝑁) → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
11	10	com12 32	. . . . . . 7 ⊢ (𝑎 ∈ (Fmla‘suc 𝑁) → (𝑁 ∈ ω → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
12	11	imim2i 16	. . . . . 6 ⊢ ((∀𝑔𝑖𝑎 ∈ (Fmla‘suc 𝑁) → 𝑎 ∈ (Fmla‘suc 𝑁)) → (∀𝑔𝑖𝑎 ∈ (Fmla‘suc 𝑁) → (𝑁 ∈ ω → 𝑎 ∈ (Fmla‘suc suc 𝑁))))
13	12	com23 86	. . . . 5 ⊢ ((∀𝑔𝑖𝑎 ∈ (Fmla‘suc 𝑁) → 𝑎 ∈ (Fmla‘suc 𝑁)) → (𝑁 ∈ ω → (∀𝑔𝑖𝑎 ∈ (Fmla‘suc 𝑁) → 𝑎 ∈ (Fmla‘suc suc 𝑁))))
14	13	impcom 410	. . . 4 ⊢ ((𝑁 ∈ ω ∧ (∀𝑔𝑖𝑎 ∈ (Fmla‘suc 𝑁) → 𝑎 ∈ (Fmla‘suc 𝑁))) → (∀𝑔𝑖𝑎 ∈ (Fmla‘suc 𝑁) → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
15		gonanegoal 32599	. . . . . . . . . . 11 ⊢ (𝑢⊼𝑔𝑣) ≠ ∀𝑔𝑖𝑎
16		eqneqall 3027	. . . . . . . . . . 11 ⊢ ((𝑢⊼𝑔𝑣) = ∀𝑔𝑖𝑎 → ((𝑢⊼𝑔𝑣) ≠ ∀𝑔𝑖𝑎 → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
17	15, 16	mpi 20	. . . . . . . . . 10 ⊢ ((𝑢⊼𝑔𝑣) = ∀𝑔𝑖𝑎 → 𝑎 ∈ (Fmla‘suc suc 𝑁))
18	17	eqcoms 2829	. . . . . . . . 9 ⊢ (∀𝑔𝑖𝑎 = (𝑢⊼𝑔𝑣) → 𝑎 ∈ (Fmla‘suc suc 𝑁))
19	18	a1i 11	. . . . . . . 8 ⊢ (((𝑁 ∈ ω ∧ 𝑢 ∈ (Fmla‘suc 𝑁)) ∧ 𝑣 ∈ (Fmla‘suc 𝑁)) → (∀𝑔𝑖𝑎 = (𝑢⊼𝑔𝑣) → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
20	19	rexlimdva 3284	. . . . . . 7 ⊢ ((𝑁 ∈ ω ∧ 𝑢 ∈ (Fmla‘suc 𝑁)) → (∃𝑣 ∈ (Fmla‘suc 𝑁)∀𝑔𝑖𝑎 = (𝑢⊼𝑔𝑣) → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
21		df-goal 32589	. . . . . . . . . . . . 13 ⊢ ∀𝑔𝑗𝑢 = ⟨2o, ⟨𝑗, 𝑢⟩⟩
22	2, 21	eqeq12i 2836	. . . . . . . . . . . 12 ⊢ (∀𝑔𝑖𝑎 = ∀𝑔𝑗𝑢 ↔ ⟨2o, ⟨𝑖, 𝑎⟩⟩ = ⟨2o, ⟨𝑗, 𝑢⟩⟩)
23		2oex 8112	. . . . . . . . . . . . 13 ⊢ 2o ∈ V
24		opex 5356	. . . . . . . . . . . . 13 ⊢ ⟨𝑖, 𝑎⟩ ∈ V
25	23, 24	opth 5368	. . . . . . . . . . . 12 ⊢ (⟨2o, ⟨𝑖, 𝑎⟩⟩ = ⟨2o, ⟨𝑗, 𝑢⟩⟩ ↔ (2o = 2o ∧ ⟨𝑖, 𝑎⟩ = ⟨𝑗, 𝑢⟩))
26	22, 25	bitri 277	. . . . . . . . . . 11 ⊢ (∀𝑔𝑖𝑎 = ∀𝑔𝑗𝑢 ↔ (2o = 2o ∧ ⟨𝑖, 𝑎⟩ = ⟨𝑗, 𝑢⟩))
27		vex 3497	. . . . . . . . . . . . 13 ⊢ 𝑖 ∈ V
28		vex 3497	. . . . . . . . . . . . 13 ⊢ 𝑎 ∈ V
29	27, 28	opth 5368	. . . . . . . . . . . 12 ⊢ (⟨𝑖, 𝑎⟩ = ⟨𝑗, 𝑢⟩ ↔ (𝑖 = 𝑗 ∧ 𝑎 = 𝑢))
30		eleq1w 2895	. . . . . . . . . . . . . . 15 ⊢ (𝑢 = 𝑎 → (𝑢 ∈ (Fmla‘suc 𝑁) ↔ 𝑎 ∈ (Fmla‘suc 𝑁)))
31	30	eqcoms 2829	. . . . . . . . . . . . . 14 ⊢ (𝑎 = 𝑢 → (𝑢 ∈ (Fmla‘suc 𝑁) ↔ 𝑎 ∈ (Fmla‘suc 𝑁)))
32	31, 11	syl6bi 255	. . . . . . . . . . . . 13 ⊢ (𝑎 = 𝑢 → (𝑢 ∈ (Fmla‘suc 𝑁) → (𝑁 ∈ ω → 𝑎 ∈ (Fmla‘suc suc 𝑁))))
33	32	impcomd 414	. . . . . . . . . . . 12 ⊢ (𝑎 = 𝑢 → ((𝑁 ∈ ω ∧ 𝑢 ∈ (Fmla‘suc 𝑁)) → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
34	29, 33	simplbiim 507	. . . . . . . . . . 11 ⊢ (⟨𝑖, 𝑎⟩ = ⟨𝑗, 𝑢⟩ → ((𝑁 ∈ ω ∧ 𝑢 ∈ (Fmla‘suc 𝑁)) → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
35	26, 34	simplbiim 507	. . . . . . . . . 10 ⊢ (∀𝑔𝑖𝑎 = ∀𝑔𝑗𝑢 → ((𝑁 ∈ ω ∧ 𝑢 ∈ (Fmla‘suc 𝑁)) → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
36	35	com12 32	. . . . . . . . 9 ⊢ ((𝑁 ∈ ω ∧ 𝑢 ∈ (Fmla‘suc 𝑁)) → (∀𝑔𝑖𝑎 = ∀𝑔𝑗𝑢 → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
37	36	adantr 483	. . . . . . . 8 ⊢ (((𝑁 ∈ ω ∧ 𝑢 ∈ (Fmla‘suc 𝑁)) ∧ 𝑗 ∈ ω) → (∀𝑔𝑖𝑎 = ∀𝑔𝑗𝑢 → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
38	37	rexlimdva 3284	. . . . . . 7 ⊢ ((𝑁 ∈ ω ∧ 𝑢 ∈ (Fmla‘suc 𝑁)) → (∃𝑗 ∈ ω ∀𝑔𝑖𝑎 = ∀𝑔𝑗𝑢 → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
39	20, 38	jaod 855	. . . . . 6 ⊢ ((𝑁 ∈ ω ∧ 𝑢 ∈ (Fmla‘suc 𝑁)) → ((∃𝑣 ∈ (Fmla‘suc 𝑁)∀𝑔𝑖𝑎 = (𝑢⊼𝑔𝑣) ∨ ∃𝑗 ∈ ω ∀𝑔𝑖𝑎 = ∀𝑔𝑗𝑢) → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
40	39	rexlimdva 3284	. . . . 5 ⊢ (𝑁 ∈ ω → (∃𝑢 ∈ (Fmla‘suc 𝑁)(∃𝑣 ∈ (Fmla‘suc 𝑁)∀𝑔𝑖𝑎 = (𝑢⊼𝑔𝑣) ∨ ∃𝑗 ∈ ω ∀𝑔𝑖𝑎 = ∀𝑔𝑗𝑢) → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
41	40	adantr 483	. . . 4 ⊢ ((𝑁 ∈ ω ∧ (∀𝑔𝑖𝑎 ∈ (Fmla‘suc 𝑁) → 𝑎 ∈ (Fmla‘suc 𝑁))) → (∃𝑢 ∈ (Fmla‘suc 𝑁)(∃𝑣 ∈ (Fmla‘suc 𝑁)∀𝑔𝑖𝑎 = (𝑢⊼𝑔𝑣) ∨ ∃𝑗 ∈ ω ∀𝑔𝑖𝑎 = ∀𝑔𝑗𝑢) → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
42	14, 41	jaod 855	. . 3 ⊢ ((𝑁 ∈ ω ∧ (∀𝑔𝑖𝑎 ∈ (Fmla‘suc 𝑁) → 𝑎 ∈ (Fmla‘suc 𝑁))) → ((∀𝑔𝑖𝑎 ∈ (Fmla‘suc 𝑁) ∨ ∃𝑢 ∈ (Fmla‘suc 𝑁)(∃𝑣 ∈ (Fmla‘suc 𝑁)∀𝑔𝑖𝑎 = (𝑢⊼𝑔𝑣) ∨ ∃𝑗 ∈ ω ∀𝑔𝑖𝑎 = ∀𝑔𝑗𝑢)) → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
43	7, 42	sylbid 242	. 2 ⊢ ((𝑁 ∈ ω ∧ (∀𝑔𝑖𝑎 ∈ (Fmla‘suc 𝑁) → 𝑎 ∈ (Fmla‘suc 𝑁))) → (∀𝑔𝑖𝑎 ∈ (Fmla‘suc suc 𝑁) → 𝑎 ∈ (Fmla‘suc suc 𝑁)))
44	43	ex 415	1 ⊢ (𝑁 ∈ ω → ((∀𝑔𝑖𝑎 ∈ (Fmla‘suc 𝑁) → 𝑎 ∈ (Fmla‘suc 𝑁)) → (∀𝑔𝑖𝑎 ∈ (Fmla‘suc suc 𝑁) → 𝑎 ∈ (Fmla‘suc suc 𝑁))))

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 398   ∨ wo 843   = wceq 1537   ∈ wcel 2114   ≠ wne 3016  ∃wrex 3139  Vcvv 3494   ⊆ wss 3936  ⟨cop 4573  suc csuc 6193  ‘cfv 6355  (class class class)co 7156  ωcom 7580  2_oc2o 8096  ⊼_𝑔cgna 32581  ∀_𝑔cgol 32582  Fmlacfmla 32584

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2793  ax-rep 5190  ax-sep 5203  ax-nul 5210  ax-pow 5266  ax-pr 5330  ax-un 7461  ax-inf2 9104

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-nel 3124  df-ral 3143  df-rex 3144  df-reu 3145  df-rab 3147  df-v 3496  df-sbc 3773  df-csb 3884  df-dif 3939  df-un 3941  df-in 3943  df-ss 3952  df-pss 3954  df-nul 4292  df-if 4468  df-pw 4541  df-sn 4568  df-pr 4570  df-tp 4572  df-op 4574  df-uni 4839  df-iun 4921  df-br 5067  df-opab 5129  df-mpt 5147  df-tr 5173  df-id 5460  df-eprel 5465  df-po 5474  df-so 5475  df-fr 5514  df-we 5516  df-xp 5561  df-rel 5562  df-cnv 5563  df-co 5564  df-dm 5565  df-rn 5566  df-res 5567  df-ima 5568  df-pred 6148  df-ord 6194  df-on 6195  df-lim 6196  df-suc 6197  df-iota 6314  df-fun 6357  df-fn 6358  df-f 6359  df-f1 6360  df-fo 6361  df-f1o 6362  df-fv 6363  df-ov 7159  df-oprab 7160  df-mpo 7161  df-om 7581  df-1st 7689  df-2nd 7690  df-wrecs 7947  df-recs 8008  df-rdg 8046  df-1o 8102  df-2o 8103  df-map 8408  df-goel 32587  df-gona 32588  df-goal 32589  df-sat 32590  df-fmla 32592

This theorem is referenced by:  goalr  32644