Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  constrextdg2lem Structured version   Visualization version   GIF version

Theorem constrextdg2lem 34207
Description: Lemma for constrextdg2 34208. (Contributed by Thierry Arnoux, 19-Oct-2025.)
Hypotheses
Ref Expression
constr0.1 𝐶 = rec((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))}), {0, 1})
constrextdg2.1 𝐸 = (ℂflds 𝑒)
constrextdg2.2 𝐹 = (ℂflds 𝑓)
constrextdg2.l < = {⟨𝑓, 𝑒⟩ ∣ (𝐸/FldExt𝐹 ∧ (𝐸[:]𝐹) = 2)}
constrextdg2.n (𝜑𝑁 ∈ ω)
constrextdg2lem.1 (𝜑𝑅 ∈ ( < Chain (SubDRing‘ℂfld)))
constrextdg2lem.2 (𝜑 → (𝑅‘0) = ℚ)
constrextdg2lem.3 (𝜑 → (𝐶𝑁) ⊆ (lastS‘𝑅))
Assertion
Ref Expression
constrextdg2lem (𝜑 → ∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ (𝐶‘suc 𝑁) ⊆ (lastS‘𝑣)))
Distinct variable groups:   < ,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓,𝑟,𝑠,𝑡,𝑣,𝑥   𝐶,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓,𝑟,𝑠,𝑡,𝑣,𝑥   𝑁,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓,𝑟,𝑠,𝑡,𝑣,𝑥   𝑣,𝑅   𝜑,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓,𝑟,𝑠,𝑡,𝑣,𝑥
Allowed substitution hints:   𝑅(𝑥, 𝑡, 𝑒, 𝑓, 𝑠, 𝑟, 𝑎, 𝑏, 𝑐, 𝑑)   𝐸(𝑥, 𝑣, 𝑡, 𝑒, 𝑓, 𝑠, 𝑟, 𝑎, 𝑏, 𝑐, 𝑑)   𝐹(𝑥, 𝑣, 𝑡, 𝑒, 𝑓, 𝑠, 𝑟, 𝑎, 𝑏, 𝑐, 𝑑)

