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 34147
Description: Lemma for constrextdg2 34148. (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 3968 . . . . 5 (𝑖 = ∅ → (((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣) ↔ ((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑣)))
32anbi2d 641 . . . 4 (𝑖 = ∅ → (((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑣))))
43rexbidv 3189 . . 3 (𝑖 = ∅ → (∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑣))))
5 uneq2 4116 . . . . . 6 (𝑖 = 𝑔 → ((𝐶𝑁) ∪ 𝑖) = ((𝐶𝑁) ∪ 𝑔))
65sseq1d 3968 . . . . 5 (𝑖 = 𝑔 → (((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣) ↔ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)))
76anbi2d 641 . . . 4 (𝑖 = 𝑔 → (((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣))))
87rexbidv 3189 . . 3 (𝑖 = 𝑔 → (∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣))))
9 fveq1 6880 . . . . . . 7 (𝑣 = 𝑢 → (𝑣‘0) = (𝑢‘0))
109eqeq1d 2765 . . . . . 6 (𝑣 = 𝑢 → ((𝑣‘0) = ℚ ↔ (𝑢‘0) = ℚ))
11 fveq2 6881 . . . . . . 7 (𝑣 = 𝑢 → (lastS‘𝑣) = (lastS‘𝑢))
1211sseq2d 3969 . . . . . 6 (𝑣 = 𝑢 → (((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣) ↔ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑢)))
1310, 12anbi12d 643 . . . . 5 (𝑣 = 𝑢 → (((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑢))))
1413cbvrexvw 3244 . . . 4 (∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ∃𝑢 ∈ ( < Chain (SubDRing‘ℂfld))((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑢)))
15 uneq2 4116 . . . . . . 7 (𝑖 = (𝑔 ∪ {𝑦}) → ((𝐶𝑁) ∪ 𝑖) = ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})))
1615sseq1d 3968 . . . . . 6 (𝑖 = (𝑔 ∪ {𝑦}) → (((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑢) ↔ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢)))
1716anbi2d 641 . . . . 5 (𝑖 = (𝑔 ∪ {𝑦}) → (((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑢)) ↔ ((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢))))
1817rexbidv 3189 . . . 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 3968 . . . . 5 (𝑖 = (𝐶‘suc 𝑁) → (((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣) ↔ ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣)))
2221anbi2d 641 . . . 4 (𝑖 = (𝐶‘suc 𝑁) → (((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣))))
2322rexbidv 3189 . . 3 (𝑖 = (𝐶‘suc 𝑁) → (∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑖) ⊆ (lastS‘𝑣)) ↔ ∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣))))
24 fveq1 6880 . . . . . 6 (𝑣 = 𝑅 → (𝑣‘0) = (𝑅‘0))
2524eqeq1d 2765 . . . . 5 (𝑣 = 𝑅 → ((𝑣‘0) = ℚ ↔ (𝑅‘0) = ℚ))
26 fveq2 6881 . . . . . 6 (𝑣 = 𝑅 → (lastS‘𝑣) = (lastS‘𝑅))
2726sseq2d 3969 . . . . 5 (𝑣 = 𝑅 → (((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑣) ↔ ((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑅)))
2825, 27anbi12d 643 . . . 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 3975 . . . . 5 (𝜑 → ((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑅))
3430, 33jca 520 . . . 4 (𝜑 → ((𝑅‘0) = ℚ ∧ ((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑅)))
3528, 29, 34rspcedvdw 3584 . . 3 (𝜑 → ∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ ∅) ⊆ (lastS‘𝑣)))
36 fveq1 6880 . . . . . . . . . 10 (𝑢 = 𝑣 → (𝑢‘0) = (𝑣‘0))
3736eqeq1d 2765 . . . . . . . . 9 (𝑢 = 𝑣 → ((𝑢‘0) = ℚ ↔ (𝑣‘0) = ℚ))
38 fveq2 6881 . . . . . . . . . 10 (𝑢 = 𝑣 → (lastS‘𝑢) = (lastS‘𝑣))
3938sseq2d 3969 . . . . . . . . 9 (𝑢 = 𝑣 → (((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢) ↔ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑣)))
4037, 39anbi12d 643 . . . . . . . 8 (𝑢 = 𝑣 → (((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢)) ↔ ((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑣))))
41 simpllr 787 . . . . . . . . 9 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → 𝑣 ∈ ( < Chain (SubDRing‘ℂfld)))
4241adantr 485 . . . . . . . 8 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → 𝑣 ∈ ( < Chain (SubDRing‘ℂfld)))
43 simpllr 787 . . . . . . . . 9 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → (𝑣‘0) = ℚ)
44 simpr 489 . . . . . . . . . . . 12 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣))
4544unssad 4146 . . . . . . . . . . 11 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → (𝐶𝑁) ⊆ (lastS‘𝑣))
4645adantr 485 . . . . . . . . . 10 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → (𝐶𝑁) ⊆ (lastS‘𝑣))
47 simplr 780 . . . . . . . . . . . 12 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣))
4847unssbd 4147 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → 𝑔 ⊆ (lastS‘𝑣))
49 simpr 489 . . . . . . . . . . . 12 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → 𝑦 ∈ (lastS‘𝑣))
5049snssd 4752 . . . . . . . . . . 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 520 . . . . . . . 8 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → ((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑣)))
5440, 42, 53rspcedvdw 3584 . . . . . . 7 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ (lastS‘𝑣)) → ∃𝑢 ∈ ( < Chain (SubDRing‘ℂfld))((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢)))
55 fveq1 6880 . . . . . . . . . 10 (𝑢 = (𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩) → (𝑢‘0) = ((𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)‘0))
5655eqeq1d 2765 . . . . . . . . 9 (𝑢 = (𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩) → ((𝑢‘0) = ℚ ↔ ((𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)‘0) = ℚ))
57 fveq2 6881 . . . . . . . . . 10 (𝑢 = (𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩) → (lastS‘𝑢) = (lastS‘(𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)))
5857sseq2d 3969 . . . . . . . . 9 (𝑢 = (𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩) → (((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢) ↔ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘(𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩))))
5956, 58anbi12d 643 . . . . . . . 8 (𝑢 = (𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩) → (((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢)) ↔ (((𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘(𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)))))
60 cnfldbas 21535 . . . . . . . . . 10 ℂ = (Base‘ℂfld)
61 cndrng 21560 . . . . . . . . . . 11 fld ∈ DivRing
6261a1i 11 . . . . . . . . . 10 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ℂfld ∈ DivRing)
6341chnwrd 18668 . . . . . . . . . . . . . 14 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → 𝑣 ∈ Word (SubDRing‘ℂfld))
64 simpr 489 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑣 = ∅) → 𝑣 = ∅)
6564fveq2d 6885 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑣 = ∅) → (lastS‘𝑣) = (lastS‘∅))
66 lsw0g 14608 . . . . . . . . . . . . . . . . . . 19 (lastS‘∅) = ∅
6765, 66eqtrdi 2814 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑣 = ∅) → (lastS‘𝑣) = ∅)
68 simplr 780 . . . . . . . . . . . . . . . . . . . 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 7864 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑁 ∈ ω → 𝑁 ∈ On)
7371, 72syl 18 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑𝑁 ∈ On)
7470, 73constr01 34141 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → {0, 1} ⊆ (𝐶𝑁))
75 c0ex 11204 . . . . . . . . . . . . . . . . . . . . . . . 24 0 ∈ V
7675prnz 4743 . . . . . . . . . . . . . . . . . . . . . . 23 {0, 1} ≠ ∅
77 ssn0 4362 . . . . . . . . . . . . . . . . . . . . . . 23 (({0, 1} ⊆ (𝐶𝑁) ∧ {0, 1} ≠ ∅) → (𝐶𝑁) ≠ ∅)
7874, 76, 77sylancl 597 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (𝐶𝑁) ≠ ∅)
79 ssn0 4362 . . . . . . . . . . . . . . . . . . . . . 22 (((𝐶𝑁) ⊆ ((𝐶𝑁) ∪ 𝑔) ∧ (𝐶𝑁) ≠ ∅) → ((𝐶𝑁) ∪ 𝑔) ≠ ∅)
8069, 78, 79sylancr 598 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝐶𝑁) ∪ 𝑔) ≠ ∅)
8180ad2antrr 738 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑣 = ∅) → ((𝐶𝑁) ∪ 𝑔) ≠ ∅)
82 ssn0 4362 . . . . . . . . . . . . . . . . . . . 20 ((((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣) ∧ ((𝐶𝑁) ∪ 𝑔) ≠ ∅) → (lastS‘𝑣) ≠ ∅)
8368, 81, 82syl2anc 595 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑣 = ∅) → (lastS‘𝑣) ≠ ∅)
8483neneqd 2963 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑣 = ∅) → ¬ (lastS‘𝑣) = ∅)
8567, 84pm2.65da 828 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → ¬ 𝑣 = ∅)
8685neqned 2965 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → 𝑣 ≠ ∅)
8786ad4antr 744 . . . . . . . . . . . . . . 15 ((((((𝜑 ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ 𝑔 ⊆ (𝐶‘suc 𝑁)) → 𝑣 ≠ ∅)
8887an62ds 32812 . . . . . . . . . . . . . 14 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → 𝑣 ≠ ∅)
89 lswcl 14610 . . . . . . . . . . . . . 14 ((𝑣 ∈ Word (SubDRing‘ℂfld) ∧ 𝑣 ≠ ∅) → (lastS‘𝑣) ∈ (SubDRing‘ℂfld))
9063, 88, 89syl2anc 595 . . . . . . . . . . . . 13 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → (lastS‘𝑣) ∈ (SubDRing‘ℂfld))
9190adantr 485 . . . . . . . . . . . 12 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (lastS‘𝑣) ∈ (SubDRing‘ℂfld))
9260sdrgss 20905 . . . . . . . . . . . 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 7805 . . . . . . . . . . . . . . . 16 (𝑁 ∈ On → suc 𝑁 ∈ On)
9573, 94syl 18 . . . . . . . . . . . . . . 15 (𝜑 → suc 𝑁 ∈ On)
9670, 95constrsscn 34139 . . . . . . . . . . . . . 14 (𝜑 → (𝐶‘suc 𝑁) ⊆ ℂ)
9796ad6antr 748 . . . . . . . . . . . . 13 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (𝐶‘suc 𝑁) ⊆ ℂ)
98 simp-4r 795 . . . . . . . . . . . . . . 15 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔))
9998eldifad 3917 . . . . . . . . . . . . . 14 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → 𝑦 ∈ (𝐶‘suc 𝑁))
10099adantr 485 . . . . . . . . . . . . 13 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → 𝑦 ∈ (𝐶‘suc 𝑁))
10197, 100sseldd 3938 . . . . . . . . . . . 12 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → 𝑦 ∈ ℂ)
102101snssd 4752 . . . . . . . . . . 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 33644 . . . . . . . . 9 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})) ∈ (SubDRing‘ℂfld))
10541adantr 485 . . . . . . . . 9 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → 𝑣 ∈ ( < Chain (SubDRing‘ℂfld)))
10691elexd 3478 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (lastS‘𝑣) ∈ V)
107104elexd 3478 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})) ∈ V)
108 eqid 2763 . . . . . . . . . . . 12 (ℂflds (lastS‘𝑣)) = (ℂflds (lastS‘𝑣))
109 eqid 2763 . . . . . . . . . . . 12 (ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))) = (ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))
110 cnfldfld 33671 . . . . . . . . . . . . 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 34067 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))/FldExt(ℂflds (lastS‘𝑣)))
113 simpr 489 . . . . . . . . . . 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 5118 . . . . . . . . . . . . . . 15 (𝐸/FldExt𝐹 ↔ (ℂflds 𝑒)/FldExt(ℂflds 𝑓))
117 oveq2 7418 . . . . . . . . . . . . . . . . 17 (𝑒 = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})) → (ℂflds 𝑒) = (ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))))
118117adantl 486 . . . . . . . . . . . . . . . 16 ((𝑓 = (lastS‘𝑣) ∧ 𝑒 = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))) → (ℂflds 𝑒) = (ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))))
119 oveq2 7418 . . . . . . . . . . . . . . . . 17 (𝑓 = (lastS‘𝑣) → (ℂflds 𝑓) = (ℂflds (lastS‘𝑣)))
120119adantr 485 . . . . . . . . . . . . . . . 16 ((𝑓 = (lastS‘𝑣) ∧ 𝑒 = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))) → (ℂflds 𝑓) = (ℂflds (lastS‘𝑣)))
121118, 120breq12d 5122 . . . . . . . . . . . . . . 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 7422 . . . . . . . . . . . . . . . 16 (𝐸[:]𝐹) = ((ℂflds 𝑒)[:](ℂflds 𝑓))
124118, 120oveq12d 7428 . . . . . . . . . . . . . . . 16 ((𝑓 = (lastS‘𝑣) ∧ 𝑒 = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))) → ((ℂflds 𝑒)[:](ℂflds 𝑓)) = ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))))
125123, 124eqtrid 2810 . . . . . . . . . . . . . . 15 ((𝑓 = (lastS‘𝑣) ∧ 𝑒 = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))) → (𝐸[:]𝐹) = ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))))
126125eqeq1d 2765 . . . . . . . . . . . . . 14 ((𝑓 = (lastS‘𝑣) ∧ 𝑒 = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))) → ((𝐸[:]𝐹) = 2 ↔ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2))
127122, 126anbi12d 643 . . . . . . . . . . . . 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 5518 . . . . . . . . . . . 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 482 . . . . . . . . . . 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 851 . . . . . . . . . 10 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (lastS‘𝑣) < (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))
132131olcd 887 . . . . . . . . 9 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (𝑣 = ∅ ∨ (lastS‘𝑣) < (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))))
133104, 105, 132chnccats1 18685 . . . . . . . 8 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩) ∈ ( < Chain (SubDRing‘ℂfld)))
13463adantr 485 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → 𝑣 ∈ Word (SubDRing‘ℂfld))
135104s1cld 14646 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩ ∈ Word (SubDRing‘ℂfld))
136 hashgt0 14429 . . . . . . . . . . . . 13 ((𝑣 ∈ ( < Chain (SubDRing‘ℂfld)) ∧ 𝑣 ≠ ∅) → 0 < (♯‘𝑣))
13741, 88, 136syl2anc 595 . . . . . . . . . . . 12 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → 0 < (♯‘𝑣))
138137adantr 485 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → 0 < (♯‘𝑣))
139 ccatfv0 14626 . . . . . . . . . . 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 787 . . . . . . . . . 10 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (𝑣‘0) = ℚ)
142140, 141eqtrd 2798 . . . . . . . . 9 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ((𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)‘0) = ℚ)
14345adantr 485 . . . . . . . . . . . . 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 780 . . . . . . . . . . . . . . 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 33643 . . . . . . . . . . 11 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ((lastS‘𝑣) ∪ {𝑦}) ⊆ (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))
155153, 154sstrd 3947 . . . . . . . . . 10 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))
156 lswccats1 14677 . . . . . . . . . . 11 ((𝑣 ∈ Word (SubDRing‘ℂfld) ∧ (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})) ∈ (SubDRing‘ℂfld)) → (lastS‘(𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)) = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))
157134, 104, 156syl2anc 595 . . . . . . . . . 10 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → (lastS‘(𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)) = (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))
158155, 157sseqtrrd 3974 . . . . . . . . 9 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘(𝑣 ++ ⟨“(ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦}))”⟩)))
159142, 158jca 520 . . . . . . . 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 3584 . . . . . . 7 (((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) ∧ ((ℂflds (ℂfld fldGen ((lastS‘𝑣) ∪ {𝑦})))[:](ℂflds (lastS‘𝑣))) = 2) → ∃𝑢 ∈ ( < Chain (SubDRing‘ℂfld))((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢)))
16173ad5antr 746 . . . . . . . 8 ((((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ (𝑣‘0) = ℚ) ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → 𝑁 ∈ On)
16270, 108, 109, 90, 161, 45, 99constrelextdg2 34146 . . . . . . 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 471 . . . . 5 (((((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) ∧ 𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ ((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣))) → ∃𝑢 ∈ ( < Chain (SubDRing‘ℂfld))((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢)))
165164rexlimdva2 3168 . . . 4 (((𝜑𝑔 ⊆ (𝐶‘suc 𝑁)) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔)) → (∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → ∃𝑢 ∈ ( < Chain (SubDRing‘ℂfld))((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢))))
166165anasss 471 . . 3 ((𝜑 ∧ (𝑔 ⊆ (𝐶‘suc 𝑁) ∧ 𝑦 ∈ ((𝐶‘suc 𝑁) ∖ 𝑔))) → (∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ 𝑔) ⊆ (lastS‘𝑣)) → ∃𝑢 ∈ ( < Chain (SubDRing‘ℂfld))((𝑢‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝑔 ∪ {𝑦})) ⊆ (lastS‘𝑢))))
167 peano2 7882 . . . . 5 (𝑁 ∈ ω → suc 𝑁 ∈ ω)
16871, 167syl 18 . . . 4 (𝜑 → suc 𝑁 ∈ ω)
16970, 168constrfin 34145 . . 3 (𝜑 → (𝐶‘suc 𝑁) ∈ Fin)
1704, 8, 19, 23, 35, 166, 169findcard2d 9147 . 2 (𝜑 → ∃𝑣 ∈ ( < Chain (SubDRing‘ℂfld))((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣)))
171 simpr 489 . . . . . 6 (((𝜑𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣)) → ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣))
172171unssbd 4147 . . . . 5 (((𝜑𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) ∧ ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣)) → (𝐶‘suc 𝑁) ⊆ (lastS‘𝑣))
173172ex 417 . . . 4 ((𝜑𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) → (((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣) → (𝐶‘suc 𝑁) ⊆ (lastS‘𝑣)))
174173anim2d 623 . . 3 ((𝜑𝑣 ∈ ( < Chain (SubDRing‘ℂfld))) → (((𝑣‘0) = ℚ ∧ ((𝐶𝑁) ∪ (𝐶‘suc 𝑁)) ⊆ (lastS‘𝑣)) → ((𝑣‘0) = ℚ ∧ (𝐶‘suc 𝑁) ⊆ (lastS‘𝑣))))
175174reximdva 3178 . 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 400  w3o 1102  w3a 1103   = wceq 1570  wcel 2143  wne 2958  wrex 3089  {crab 3416  Vcvv 3455  cdif 3902  cun 3903  wss 3905  c0 4286  {csn 4589  {cpr 4591   class class class wbr 5109  {copab 5173  cmpt 5192  Oncon0 6360  suc csuc 6362  cfv 6536  (class class class)co 7410  ωcom 7858  reccrdg 8392  cc 11102  cr 11103  0cc0 11104  1c1 11105   + caddc 11107   · cmul 11109   < clt 11247  cmin 11445  2c2 12299  cq 12976  chash 14371  Word cword 14555  lastSclsw 14604   ++ cconcat 14612  ⟨“cs1 14638  ccj 15152  cim 15154  abscabs 15290  s cress 17294   Chain cchn 18665  DivRingcdr 20836  Fieldcfield 20837  SubDRingcsdrg 20898  fldccnfld 21531   fldGen cfldgen 33640  /FldExtcfldext 34037  [:]cextdg 34039
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-reg 9550  ax-inf2 9606  ax-ac2 10451  ax-cnex 11160  ax-resscn 11161  ax-1cn 11162  ax-icn 11163  ax-addcl 11164  ax-addrcl 11165  ax-mulcl 11166  ax-mulrcl 11167  ax-mulcom 11168  ax-addass 11169  ax-mulass 11170  ax-distr 11171  ax-i2m1 11172  ax-1ne0 11173  ax-1rid 11174  ax-rnegex 11175  ax-rrecex 11176  ax-cnre 11177  ax-pre-lttri 11178  ax-pre-lttrn 11179  ax-pre-ltadd 11180  ax-pre-mulgt0 11181  ax-pre-sup 11182  ax-addf 11183  ax-mulf 11184
This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-tp 4594  df-op 4596  df-uni 4873  df-int 4913  df-iun 4958  df-iin 4959  df-br 5110  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-se 5615  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-isom 6545  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-of 7674  df-ofr 7675  df-rpss 7720  df-om 7859  df-1st 7982  df-2nd 7983  df-supp 8153  df-tpos 8218  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-2o 8450  df-oadd 8453  df-er 8690  df-ec 8692  df-qs 8696  df-map 8822  df-pm 8823  df-ixp 8892  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-fsupp 9318  df-sup 9398  df-inf 9399  df-oi 9468  df-r1 9732  df-rank 9733  df-scott 9854  df-dju 9892  df-card 9930  df-acn 9933  df-ac 10105  df-pnf 11249  df-mnf 11250  df-xr 11251  df-ltxr 11252  df-le 11253  df-sub 11447  df-neg 11448  df-div 11876  df-nn 12238  df-2 12307  df-3 12308  df-4 12309  df-5 12310  df-6 12311  df-7 12312  df-8 12313  df-9 12314  df-n0 12509  df-xnn0 12582  df-z 12596  df-dec 12716  df-uz 12867  df-rp 13021  df-ico 13382  df-fz 13540  df-fzo 13688  df-seq 14043  df-exp 14103  df-hash 14372  df-word 14556  df-lsw 14605  df-concat 14613  df-s1 14639  df-cj 15155  df-re 15156  df-im 15157  df-sqrt 15291  df-abs 15292  df-struct 17211  df-sets 17228  df-slot 17246  df-ndx 17258  df-base 17274  df-ress 17295  df-plusg 17327  df-mulr 17328  df-starv 17329  df-sca 17330  df-vsca 17331  df-ip 17332  df-tset 17333  df-ple 17334  df-ocomp 17335  df-ds 17336  df-unif 17337  df-hom 17338  df-cco 17339  df-0g 17498  df-gsum 17499  df-prds 17504  df-pws 17506  df-imas 17566  df-qus 17567  df-mre 17642  df-mrc 17643  df-mri 17644  df-acs 17645  df-proset 18354  df-drs 18355  df-poset 18373  df-ipo 18588  df-chn 18666  df-mgm 18702  df-sgrp 18781  df-mnd 18797  df-mhm 18845  df-submnd 18846  df-grp 19007  df-minusg 19008  df-sbg 19009  df-mulg 19138  df-subg 19193  df-nsg 19194  df-eqg 19195  df-ghm 19288  df-gim 19333  df-cntz 19391  df-oppg 19420  df-lsm 19710  df-cmn 19856  df-abl 19857  df-mgp 20221  df-rng 20235  df-ur 20268  df-srg 20273  df-ring 20321  df-cring 20322  df-oppr 20424  df-dvdsr 20444  df-unit 20445  df-irred 20446  df-invr 20475  df-dvr 20488  df-rhm 20559  df-nzr 20619  df-subrng 20654  df-subrg 20678  df-rlreg 20802  df-domn 20803  df-idom 20804  df-drng 20838  df-field 20839  df-sdrg 20899  df-lmod 20992  df-lss 21062  df-lsp 21102  df-lmhm 21152  df-lmim 21153  df-lmic 21154  df-lbs 21205  df-lvec 21233  df-sra 21303  df-rgmod 21304  df-lidl 21341  df-rsp 21342  df-2idl 21398  df-lpidl 21499  df-lpir 21500  df-pid 21514  df-cnfld 21532  df-dsmm 21891  df-frlm 21906  df-uvc 21942  df-lindf 21965  df-linds 21966  df-assa 22012  df-asp 22013  df-ascl 22014  df-psr 22068  df-mvr 22069  df-mpl 22070  df-opsr 22072  df-evls 22234  df-evl 22235  df-psr1 22349  df-vr1 22350  df-ply1 22351  df-coe1 22352  df-evls1 22484  df-evl1 22485  df-mdeg 26221  df-deg1 26222  df-mon1 26297  df-uc1p 26298  df-q1p 26299  df-r1p 26300  df-ig1p 26301  df-fldgen 33641  df-mxidl 33752  df-dim 33999  df-fldext 34040  df-extdg 34041  df-irng 34083  df-minply 34099
This theorem is used by:  constrextdg2  34148
  Copyright terms: Public domain W3C validator