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

Theorem ccfldextdgrr 34347
Description: The degree of the field extension of the complex numbers over the real numbers is 2. (Suggested by GL, 4-Aug-2023.) (Contributed by Thierry Arnoux, 20-Aug-2023.)
Assertion
Ref Expression
ccfldextdgrr (ℂfld[:]ℝfld) = 2

Proof of Theorem ccfldextdgrr
Dummy variables 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 ccfldextrr 34321 . . 3 ℂfld/FldExtℝfld
2 extdgval 34328 . . 3 (ℂfld/FldExtℝfld → (ℂfld[:]ℝfld) = (dim‘((subringAlg ‘ℂfld)‘(Base‘ℝfld))))
31, 2ax-mp 5 . 2 (ℂfld[:]ℝfld) = (dim‘((subringAlg ‘ℂfld)‘(Base‘ℝfld)))
4 rebase 21913 . . . 4 ℝ = (Base‘ℝfld)
54fveq2i 6888 . . 3 ((subringAlg ‘ℂfld)‘ℝ) = ((subringAlg ‘ℂfld)‘(Base‘ℝfld))
65fveq2i 6888 . 2 (dim‘((subringAlg ‘ℂfld)‘ℝ)) = (dim‘((subringAlg ‘ℂfld)‘(Base‘ℝfld)))
7 ccfldsrarelvec 34346 . . . 4 ((subringAlg ‘ℂfld)‘ℝ) ∈ LVec
8 df-pr 4586 . . . . . 6 {1, i} = ({1} ∪ {i})
9 eqid 2760 . . . . . . . 8 (LSpan‘((subringAlg ‘ℂfld)‘ℝ)) = (LSpan‘((subringAlg ‘ℂfld)‘ℝ))
10 eqidd 2761 . . . . . . . . . 10 (⊤ → ((subringAlg ‘ℂfld)‘ℝ) = ((subringAlg ‘ℂfld)‘ℝ))
11 cnfld0 21703 . . . . . . . . . . 11 0 = (0g‘ℂfld)
1211a1i 11 . . . . . . . . . 10 (⊤ → 0 = (0g‘ℂfld))
13 ax-resscn 11258 . . . . . . . . . . . 12 ℝ ⊆ ℂ
14 cnfldbas 21683 . . . . . . . . . . . 12 ℂ = (Base‘ℂfld)
1513, 14sseqtri 3956 . . . . . . . . . . 11 ℝ ⊆ (Base‘ℂfld)
1615a1i 11 . . . . . . . . . 10 (⊤ → ℝ ⊆ (Base‘ℂfld))
1710, 12, 16sralmod0 21464 . . . . . . . . 9 (⊤ → 0 = (0g‘((subringAlg ‘ℂfld)‘ℝ)))
1817mptru 1576 . . . . . . . 8 0 = (0g‘((subringAlg ‘ℂfld)‘ℝ))
197a1i 11 . . . . . . . 8 (⊤ → ((subringAlg ‘ℂfld)‘ℝ) ∈ LVec)
20 ax-1cn 11259 . . . . . . . . . 10 1 ∈ ℂ
21 ax-1ne0 11270 . . . . . . . . . 10 1 ≠ 0
2210, 16srabase 21453 . . . . . . . . . . . . 13 (⊤ → (Base‘ℂfld) = (Base‘((subringAlg ‘ℂfld)‘ℝ)))
2322mptru 1576 . . . . . . . . . . . 12 (Base‘ℂfld) = (Base‘((subringAlg ‘ℂfld)‘ℝ))
2414, 23eqtri 2783 . . . . . . . . . . 11 ℂ = (Base‘((subringAlg ‘ℂfld)‘ℝ))
2524, 18lindssn 33976 . . . . . . . . . 10 ((((subringAlg ‘ℂfld)‘ℝ) ∈ LVec ∧ 1 ∈ ℂ ∧ 1 ≠ 0) → {1} ∈ (LIndS‘((subringAlg ‘ℂfld)‘ℝ)))
267, 20, 21, 25mp3an 1490 . . . . . . . . 9 {1} ∈ (LIndS‘((subringAlg ‘ℂfld)‘ℝ))
2726a1i 11 . . . . . . . 8 (⊤ → {1} ∈ (LIndS‘((subringAlg ‘ℂfld)‘ℝ)))
28 ax-icn 11260 . . . . . . . . . 10 i ∈ ℂ
29 ine0 11752 . . . . . . . . . 10 i ≠ 0
3024, 18lindssn 33976 . . . . . . . . . 10 ((((subringAlg ‘ℂfld)‘ℝ) ∈ LVec ∧ i ∈ ℂ ∧ i ≠ 0) → {i} ∈ (LIndS‘((subringAlg ‘ℂfld)‘ℝ)))
317, 28, 29, 30mp3an 1490 . . . . . . . . 9 {i} ∈ (LIndS‘((subringAlg ‘ℂfld)‘ℝ))
3231a1i 11 . . . . . . . 8 (⊤ → {i} ∈ (LIndS‘((subringAlg ‘ℂfld)‘ℝ)))
33 lveclmod 21382 . . . . . . . . . . . . . . 15 (((subringAlg ‘ℂfld)‘ℝ) ∈ LVec → ((subringAlg ‘ℂfld)‘ℝ) ∈ LMod)
347, 33ax-mp 5 . . . . . . . . . . . . . 14 ((subringAlg ‘ℂfld)‘ℝ) ∈ LMod
35 df-refld 21912 . . . . . . . . . . . . . . . 16 ℝfld = (ℂfld ↾s ℝ)
3610, 16srasca 21456 . . . . . . . . . . . . . . . . 17 (⊤ → (ℂfld ↾s ℝ) = (Scalar‘((subringAlg ‘ℂfld)‘ℝ)))
3736mptru 1576 . . . . . . . . . . . . . . . 16 (ℂfld ↾s ℝ) = (Scalar‘((subringAlg ‘ℂfld)‘ℝ))
3835, 37eqtri 2783 . . . . . . . . . . . . . . 15 ℝfld = (Scalar‘((subringAlg ‘ℂfld)‘ℝ))
39 cnfldmul 21687 . . . . . . . . . . . . . . . 16 · = (.r‘ℂfld)
4010, 16sravsca 21457 . . . . . . . . . . . . . . . . 17 (⊤ → (.r‘ℂfld) = ( ·𝑠 ‘((subringAlg ‘ℂfld)‘ℝ)))
4140mptru 1576 . . . . . . . . . . . . . . . 16 (.r‘ℂfld) = ( ·𝑠 ‘((subringAlg ‘ℂfld)‘ℝ))
4239, 41eqtri 2783 . . . . . . . . . . . . . . 15 · = ( ·𝑠 ‘((subringAlg ‘ℂfld)‘ℝ))
4338, 4, 24, 42, 9ellspsn 21279 . . . . . . . . . . . . . 14 ((((subringAlg ‘ℂfld)‘ℝ) ∈ LMod ∧ 1 ∈ ℂ) → (𝑧 ∈ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{1}) ↔ ∃𝑥 ∈ ℝ 𝑧 = (𝑥 · 1)))
4434, 20, 43mp2an 705 . . . . . . . . . . . . 13 (𝑧 ∈ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{1}) ↔ ∃𝑥 ∈ ℝ 𝑧 = (𝑥 · 1))
4538, 4, 24, 42, 9ellspsn 21279 . . . . . . . . . . . . . 14 ((((subringAlg ‘ℂfld)‘ℝ) ∈ LMod ∧ i ∈ ℂ) → (𝑧 ∈ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{i}) ↔ ∃𝑦 ∈ ℝ 𝑧 = (𝑦 · i)))
4634, 28, 45mp2an 705 . . . . . . . . . . . . 13 (𝑧 ∈ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{i}) ↔ ∃𝑦 ∈ ℝ 𝑧 = (𝑦 · i))
4744, 46anbi12i 640 . . . . . . . . . . . 12 ((𝑧 ∈ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{1}) ∧ 𝑧 ∈ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{i})) ↔ (∃𝑥 ∈ ℝ 𝑧 = (𝑥 · 1) ∧ ∃𝑦 ∈ ℝ 𝑧 = (𝑦 · i)))
48 reeanv 3234 . . . . . . . . . . . 12 (∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i)) ↔ (∃𝑥 ∈ ℝ 𝑧 = (𝑥 · 1) ∧ ∃𝑦 ∈ ℝ 𝑧 = (𝑦 · i)))
49 simprl 783 . . . . . . . . . . . . . . . . 17 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → 𝑧 = (𝑥 · 1))
50 simpll 779 . . . . . . . . . . . . . . . . . . 19 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → 𝑥 ∈ ℝ)
5150recnd 11338 . . . . . . . . . . . . . . . . . 18 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → 𝑥 ∈ ℂ)
5251mulridd 11327 . . . . . . . . . . . . . . . . 17 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → (𝑥 · 1) = 𝑥)
5349, 52eqtrd 2795 . . . . . . . . . . . . . . . 16 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → 𝑧 = 𝑥)
5453negeqd 11552 . . . . . . . . . . . . . . . . . . . . 21 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → -𝑧 = -𝑥)
55 simprr 785 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → 𝑧 = (𝑦 · i))
56 simplr 781 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → 𝑦 ∈ ℝ)
5756recnd 11338 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → 𝑦 ∈ ℂ)
5828a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → i ∈ ℂ)
5957, 58mulcomd 11331 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → (𝑦 · i) = (i · 𝑦))
6055, 59eqtrd 2795 . . . . . . . . . . . . . . . . . . . . 21 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → 𝑧 = (i · 𝑦))
6154, 60oveq12d 7438 . . . . . . . . . . . . . . . . . . . 20 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → ( -𝑧 + 𝑧) = ( -𝑥 + (i · 𝑦)))
6253, 51eqeltrd 2860 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → 𝑧 ∈ ℂ)
6362subidd 11658 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → (𝑧 − 𝑧) = 0)
6463negeqd 11552 . . . . . . . . . . . . . . . . . . . . 21 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → -(𝑧 − 𝑧) = -0)
6562, 62negsubdid 11685 . . . . . . . . . . . . . . . . . . . . 21 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → -(𝑧 − 𝑧) = ( -𝑧 + 𝑧))
66 neg0 11605 . . . . . . . . . . . . . . . . . . . . . 22 -0 = 0
6766a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → -0 = 0)
6864, 65, 673eqtr3d 2803 . . . . . . . . . . . . . . . . . . . 20 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → ( -𝑧 + 𝑧) = 0)
6961, 68eqtr3d 2797 . . . . . . . . . . . . . . . . . . 19 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → ( -𝑥 + (i · 𝑦)) = 0)
7050renegcld 11744 . . . . . . . . . . . . . . . . . . . 20 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → -𝑥 ∈ ℝ)
71 creq0 33371 . . . . . . . . . . . . . . . . . . . 20 (( -𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (( -𝑥 = 0 ∧ 𝑦 = 0) ↔ ( -𝑥 + (i · 𝑦)) = 0))
7270, 56, 71syl2anc 596 . . . . . . . . . . . . . . . . . . 19 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → (( -𝑥 = 0 ∧ 𝑦 = 0) ↔ ( -𝑥 + (i · 𝑦)) = 0))
7369, 72mpbird 260 . . . . . . . . . . . . . . . . . 18 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → ( -𝑥 = 0 ∧ 𝑦 = 0))
7473simpld 500 . . . . . . . . . . . . . . . . 17 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → -𝑥 = 0)
7551, 74negcon1ad 11665 . . . . . . . . . . . . . . . 16 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → -0 = 𝑥)
7653, 75, 673eqtr2d 2801 . . . . . . . . . . . . . . 15 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i))) → 𝑧 = 0)
7776ex 418 . . . . . . . . . . . . . 14 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ((𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i)) → 𝑧 = 0))
7877rexlimivv 3204 . . . . . . . . . . . . 13 (∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i)) → 𝑧 = 0)
79 0red 11312 . . . . . . . . . . . . . 14 (𝑧 = 0 → 0 ∈ ℝ)
80 simpr 490 . . . . . . . . . . . . . . . . . 18 ((𝑧 = 0 ∧ 𝑥 = 0) → 𝑥 = 0)
8180oveq1d 7435 . . . . . . . . . . . . . . . . 17 ((𝑧 = 0 ∧ 𝑥 = 0) → (𝑥 · 1) = (0 · 1))
8281eqeq2d 2771 . . . . . . . . . . . . . . . 16 ((𝑧 = 0 ∧ 𝑥 = 0) → (𝑧 = (𝑥 · 1) ↔ 𝑧 = (0 · 1)))
8382anbi1d 643 . . . . . . . . . . . . . . 15 ((𝑧 = 0 ∧ 𝑥 = 0) → ((𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i)) ↔ (𝑧 = (0 · 1) ∧ 𝑧 = (𝑦 · i))))
8483rexbidv 3186 . . . . . . . . . . . . . 14 ((𝑧 = 0 ∧ 𝑥 = 0) → (∃𝑦 ∈ ℝ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i)) ↔ ∃𝑦 ∈ ℝ (𝑧 = (0 · 1) ∧ 𝑧 = (𝑦 · i))))
85 simpr 490 . . . . . . . . . . . . . . . . . 18 ((𝑧 = 0 ∧ 𝑦 = 0) → 𝑦 = 0)
8685oveq1d 7435 . . . . . . . . . . . . . . . . 17 ((𝑧 = 0 ∧ 𝑦 = 0) → (𝑦 · i) = (0 · i))
8786eqeq2d 2771 . . . . . . . . . . . . . . . 16 ((𝑧 = 0 ∧ 𝑦 = 0) → (𝑧 = (𝑦 · i) ↔ 𝑧 = (0 · i)))
8887anbi2d 642 . . . . . . . . . . . . . . 15 ((𝑧 = 0 ∧ 𝑦 = 0) → ((𝑧 = (0 · 1) ∧ 𝑧 = (𝑦 · i)) ↔ (𝑧 = (0 · 1) ∧ 𝑧 = (0 · i))))
8920mul02i 11500 . . . . . . . . . . . . . . . . . 18 (0 · 1) = 0
9089eqeq2i 2773 . . . . . . . . . . . . . . . . 17 (𝑧 = (0 · 1) ↔ 𝑧 = 0)
9190biimpri 231 . . . . . . . . . . . . . . . 16 (𝑧 = 0 → 𝑧 = (0 · 1))
9228mul02i 11500 . . . . . . . . . . . . . . . . . 18 (0 · i) = 0
9392eqeq2i 2773 . . . . . . . . . . . . . . . . 17 (𝑧 = (0 · i) ↔ 𝑧 = 0)
9493biimpri 231 . . . . . . . . . . . . . . . 16 (𝑧 = 0 → 𝑧 = (0 · i))
9591, 94jca 521 . . . . . . . . . . . . . . 15 (𝑧 = 0 → (𝑧 = (0 · 1) ∧ 𝑧 = (0 · i)))
9679, 88, 95rspcedvd 3578 . . . . . . . . . . . . . 14 (𝑧 = 0 → ∃𝑦 ∈ ℝ (𝑧 = (0 · 1) ∧ 𝑧 = (𝑦 · i)))
9779, 84, 96rspcedvd 3578 . . . . . . . . . . . . 13 (𝑧 = 0 → ∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i)))
9878, 97impbii 212 . . . . . . . . . . . 12 (∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ (𝑧 = (𝑥 · 1) ∧ 𝑧 = (𝑦 · i)) ↔ 𝑧 = 0)
9947, 48, 983bitr2i 302 . . . . . . . . . . 11 ((𝑧 ∈ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{1}) ∧ 𝑧 ∈ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{i})) ↔ 𝑧 = 0)
100 elin 4093 . . . . . . . . . . 11 (𝑧 ∈ (((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{1}) ∩ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{i})) ↔ (𝑧 ∈ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{1}) ∧ 𝑧 ∈ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{i})))
101 velsn 4599 . . . . . . . . . . 11 (𝑧 ∈ {0} ↔ 𝑧 = 0)
10299, 100, 1013bitr4i 306 . . . . . . . . . 10 (𝑧 ∈ (((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{1}) ∩ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{i})) ↔ 𝑧 ∈ {0})
103102eqriv 2757 . . . . . . . . 9 (((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{1}) ∩ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{i})) = {0}
104103a1i 11 . . . . . . . 8 (⊤ → (((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{1}) ∩ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{i})) = {0})
1059, 18, 19, 27, 32, 104lindsun 34300 . . . . . . 7 (⊤ → ({1} ∪ {i}) ∈ (LIndS‘((subringAlg ‘ℂfld)‘ℝ)))
106105mptru 1576 . . . . . 6 ({1} ∪ {i}) ∈ (LIndS‘((subringAlg ‘ℂfld)‘ℝ))
1078, 106eqeltri 2856 . . . . 5 {1, i} ∈ (LIndS‘((subringAlg ‘ℂfld)‘ℝ))
108 cnfldadd 21685 . . . . . . . . . 10 + = (+g‘ℂfld)
10910, 16sraaddg 21454 . . . . . . . . . . 11 (⊤ → (+g‘ℂfld) = (+g‘((subringAlg ‘ℂfld)‘ℝ)))
110109mptru 1576 . . . . . . . . . 10 (+g‘ℂfld) = (+g‘((subringAlg ‘ℂfld)‘ℝ))
111108, 110eqtri 2783 . . . . . . . . 9 + = (+g‘((subringAlg ‘ℂfld)‘ℝ))
11234a1i 11 . . . . . . . . 9 (⊤ → ((subringAlg ‘ℂfld)‘ℝ) ∈ LMod)
113 1cnd 11303 . . . . . . . . 9 (⊤ → 1 ∈ ℂ)
11428a1i 11 . . . . . . . . 9 (⊤ → i ∈ ℂ)
11524, 111, 38, 4, 42, 9, 112, 113, 114lspprel 21370 . . . . . . . 8 (⊤ → (𝑧 ∈ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{1, i}) ↔ ∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 𝑧 = ((𝑥 · 1) + (𝑦 · i))))
116115mptru 1576 . . . . . . 7 (𝑧 ∈ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{1, i}) ↔ ∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 𝑧 = ((𝑥 · 1) + (𝑦 · i)))
117 simpl 488 . . . . . . . . . . . . 13 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → 𝑥 ∈ ℝ)
118117recnd 11338 . . . . . . . . . . . 12 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → 𝑥 ∈ ℂ)
119 1cnd 11303 . . . . . . . . . . . 12 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → 1 ∈ ℂ)
120118, 119mulcld 11330 . . . . . . . . . . 11 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝑥 · 1) ∈ ℂ)
121 simpr 490 . . . . . . . . . . . . 13 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
122121recnd 11338 . . . . . . . . . . . 12 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℂ)
12328a1i 11 . . . . . . . . . . . 12 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → i ∈ ℂ)
124122, 123mulcld 11330 . . . . . . . . . . 11 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝑦 · i) ∈ ℂ)
125120, 124addcld 11329 . . . . . . . . . 10 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ((𝑥 · 1) + (𝑦 · i)) ∈ ℂ)
126 eleq1 2848 . . . . . . . . . 10 (𝑧 = ((𝑥 · 1) + (𝑦 · i)) → (𝑧 ∈ ℂ ↔ ((𝑥 · 1) + (𝑦 · i)) ∈ ℂ))
127125, 126syl5ibrcom 250 . . . . . . . . 9 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝑧 = ((𝑥 · 1) + (𝑦 · i)) → 𝑧 ∈ ℂ))
128127rexlimivv 3204 . . . . . . . 8 (∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 𝑧 = ((𝑥 · 1) + (𝑦 · i)) → 𝑧 ∈ ℂ)
129 recl 15278 . . . . . . . . 9 (𝑧 ∈ ℂ → (ℜ‘𝑧) ∈ ℝ)
130 simpr 490 . . . . . . . . . . . . 13 ((𝑧 ∈ ℂ ∧ 𝑥 = (ℜ‘𝑧)) → 𝑥 = (ℜ‘𝑧))
131130oveq1d 7435 . . . . . . . . . . . 12 ((𝑧 ∈ ℂ ∧ 𝑥 = (ℜ‘𝑧)) → (𝑥 · 1) = ((ℜ‘𝑧) · 1))
132131oveq1d 7435 . . . . . . . . . . 11 ((𝑧 ∈ ℂ ∧ 𝑥 = (ℜ‘𝑧)) → ((𝑥 · 1) + (𝑦 · i)) = (((ℜ‘𝑧) · 1) + (𝑦 · i)))
133132eqeq2d 2771 . . . . . . . . . 10 ((𝑧 ∈ ℂ ∧ 𝑥 = (ℜ‘𝑧)) → (𝑧 = ((𝑥 · 1) + (𝑦 · i)) ↔ 𝑧 = (((ℜ‘𝑧) · 1) + (𝑦 · i))))
134133rexbidv 3186 . . . . . . . . 9 ((𝑧 ∈ ℂ ∧ 𝑥 = (ℜ‘𝑧)) → (∃𝑦 ∈ ℝ 𝑧 = ((𝑥 · 1) + (𝑦 · i)) ↔ ∃𝑦 ∈ ℝ 𝑧 = (((ℜ‘𝑧) · 1) + (𝑦 · i))))
135 imcl 15279 . . . . . . . . . 10 (𝑧 ∈ ℂ → (ℑ‘𝑧) ∈ ℝ)
136 simpr 490 . . . . . . . . . . . . 13 ((𝑧 ∈ ℂ ∧ 𝑦 = (ℑ‘𝑧)) → 𝑦 = (ℑ‘𝑧))
137136oveq1d 7435 . . . . . . . . . . . 12 ((𝑧 ∈ ℂ ∧ 𝑦 = (ℑ‘𝑧)) → (𝑦 · i) = ((ℑ‘𝑧) · i))
138137oveq2d 7436 . . . . . . . . . . 11 ((𝑧 ∈ ℂ ∧ 𝑦 = (ℑ‘𝑧)) → (((ℜ‘𝑧) · 1) + (𝑦 · i)) = (((ℜ‘𝑧) · 1) + ((ℑ‘𝑧) · i)))
139138eqeq2d 2771 . . . . . . . . . 10 ((𝑧 ∈ ℂ ∧ 𝑦 = (ℑ‘𝑧)) → (𝑧 = (((ℜ‘𝑧) · 1) + (𝑦 · i)) ↔ 𝑧 = (((ℜ‘𝑧) · 1) + ((ℑ‘𝑧) · i))))
140 replim 15284 . . . . . . . . . . 11 (𝑧 ∈ ℂ → 𝑧 = ((ℜ‘𝑧) + (i · (ℑ‘𝑧))))
141129recnd 11338 . . . . . . . . . . . . 13 (𝑧 ∈ ℂ → (ℜ‘𝑧) ∈ ℂ)
142141mulridd 11327 . . . . . . . . . . . 12 (𝑧 ∈ ℂ → ((ℜ‘𝑧) · 1) = (ℜ‘𝑧))
143135recnd 11338 . . . . . . . . . . . . 13 (𝑧 ∈ ℂ → (ℑ‘𝑧) ∈ ℂ)
14428a1i 11 . . . . . . . . . . . . 13 (𝑧 ∈ ℂ → i ∈ ℂ)
145143, 144mulcomd 11331 . . . . . . . . . . . 12 (𝑧 ∈ ℂ → ((ℑ‘𝑧) · i) = (i · (ℑ‘𝑧)))
146142, 145oveq12d 7438 . . . . . . . . . . 11 (𝑧 ∈ ℂ → (((ℜ‘𝑧) · 1) + ((ℑ‘𝑧) · i)) = ((ℜ‘𝑧) + (i · (ℑ‘𝑧))))
147140, 146eqtr4d 2798 . . . . . . . . . 10 (𝑧 ∈ ℂ → 𝑧 = (((ℜ‘𝑧) · 1) + ((ℑ‘𝑧) · i)))
148135, 139, 147rspcedvd 3578 . . . . . . . . 9 (𝑧 ∈ ℂ → ∃𝑦 ∈ ℝ 𝑧 = (((ℜ‘𝑧) · 1) + (𝑦 · i)))
149129, 134, 148rspcedvd 3578 . . . . . . . 8 (𝑧 ∈ ℂ → ∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 𝑧 = ((𝑥 · 1) + (𝑦 · i)))
150128, 149impbii 212 . . . . . . 7 (∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 𝑧 = ((𝑥 · 1) + (𝑦 · i)) ↔ 𝑧 ∈ ℂ)
151116, 150bitri 278 . . . . . 6 (𝑧 ∈ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{1, i}) ↔ 𝑧 ∈ ℂ)
152151eqriv 2757 . . . . 5 ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{1, i}) = ℂ
153 eqid 2760 . . . . . 6 (LBasis‘((subringAlg ‘ℂfld)‘ℝ)) = (LBasis‘((subringAlg ‘ℂfld)‘ℝ))
15424, 153, 9islbs4 22139 . . . . 5 ({1, i} ∈ (LBasis‘((subringAlg ‘ℂfld)‘ℝ)) ↔ ({1, i} ∈ (LIndS‘((subringAlg ‘ℂfld)‘ℝ)) ∧ ((LSpan‘((subringAlg ‘ℂfld)‘ℝ))‘{1, i}) = ℂ))
155107, 152, 154mpbir2an 724 . . . 4 {1, i} ∈ (LBasis‘((subringAlg ‘ℂfld)‘ℝ))
156153dimval 34276 . . . 4 ((((subringAlg ‘ℂfld)‘ℝ) ∈ LVec ∧ {1, i} ∈ (LBasis‘((subringAlg ‘ℂfld)‘ℝ))) → (dim‘((subringAlg ‘ℂfld)‘ℝ)) = (♯‘{1, i}))
1577, 155, 156mp2an 705 . . 3 (dim‘((subringAlg ‘ℂfld)‘ℝ)) = (♯‘{1, i})
158 1nei 33372 . . . 4 1 ≠ i
159 hashprg 14540 . . . . 5 ((1 ∈ ℂ ∧ i ∈ ℂ) → (1 ≠ i ↔ (♯‘{1, i}) = 2))
16020, 28, 159mp2an 705 . . . 4 (1 ≠ i ↔ (♯‘{1, i}) = 2)
161158, 160mpbi 233 . . 3 (♯‘{1, i}) = 2
162157, 161eqtri 2783 . 2 (dim‘((subringAlg ‘ℂfld)‘ℝ)) = 2
1633, 6, 1623eqtr2i 2789 1 (ℂfld[:]ℝfld) = 2
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   ↔ wb 209   ∧ wa 401   = wceq 1569  ⊤wtru 1570   ∈ wcel 2144   ≠ wne 2955  ∃wrex 3086   ⊆ wss 3895   ∩ cin 4089   ∪ cun 4149  {csn 4583  {cpr 4585   class class class wbr 5102  ‘cfv 6538  (class class class)co 7420  ℂcc 11199  ℝcr 11200  0cc0 11201  1c1 11202  ici 11203   + caddc 11204   · cmul 11206   − cmin 11542   -cneg 11543  2c2 12398  ♯chash 14475  ℜcre 15265  ℑcim 15266  Basecbs 17388   ↾s cress 17409  +gcplusg 17429  .rcmulr 17430  Scalarcsca 17432   ·𝑠 cvsca 17433  0gc0g 17611  LModclmod 21136  LSpanclspn 21247  LBasisclbs 21350  LVecclvec 21378  subringAlg csra 21447  ℂfldccnfld 21679  ℝfldcrefld 21911  LIndSclinds 22112  dimcldim 34274  /FldExtcfldext 34313  [:]cextdg 34315
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7751  ax-reg 9587  ax-inf2 9643  ax-ac2 10542  ax-cnex 11257  ax-resscn 11258  ax-1cn 11259  ax-icn 11260  ax-addcl 11261  ax-addrcl 11262  ax-mulcl 11263  ax-mulrcl 11264  ax-mulcom 11265  ax-addass 11266  ax-mulass 11267  ax-distr 11268  ax-i2m1 11269  ax-1ne0 11270  ax-1rid 11271  ax-rnegex 11272  ax-rrecex 11273  ax-cnre 11274  ax-pre-lttri 11275  ax-pre-lttrn 11276  ax-pre-ltadd 11277  ax-pre-mulgt0 11278  ax-addf 11280  ax-mulf 11281
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-ss 3896  df-pss 4014  df-dif 4047  df-in 4091  df-un 4151  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-tp 4588  df-op 4590  df-uni 4867  df-int 4907  df-iun 4952  df-iin 4953  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5545  df-eprel 5550  df-po 5558  df-so 5559  df-fr 5603  df-se 5604  df-we 5605  df-xp 5656  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-rn 5661  df-res 5662  df-ima 5663  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7377  df-ov 7423  df-oprab 7424  df-mpo 7425  df-om 7878  df-1st 8001  df-2nd 8002  df-tpos 8244  df-frecs 8300  df-wrecs 8331  df-recs 8380  df-rdg 8419  df-1o 8477  df-2o 8478  df-oadd 8481  df-er 8718  df-map 8850  df-en 8975  df-dom 8976  df-sdom 8977  df-fin 8978  df-oi 9505  df-r1 9769  df-rank 9770  df-scott 9930  df-dju 9983  df-card 10021  df-acn 10024  df-ac 10196  df-pnf 11346  df-mnf 11347  df-xr 11348  df-ltxr 11349  df-le 11350  df-sub 11544  df-neg 11545  df-div 11975  df-nn 12337  df-2 12406  df-3 12407  df-4 12408  df-5 12409  df-6 12410  df-7 12411  df-8 12412  df-9 12413  df-n0 12608  df-xnn0 12681  df-z 12695  df-dec 12816  df-uz 12967  df-fz 13641  df-hash 14476  df-cj 15267  df-re 15268  df-im 15269  df-struct 17326  df-sets 17343  df-slot 17361  df-ndx 17373  df-base 17389  df-ress 17410  df-plusg 17442  df-mulr 17443  df-starv 17444  df-sca 17445  df-vsca 17446  df-ip 17447  df-tset 17448  df-ple 17449  df-ocomp 17450  df-ds 17451  df-unif 17452  df-0g 17613  df-mre 17757  df-mrc 17758  df-mri 17759  df-acs 17760  df-proset 18469  df-drs 18470  df-poset 18488  df-ipo 18703  df-mgm 18817  df-sgrp 18909  df-mnd 18925  df-submnd 18980  df-grp 19148  df-minusg 19149  df-sbg 19150  df-subg 19334  df-cntz 19532  df-lsm 19851  df-cmn 19997  df-abl 19998  df-mgp 20362  df-rng 20376  df-ur 20409  df-ring 20462  df-cring 20463  df-oppr 20568  df-dvdsr 20588  df-unit 20589  df-invr 20619  df-dvr 20632  df-subrng 20799  df-subrg 20823  df-drng 20983  df-field 20984  df-lmod 21138  df-lss 21208  df-lsp 21248  df-lbs 21351  df-lvec 21379  df-sra 21449  df-cnfld 21680  df-refld 21912  df-lindf 22113  df-linds 22114  df-dim 34275  df-fldext 34316  df-extdg 34317
This theorem is used by: (None)
  Copyright terms: Public domain W3C validator