Proof of Theorem constrextdg2lem
Dummy variables 𝑔 𝑦 𝑖 𝑢 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 uneq2 4116 . . . . . 6 (𝑖 = ∅ → ((𝐶𝑁) ∪ 𝑖) = ((𝐶𝑁) ∪ ∅))
21sseq1d 3969 . . . . 5 (𝑖 = ∅ → (((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣) ↔ ((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑣)))
32anbi2d 642 . . . 4 (𝑖 = ∅ → (((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑣))))
43rexbidv 3191 . . 3 (𝑖 = ∅ → (∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑣))))
5 uneq2 4116 . . . . . 6 (𝑖 = 𝑔 → ((𝐶𝑁) ∪ 𝑖) = ((𝐶𝑁) ∪ 𝑔))
65sseq1d 3969 . . . . 5 (𝑖 = 𝑔 → (((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣) ↔ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)))
76anbi2d 642 . . . 4 (𝑖 = 𝑔 → (((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣))))
87rexbidv 3191 . . 3 (𝑖 = 𝑔 → (∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣))))
9 fveq1 6885 . . . . . . 7 (𝑣 = 𝑢 → (𝑣‘0) = (𝑢‘0))
109eqeq1d 2767 . . . . . 6 (𝑣 = 𝑢 → ((𝑣‘0) = ℚ ↔ (𝑢‘0) = ℚ))
11 fveq2 6886 . . . . . . 7 (𝑣 = 𝑢 → (lastS‘𝑣) = (lastS‘𝑢))
1211sseq2d 3970 . . . . . 6 (𝑣 = 𝑢 → (((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣) ↔ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑢)))
1310, 12anbi12d 644 . . . . 5 (𝑣 = 𝑢 → (((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑢))))
1413cbvrexvw 3246 . . . 4 (∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ∃𝑢 ∈ ( < Chain (SubDRing‘ℂfld))((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑢)))
15 uneq2 4116 . . . . . . 7 (𝑖 = (𝑔 ∪ {𝑦}) → ((𝐶𝑁) ∪ 𝑖) = ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})))
1615sseq1d 3969 . . . . . 6 (𝑖 = (𝑔 ∪ {𝑦}) → (((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑢) ↔ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢)))
1716anbi2d 642 . . . . 5 (𝑖 = (𝑔 ∪ {𝑦}) → (((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑢)) ↔ ((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢))))
1817rexbidv 3191 . . . 4 (𝑖 = (𝑔 ∪ {𝑦}) → (∃𝑢 ∈ ( < Chain (SubDRing‘ℂfld))((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑢)) ↔ ∃𝑢 ∈ ( < Chain (SubDRing‘ℂfld))((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢))))
1914, 18bitrid 286 . . 3 (𝑖 = (𝑔 ∪ {𝑦}) → (∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ∃𝑢 ∈ ( < Chain (SubDRing‘ℂfld))((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢))))
20 uneq2 4116 . . . . . 6 (𝑖 = (𝐶‘suc 𝑁) → ((𝐶𝑁) ∪ 𝑖) = ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)))
2120sseq1d 3969 . . . . 5 (𝑖 = (𝐶‘suc 𝑁) → (((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣) ↔ ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣)))
2221anbi2d 642 . . . 4 (𝑖 = (𝐶‘suc 𝑁) → (((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣))))
2322rexbidv 3191 . . 3 (𝑖 = (𝐶‘suc 𝑁) → (∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣))))
24 fveq1 6885 . . . . . 6 (𝑣 = 𝑅 → (𝑣‘0) = (𝑅‘0))
2524eqeq1d 2767 . . . . 5 (𝑣 = 𝑅 → ((𝑣‘0) = ℚ ↔ (𝑅‘0) = ℚ))
26 fveq2 6886 . . . . . 6 (𝑣 = 𝑅 → (lastS‘𝑣) = (lastS‘𝑅))
2726sseq2d 3970 . . . . 5 (𝑣 = 𝑅 → (((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑣) ↔ ((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑅)))
2825, 27anbi12d 644 . . . 4 (𝑣 = 𝑅 → (((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑣)) ↔ ((𝑅‘0) = ℚ ∧ ((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑅))))
29 constrextdg2lem.1 . . . 4 (𝜑𝑅 ∈ ( < Chain (SubDRing‘ℂfld)))
30 constrextdg2lem.2 . . . . 5 (𝜑 → (𝑅‘0) = ℚ)
31 un0 4351 . . . . . 6 ((𝐶𝑁) ∪ ∅) = (𝐶𝑁)
32 constrextdg2lem.3 . . . . . 6 (𝜑 → (𝐶𝑁) ⊆ (lastS‘𝑅))
3331, 32eqsstrid 3976 . . . . 5 (𝜑 → ((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑅))
3430, 33jca 521 . . . 4 (𝜑 → ((𝑅‘0) = ℚ ∧ ((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑅)))
3528, 29, 34rspcedvdw 3586 . . 3 (𝜑 → ∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑣)))
36 fveq1 6885 . . . . . . . . . 10 (𝑢 = 𝑣 → (𝑢‘0) = (𝑣‘0))
3736eqeq1d 2767 . . . . . . . . 9 (𝑢 = 𝑣 → ((𝑢‘0) = ℚ ↔ (𝑣‘0) = ℚ))
38 fveq2 6886 . . . . . . . . . 10 (𝑢 = 𝑣 → (lastS‘𝑢) = (lastS‘𝑣))
3938sseq2d 3970 . . . . . . . . 9 (𝑢 = 𝑣 → (((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢) ↔ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑣)))
4037, 39anbi12d 644 . . . . . . . 8 (𝑢 = 𝑣 → (((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢)) ↔ ((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑣))))
41 simpllr 788 . . . . . . . . 9 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → 𝑣 ∈ ( < Chain (SubDRing‘ℂfld)))
4241adantr 486 . . . . . . . 8 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → 𝑣 ∈ ( < Chain (SubDRing‘ℂfld)))
43 simpllr 788 . . . . . . . . 9 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → (𝑣‘0) = ℚ)
44 simpr 490 . . . . . . . . . . . 12 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣))
4544unssad 4146 . . . . . . . . . . 11 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → (𝐶𝑁) ⊆ (lastS‘𝑣))
4645adantr 486 . . . . . . . . . 10 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → (𝐶𝑁) ⊆ (lastS‘𝑣))
47 simplr 781 . . . . . . . . . . . 12 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣))
4847unssbd 4147 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → 𝑔 ⊆ (lastS‘𝑣))
49 simpr 490 . . . . . . . . . . . 12 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → 𝑦 ∈ (lastS‘𝑣))
5049snssd 4754 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → {𝑦} ⊆ (lastS‘𝑣))
5148, 50unssd 4145 . . . . . . . . . 10 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → (𝑔 ∪ {𝑦}) ⊆ (lastS‘𝑣))
5246, 51unssd 4145 . . . . . . . . 9 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑣))
5343, 52jca 521 . . . . . . . 8 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → ((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑣)))
5440, 42, 53rspcedvdw 3586 . . . . . . 7 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → ∃𝑢 ∈ ( < Chain (SubDRing‘ℂfld))((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢)))
55 fveq1 6885 . . . . . . . . . 10 (𝑢 = (𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩) → (𝑢‘0) = ((𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)‘0))
5655eqeq1d 2767 . . . . . . . . 9 (𝑢 = (𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩) → ((𝑢‘0) = ℚ ↔ ((𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)‘0) = ℚ))
57 fveq2 6886 . . . . . . . . . 10 (𝑢 = (𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩) → (lastS‘𝑢) = (lastS‘(𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)))
5857sseq2d 3970 . . . . . . . . 9 (𝑢 = (𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩) → (((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢) ↔ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘(𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩))))
5956, 58anbi12d 644 . . . . . . . 8 (𝑢 = (𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩) → (((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢)) ↔ (((𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘(𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)))))
60 cnfldbas 21581 . . . . . . . . . 10 ℂ = (Base‘ℂfld)
61 cndrng 21606 . . . . . . . . . . 11 fld ∈ DivRing
6261a1i 11 . . . . . . . . . 10 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ℂfld ∈ DivRing)
6341chnwrd 18691 . . . . . . . . . . . . . 14 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → 𝑣 ∈ Word (SubDRing‘ℂfld))
64 simpr 490 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑣 = ∅) → 𝑣 = ∅)
6564fveq2d 6890 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑣 = ∅) → (lastS‘𝑣) = (lastS‘∅))
66 lsw0g 14626 . . . . . . . . . . . . . . . . . . 19 (lastS‘∅) = ∅
6765, 66eqtrdi 2816 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑣 = ∅) → (lastS‘𝑣) = ∅)
68 simplr 781 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑣 = ∅) → ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣))
69 ssun1 4131 . . . . . . . . . . . . . . . . . . . . . 22 (𝐶𝑁) ⊆ ((𝐶𝑁) ∪ 𝑔)
70 constr0.1 . . . . . . . . . . . . . . . . . . . . . . . 24 𝐶 = rec((𝑠 ∈ V ↦ {𝑥 ∈ ℂ ∣ (∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑡 ∈ ℝ ∃𝑟 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ 𝑥 = (𝑐 + (𝑟 · (𝑑𝑐))) ∧ (ℑ‘((∗‘(𝑏𝑎)) · (𝑑𝑐))) ≠ 0) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑒𝑠𝑓𝑠𝑡 ∈ ℝ (𝑥 = (𝑎 + (𝑡 · (𝑏𝑎))) ∧ (abs‘(𝑥𝑐)) = (abs‘(𝑒𝑓))) ∨ ∃𝑎𝑠𝑏𝑠𝑐𝑠𝑑𝑠𝑒𝑠𝑓𝑠 (𝑎𝑑 ∧ (abs‘(𝑥𝑎)) = (abs‘(𝑏𝑐)) ∧ (abs‘(𝑥𝑑)) = (abs‘(𝑒𝑓))))}), {0, 1})
71 constrextdg2.n . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑𝑁 ∈ ω)
72 nnon 7875 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑁 ∈ ω → 𝑁 ∈ On)
7371, 72syl 18 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑𝑁 ∈ On)
7470, 73constr01 34201 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → {0, 1} ⊆ (𝐶𝑁))
75 c0ex 11220 . . . . . . . . . . . . . . . . . . . . . . . 24 0 ∈ V
7675prnz 4745 . . . . . . . . . . . . . . . . . . . . . . 23 {0, 1} ≠ ∅
77 ssn0 4362 . . . . . . . . . . . . . . . . . . . . . . 23 (({0, 1} ⊆ (𝐶𝑁) ∧ {0, 1} ≠ ∅) → (𝐶𝑁) ≠ ∅)
7874, 76, 77sylancl 598 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (𝐶𝑁) ≠ ∅)
79 ssn0 4362 . . . . . . . . . . . . . . . . . . . . . 22 (((𝐶𝑁) ⊆ ((𝐶𝑁) ∪ 𝑔) ∧ (𝐶𝑁) ≠ ∅) → ((𝐶𝑁) ∪ 𝑔) ≠ ∅)
8069, 78, 79sylancr 599 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝐶𝑁) ∪ 𝑔) ≠ ∅)
8180ad2antrr 739 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑣 = ∅) → ((𝐶𝑁) ∪ 𝑔) ≠ ∅)
82 ssn0 4362 . . . . . . . . . . . . . . . . . . . 20 ((((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣) ∧ ((𝐶𝑁) ∪ 𝑔) ≠ ∅) → (lastS‘𝑣) ≠ ∅)
8368, 81, 82syl2anc 596 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑣 = ∅) → (lastS‘𝑣) ≠ ∅)
8483neneqd 2965 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑣 = ∅) → ¬ (lastS‘𝑣) = ∅)
8567, 84pm2.65da 829 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → ¬ 𝑣 = ∅)
8685neqned 2967 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → 𝑣 ≠ ∅)
8786ad4antr 745 . . . . . . . . . . . . . . 15 ((((((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ 𝑔 ⊆ (𝐶‘suc 𝑁)) → 𝑣 ≠ ∅)
8887an62ds 32879 . . . . . . . . . . . . . 14 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → 𝑣 ≠ ∅)
89 lswcl 14628 . . . . . . . . . . . . . 14 ((𝑣 ∈ Word (SubDRing‘ℂfld) ∧ 𝑣 ≠ ∅) → (lastS‘𝑣) ∈ (SubDRing‘ℂfld))
9063, 88, 89syl2anc 596 . . . . . . . . . . . . 13 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → (lastS‘𝑣) ∈ (SubDRing‘ℂfld))
9190adantr 486 . . . . . . . . . . . 12 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (lastS‘𝑣) ∈ (SubDRing‘ℂfld))
9260sdrgss 20951 . . . . . . . . . . . 12 ((lastS‘𝑣) ∈ (SubDRing‘ℂfld) → (lastS‘𝑣) ⊆ ℂ)
9391, 92syl 18 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (lastS‘𝑣) ⊆ ℂ)
94 onsuc 7816 . . . . . . . . . . . . . . . 16 (𝑁 ∈ On → suc 𝑁 ∈ On)
9573, 94syl 18 . . . . . . . . . . . . . . 15 (𝜑 → suc 𝑁 ∈ On)
9670, 95constrsscn 34199 . . . . . . . . . . . . . 14 (𝜑 → (𝐶‘suc 𝑁) ⊆ ℂ)
9796ad6antr 749 . . . . . . . . . . . . 13 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (𝐶‘suc 𝑁) ⊆ ℂ)
98 simp-4r 796 . . . . . . . . . . . . . . 15 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔))
9998eldifad 3918 . . . . . . . . . . . . . 14 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → 𝑦 ∈ (𝐶‘suc 𝑁))
10099adantr 486 . . . . . . . . . . . . 13 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → 𝑦 ∈ (𝐶‘suc 𝑁))
10197, 100sseldd 3939 . . . . . . . . . . . 12 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → 𝑦 ∈ ℂ)
102101snssd 4754 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → {𝑦} ⊆ ℂ)
10393, 102unssd 4145 . . . . . . . . . 10 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ((lastS‘𝑣) ∪ {𝑦}) ⊆ ℂ)
10460, 62, 103fldgensdrg 33704 . . . . . . . . 9 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})) ∈ (SubDRing‘ℂfld))
10541adantr 486 . . . . . . . . 9 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → 𝑣 ∈ ( < Chain (SubDRing‘ℂfld)))
10691elexd 3480 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (lastS‘𝑣) ∈ V)
107104elexd 3480 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})) ∈ V)
108 eqid 2765 . . . . . . . . . . . 12 (ℂflds (lastS‘𝑣)) = (ℂflds (lastS‘𝑣))
109 eqid 2765 . . . . . . . . . . . 12 (ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))) = (ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))
110 cnfldfld 33731 . . . . . . . . . . . . 13 fld ∈ Field
111110a1i 11 . . . . . . . . . . . 12 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ℂfld ∈ Field)
11260, 108, 109, 111, 91, 102fldgenfldext 34127 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))/FldExt(ℂflds (lastS‘𝑣)))
113 simpr 490 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2)
114 constrextdg2.1 . . . . . . . . . . . . . . . 16 𝐸 = (ℂflds 𝑒)
115 constrextdg2.2 . . . . . . . . . . . . . . . 16 𝐹 = (ℂflds 𝑓)
116114, 115breq12i 5120 . . . . . . . . . . . . . . 15 (𝐸/FldExt𝐹 ↔ (ℂflds 𝑒)/FldExt(ℂflds 𝑓))
117 oveq2 7428 . . . . . . . . . . . . . . . . 17 (𝑒 = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})) → (ℂflds 𝑒) = (ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))))
118117adantl 487 . . . . . . . . . . . . . . . 16 ((𝑓 = (lastS‘𝑣) ∧ 𝑒 = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))) → (ℂflds 𝑒) = (ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))))
119 oveq2 7428 . . . . . . . . . . . . . . . . 17 (𝑓 = (lastS‘𝑣) → (ℂflds 𝑓) = (ℂflds (lastS‘𝑣)))
120119adantr 486 . . . . . . . . . . . . . . . 16 ((𝑓 = (lastS‘𝑣) ∧ 𝑒 = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))) → (ℂflds 𝑓) = (ℂflds (lastS‘𝑣)))
121118, 120breq12d 5124 . . . . . . . . . . . . . . 15 ((𝑓 = (lastS‘𝑣) ∧ 𝑒 = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))) → ((ℂflds 𝑒)/FldExt(ℂflds 𝑓) ↔ (ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))/FldExt(ℂflds (lastS‘𝑣))))
122116, 121bitrid 286 . . . . . . . . . . . . . 14 ((𝑓 = (lastS‘𝑣) ∧ 𝑒 = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))) → (𝐸/FldExt𝐹 ↔ (ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))/FldExt(ℂflds (lastS‘𝑣))))
123114, 115oveq12i 7432 . . . . . . . . . . . . . . . 16 (𝐸[:]𝐹) = ((ℂflds 𝑒)[:](ℂflds 𝑓))
124118, 120oveq12d 7438 . . . . . . . . . . . . . . . 16 ((𝑓 = (lastS‘𝑣) ∧ 𝑒 = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))) → ((ℂflds 𝑒)[:](ℂflds 𝑓)) = ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))))
125123, 124eqtrid 2812 . . . . . . . . . . . . . . 15 ((𝑓 = (lastS‘𝑣) ∧ 𝑒 = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))) → (𝐸[:]𝐹) = ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))))
126125eqeq1d 2767 . . . . . . . . . . . . . 14 ((𝑓 = (lastS‘𝑣) ∧ 𝑒 = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))) → ((𝐸[:]𝐹) = 2 ↔ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2))
127122, 126anbi12d 644 . . . . . . . . . . . . 13 ((𝑓 = (lastS‘𝑣) ∧ 𝑒 = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))) → ((𝐸/FldExt𝐹 ∧ (𝐸[:]𝐹) = 2) ↔ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))/FldExt(ℂflds (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2)))
128 constrextdg2.l . . . . . . . . . . . . 13 < = {⟨𝑓, 𝑒⟩ ∣ (𝐸/FldExt𝐹 ∧ (𝐸[:]𝐹) = 2)}
129127, 128brabga 5520 . . . . . . . . . . . 12 (((lastS‘𝑣) ∈ V ∧ (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})) ∈ V) → ((lastS‘𝑣) < (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})) ↔ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))/FldExt(ℂflds (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2)))
130129biimpar 483 . . . . . . . . . . 11 ((((lastS‘𝑣) ∈ V ∧ (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})) ∈ V) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))/FldExt(ℂflds (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2)) → (lastS‘𝑣) < (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))
131106, 107, 112, 113, 130syl22anc 852 . . . . . . . . . 10 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (lastS‘𝑣) < (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))
132131olcd 888 . . . . . . . . 9 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (𝑣 = ∅ ∨ (lastS‘𝑣) < (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))))
133104, 105, 132chnccats1 18708 . . . . . . . 8 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩) ∈ ( < Chain (SubDRing‘ℂfld)))
13463adantr 486 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → 𝑣 ∈ Word (SubDRing‘ℂfld))
135104s1cld 14665 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩ ∈ Word (SubDRing‘ℂfld))
136 hashgt0 14447 . . . . . . . . . . . . 13 ((𝑣 ∈ ( < Chain (SubDRing‘ℂfld)) ∧ 𝑣 ≠ ∅) → 0 < (♯‘𝑣))
13741, 88, 136syl2anc 596 . . . . . . . . . . . 12 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → 0 < (♯‘𝑣))
138137adantr 486 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → 0 < (♯‘𝑣))
139 ccatfv0 14644 . . . . . . . . . . 11 ((𝑣 ∈ Word (SubDRing‘ℂfld) ∧ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩ ∈ Word (SubDRing‘ℂfld) ∧ 0 < (♯‘𝑣)) → ((𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)‘0) = (𝑣‘0))
140134, 135, 138, 139syl3anc 1398 . . . . . . . . . 10 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ((𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)‘0) = (𝑣‘0))
141 simpllr 788 . . . . . . . . . 10 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (𝑣‘0) = ℚ)
142140, 141eqtrd 2800 . . . . . . . . 9 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ((𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)‘0) = ℚ)
14345adantr 486 . . . . . . . . . . . . 13 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (𝐶𝑁) ⊆ (lastS‘𝑣))
144 ssun3 4133 . . . . . . . . . . . . 13 ((𝐶𝑁) ⊆ (lastS‘𝑣) → (𝐶𝑁) ⊆ ((lastS‘𝑣) ∪ {𝑦}))
145143, 144syl 18 . . . . . . . . . . . 12 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (𝐶𝑁) ⊆ ((lastS‘𝑣) ∪ {𝑦}))
146 simplr 781 . . . . . . . . . . . . . . 15 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣))
147146unssbd 4147 . . . . . . . . . . . . . 14 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → 𝑔 ⊆ (lastS‘𝑣))
148 ssun3 4133 . . . . . . . . . . . . . 14 (𝑔 ⊆ (lastS‘𝑣) → 𝑔 ⊆ ((lastS‘𝑣) ∪ {𝑦}))
149147, 148syl 18 . . . . . . . . . . . . 13 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → 𝑔 ⊆ ((lastS‘𝑣) ∪ {𝑦}))
150 ssun2 4132 . . . . . . . . . . . . . 14 {𝑦} ⊆ ((lastS‘𝑣) ∪ {𝑦})
151150a1i 11 . . . . . . . . . . . . 13 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → {𝑦} ⊆ ((lastS‘𝑣) ∪ {𝑦}))
152149, 151unssd 4145 . . . . . . . . . . . 12 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (𝑔 ∪ {𝑦}) ⊆ ((lastS‘𝑣) ∪ {𝑦}))
153145, 152unssd 4145 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ ((lastS‘𝑣) ∪ {𝑦}))
15460, 62, 103fldgenssid 33703 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ((lastS‘𝑣) ∪ {𝑦}) ⊆ (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))
155153, 154sstrd 3948 . . . . . . . . . 10 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))
156 lswccats1 14697 . . . . . . . . . . 11 ((𝑣 ∈ Word (SubDRing‘ℂfld) ∧ (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})) ∈ (SubDRing‘ℂfld)) → (lastS‘(𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)) = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))
157134, 104, 156syl2anc 596 . . . . . . . . . 10 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (lastS‘(𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)) = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))
158155, 157sseqtrrd 3975 . . . . . . . . 9 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘(𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)))
159142, 158jca 521 . . . . . . . 8 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (((𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘(𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩))))
16059, 133, 159rspcedvdw 3586 . . . . . . 7 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ∃𝑢 ∈ ( < Chain (SubDRing‘ℂfld))((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢)))
16173ad5antr 747 . . . . . . . 8 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → 𝑁 ∈ On)
16270, 108, 109, 90, 161, 45, 99constrelextdg2 34206 . . . . . . 7 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → (𝑦 ∈ (lastS‘𝑣) ∨ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2))
16354, 160, 162mpjaodan 973 . . . . . 6 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → ∃𝑢 ∈ ( < Chain (SubDRing‘ℂfld))((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢)))
164163anasss 472 . . . . 5 (((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ ((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣))) → ∃𝑢 ∈ ( < Chain (SubDRing‘ℂfld))((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢)))
165164rexlimdva2 3170 . . . 4 (((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) → (∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → ∃𝑢 ∈ ( < Chain (SubDRing‘ℂfld))((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢))))
166165anasss 472 . . 3 ((𝜑 ∧ (𝑔 ⊆ (𝐶‘suc 𝑁) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔))) → (∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → ∃𝑢 ∈ ( < Chain (SubDRing‘ℂfld))((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢))))
167 peano2 7893 . . . . 5 (𝑁 ∈ ω → suc 𝑁 ∈ ω)
16871, 167syl 18 . . . 4 (𝜑 → suc 𝑁 ∈ ω)
16970, 168constrfin 34205 . . 3 (𝜑 → (𝐶‘suc 𝑁) ∈ Fin)
1704, 8, 19, 23, 35, 166, 169findcard2d 9159 . 2 (𝜑 → ∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣)))
171 simpr 490 . . . . . 6 (((𝜑𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣)) → ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣))
172171unssbd 4147 . . . . 5 (((𝜑𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣)) → (𝐶‘suc 𝑁) ⊆ (lastS‘𝑣))
173172ex 418 . . . 4 ((𝜑𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) → (((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣) → (𝐶‘suc 𝑁) ⊆ (lastS‘𝑣)))
174173anim2d 624 . . 3 ((𝜑𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) → (((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣)) → ((𝑣‘0) = ℚ ∧ (𝐶‘suc 𝑁) ⊆ (lastS‘𝑣))))
175174reximdva 3180 . 2 (𝜑 → (∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣)) → ∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ (𝐶‘suc 𝑁) ⊆ (lastS‘𝑣))))
176170, 175mpd 16 1 (𝜑 → ∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ (𝐶‘suc 𝑁) ⊆ (lastS‘𝑣)))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wa 401  w3o 1102  w3a 1103   = wceq 1570  wcel 2146  wne 2960  wrex 3091  {crab 3418  Vcvv 3457  cdif 3903  cun 3904  wss 3906  c0 4286  {csn 4591  {cpr 4593   class class class wbr 5111  {copab 5175  cmpt 5194  Oncon0 6365  suc csuc 6367  cfv 6541  (class class class)co 7420  ωcom 7869  reccrdg 8403  cc 11118  cr 11119  0cc0 11120  1c1 11121   + caddc 11123   · cmul 11125   < clt 11263  cmin 11461  2c2 12315  cq 12993  chash 14389  Word cword 14573  lastSclsw 14622   ++ cconcat 14630  ⟨“cs1 14657  ccj 15176  cim 15178  abscabs 15314  s cress 17317   Chain cchn 18688  DivRingcdr 20882  Fieldcfield 20883  SubDRingcsdrg 20944  fldccnfld 21577   fldGen cfldgen 33700  /FldExtcfldext 34097  [:]cextdg 34099
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 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2737  ax-rep 5240  ax-sep 5259  ax-nul 5271  ax-pow 5338  ax-pr 5406  ax-un 7743  ax-reg 9562  ax-inf2 9618  ax-ac2 10463  ax-cnex 11176  ax-resscn 11177  ax-1cn 11178  ax-icn 11179  ax-addcl 11180  ax-addrcl 11181  ax-mulcl 11182  ax-mulrcl 11183  ax-mulcom 11184  ax-addass 11185  ax-mulass 11186  ax-distr 11187  ax-i2m1 11188  ax-1ne0 11189  ax-1rid 11190  ax-rnegex 11191  ax-rrecex 11192  ax-cnre 11193  ax-pre-lttri 11194  ax-pre-lttrn 11195  ax-pre-ltadd 11196  ax-pre-mulgt0 11197  ax-pre-sup 11198  ax-addf 11199  ax-mulf 11200
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 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3067  df-ral 3082  df-rex 3092  df-rmo 3371  df-reu 3372  df-rab 3419  df-v 3459  df-sbc 3747  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4287  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-tp 4596  df-op 4598  df-uni 4875  df-int 4915  df-iun 4960  df-iin 4961  df-br 5112  df-opab 5176  df-mpt 5195  df-tr 5221  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-se 5617  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6307  df-ord 6368  df-on 6369  df-lim 6370  df-suc 6371  df-iota 6497  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-isom 6550  df-riota 7377  df-ov 7423  df-oprab 7424  df-mpo 7425  df-of 7685  df-ofr 7686  df-rpss 7731  df-om 7870  df-1st 7993  df-2nd 7994  df-supp 8164  df-tpos 8229  df-frecs 8285  df-wrecs 8316  df-recs 8365  df-rdg 8404  df-1o 8460  df-2o 8461  df-oadd 8464  df-er 8701  df-ec 8703  df-qs 8707  df-map 8833  df-pm 8834  df-ixp 8903  df-en 8951  df-dom 8952  df-sdom 8953  df-fin 8954  df-fsupp 9330  df-sup 9410  df-inf 9411  df-oi 9480  df-r1 9744  df-rank 9745  df-scott 9866  df-dju 9904  df-card 9942  df-acn 9945  df-ac 10117  df-pnf 11265  df-mnf 11266  df-xr 11267  df-ltxr 11268  df-le 11269  df-sub 11463  df-neg 11464  df-div 11892  df-nn 12254  df-2 12323  df-3 12324  df-4 12325  df-5 12326  df-6 12327  df-7 12328  df-8 12329  df-9 12330  df-n0 12525  df-xnn0 12598  df-z 12612  df-dec 12733  df-uz 12884  df-rp 13038  df-ico 13399  df-fz 13557  df-fzo 13705  df-seq 14061  df-exp 14121  df-hash 14390  df-word 14574  df-lsw 14623  df-concat 14631  df-s1 14658  df-cj 15179  df-re 15180  df-im 15181  df-sqrt 15315  df-abs 15316  df-struct 17234  df-sets 17251  df-slot 17269  df-ndx 17281  df-base 17297  df-ress 17318  df-plusg 17350  df-mulr 17351  df-starv 17352  df-sca 17353  df-vsca 17354  df-ip 17355  df-tset 17356  df-ple 17357  df-ocomp 17358  df-ds 17359  df-unif 17360  df-hom 17361  df-cco 17362  df-0g 17521  df-gsum 17522  df-prds 17527  df-pws 17529  df-imas 17589  df-qus 17590  df-mre 17665  df-mrc 17666  df-mri 17667  df-acs 17668  df-proset 18377  df-drs 18378  df-poset 18396  df-ipo 18611  df-chn 18689  df-mgm 18725  df-sgrp 18814  df-mnd 18830  df-mhm 18883  df-submnd 18884  df-grp 19052  df-minusg 19053  df-sbg 19054  df-mulg 19183  df-subg 19238  df-nsg 19239  df-eqg 19240  df-ghm 19333  df-gim 19378  df-cntz 19436  df-oppg 19465  df-lsm 19755  df-cmn 19901  df-abl 19902  df-mgp 20266  df-rng 20280  df-ur 20313  df-srg 20318  df-ring 20366  df-cring 20367  df-oppr 20470  df-dvdsr 20490  df-unit 20491  df-irred 20492  df-invr 20521  df-dvr 20534  df-rhm 20605  df-nzr 20665  df-subrng 20700  df-subrg 20724  df-rlreg 20848  df-domn 20849  df-idom 20850  df-drng 20884  df-field 20885  df-sdrg 20945  df-lmod 21038  df-lss 21108  df-lsp 21148  df-lmhm 21198  df-lmim 21199  df-lmic 21200  df-lbs 21251  df-lvec 21279  df-sra 21349  df-rgmod 21350  df-lidl 21387  df-rsp 21388  df-2idl 21444  df-lpidl 21545  df-lpir 21546  df-pid 21560  df-cnfld 21578  df-dsmm 21937  df-frlm 21952  df-uvc 21988  df-lindf 22011  df-linds 22012  df-assa 22058  df-asp 22059  df-ascl 22060  df-psr 22114  df-mvr 22115  df-mpl 22116  df-opsr 22118  df-evls 22280  df-evl 22281  df-psr1 22395  df-vr1 22396  df-ply1 22397  df-coe1 22398  df-evls1 22530  df-evl1 22531  df-mdeg 26268  df-deg1 26269  df-mon1 26344  df-uc1p 26345  df-q1p 26346  df-r1p 26347  df-ig1p 26348  df-fldgen 33701  df-mxidl 33812  df-dim 34059  df-fldext 34100  df-extdg 34101  df-irng 34143  df-minply 34159
This theorem is used by:  constrextdg2  34208
  Copyright terms: Public domain W3C validator