Metamath Proof Explorer


Theorem fedgmul

Description: The multiplicativity formula for degrees of field extensions. Given E a field extension of F , itself a field extension of K , we have [ E : K ] = [ E : F ] [ F : K ] . Proposition 1.2 of Lang, p. 224. Here ( dimA ) is the degree of the extension E of K , ( dimB ) is the degree of the extension E of F , and ( dimC ) is the degree of the extension F of K . This proof is valid for infinite dimensions, and is actually valid for division ring extensions, not just field extensions. (Contributed by Thierry Arnoux, 25-Jul-2023) Remove dependency on ax-reg . (Revised by Timothy J. O'Malley, 15-Oct-2026)

Ref Expression
Hypotheses fedgmul.a ⊢ A = subringAlg ⁡ E ⁡ V
fedgmul.b ⊢ B = subringAlg ⁡ E ⁡ U
fedgmul.c ⊢ C = subringAlg ⁡ F ⁡ V
fedgmul.f ⊢ F = E ↾ 𝑠 U
fedgmul.k ⊢ K = E ↾ 𝑠 V
fedgmul.1 ⊢ φ → E ∈ DivRing
fedgmul.2 ⊢ φ → F ∈ DivRing
fedgmul.3 ⊢ φ → K ∈ DivRing
fedgmul.4 ⊢ φ → U ∈ SubRing ⁡ E
fedgmul.5 ⊢ φ → V ∈ SubRing ⁡ F
Assertion fedgmul ⊢ φ → dim ⁡ A = dim ⁡ B ⋅ 𝑒 dim ⁡ C

Proof

Step Hyp Ref Expression
1 fedgmul.a ⊢ A = subringAlg ⁡ E ⁡ V
2 fedgmul.b ⊢ B = subringAlg ⁡ E ⁡ U
3 fedgmul.c ⊢ C = subringAlg ⁡ F ⁡ V
4 fedgmul.f ⊢ F = E ↾ 𝑠 U
5 fedgmul.k ⊢ K = E ↾ 𝑠 V
6 fedgmul.1 ⊢ φ → E ∈ DivRing
7 fedgmul.2 ⊢ φ → F ∈ DivRing
8 fedgmul.3 ⊢ φ → K ∈ DivRing
9 fedgmul.4 ⊢ φ → U ∈ SubRing ⁡ E
10 fedgmul.5 ⊢ φ → V ∈ SubRing ⁡ F
11 4 subsubrg ⊢ U ∈ SubRing ⁡ E → V ∈ SubRing ⁡ F ↔ V ∈ SubRing ⁡ E ∧ V ⊆ U
12 11 biimpa ⊢ U ∈ SubRing ⁡ E ∧ V ∈ SubRing ⁡ F → V ∈ SubRing ⁡ E ∧ V ⊆ U
13 9 10 12 syl2anc ⊢ φ → V ∈ SubRing ⁡ E ∧ V ⊆ U
14 13 simprd ⊢ φ → V ⊆ U
15 ressabs ⊢ U ∈ SubRing ⁡ E ∧ V ⊆ U → E ↾ 𝑠 U ↾ 𝑠 V = E ↾ 𝑠 V
16 9 14 15 syl2anc ⊢ φ → E ↾ 𝑠 U ↾ 𝑠 V = E ↾ 𝑠 V
17 4 oveq1i ⊢ F ↾ 𝑠 V = E ↾ 𝑠 U ↾ 𝑠 V
18 16 17 5 3eqtr4g ⊢ φ → F ↾ 𝑠 V = K
19 18 8 eqeltrd ⊢ φ → F ↾ 𝑠 V ∈ DivRing
20 eqid ⊢ F ↾ 𝑠 V = F ↾ 𝑠 V
21 3 20 sralvec ⊢ F ∈ DivRing ∧ F ↾ 𝑠 V ∈ DivRing ∧ V ∈ SubRing ⁡ F → C ∈ LVec
22 7 19 10 21 syl3anc ⊢ φ → C ∈ LVec
23 eqid ⊢ LBasis ⁡ C = LBasis ⁡ C
24 23 lbsex ⊢ C ∈ LVec → LBasis ⁡ C ≠ ∅
25 22 24 syl ⊢ φ → LBasis ⁡ C ≠ ∅
26 2 4 sralvec ⊢ E ∈ DivRing ∧ F ∈ DivRing ∧ U ∈ SubRing ⁡ E → B ∈ LVec
27 6 7 9 26 syl3anc ⊢ φ → B ∈ LVec
28 eqid ⊢ LBasis ⁡ B = LBasis ⁡ B
29 28 lbsex ⊢ B ∈ LVec → LBasis ⁡ B ≠ ∅
30 27 29 syl ⊢ φ → LBasis ⁡ B ≠ ∅
31 n0 ⊢ LBasis ⁡ B ≠ ∅ ↔ ∃ y y ∈ LBasis ⁡ B
32 30 31 sylib ⊢ φ → ∃ y y ∈ LBasis ⁡ B
33 32 adantr ⊢ φ ∧ x ∈ LBasis ⁡ C → ∃ y y ∈ LBasis ⁡ B
34 eqid ⊢ Base E = Base E
35 eqid ⊢ ⋅ E = ⋅ E
36 6 drngringd ⊢ φ → E ∈ Ring
37 36 ad4antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x → E ∈ Ring
38 simplr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → x ∈ LBasis ⁡ C
39 eqid ⊢ Base C = Base C
40 39 23 lbsss ⊢ x ∈ LBasis ⁡ C → x ⊆ Base C
41 38 40 syl ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → x ⊆ Base C
42 34 subrgss ⊢ U ∈ SubRing ⁡ E → U ⊆ Base E
43 9 42 syl ⊢ φ → U ⊆ Base E
44 4 34 ressbas2 ⊢ U ⊆ Base E → U = Base F
45 43 44 syl ⊢ φ → U = Base F
46 3 a1i ⊢ φ → C = subringAlg ⁡ F ⁡ V
47 eqid ⊢ Base F = Base F
48 47 subrgss ⊢ V ∈ SubRing ⁡ F → V ⊆ Base F
49 10 48 syl ⊢ φ → V ⊆ Base F
50 46 49 srabase ⊢ φ → Base F = Base C
51 45 50 eqtrd ⊢ φ → U = Base C
52 51 43 eqsstrrd ⊢ φ → Base C ⊆ Base E
53 52 ad2antrr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → Base C ⊆ Base E
54 41 53 sstrd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → x ⊆ Base E
55 54 ad2antrr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x → x ⊆ Base E
56 simpr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x → i ∈ x
57 55 56 sseldd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x → i ∈ Base E
58 simpr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → y ∈ LBasis ⁡ B
59 eqid ⊢ Base B = Base B
60 59 28 lbsss ⊢ y ∈ LBasis ⁡ B → y ⊆ Base B
61 58 60 syl ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → y ⊆ Base B
62 2 a1i ⊢ φ → B = subringAlg ⁡ E ⁡ U
63 62 43 srabase ⊢ φ → Base E = Base B
64 63 ad2antrr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → Base E = Base B
65 61 64 sseqtrrd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → y ⊆ Base E
66 65 ad2antrr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x → y ⊆ Base E
67 simplr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x → j ∈ y
68 66 67 sseldd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x → j ∈ Base E
69 34 35 37 57 68 ringcld ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x → i ⋅ E j ∈ Base E
70 1 a1i ⊢ φ → A = subringAlg ⁡ E ⁡ V
71 13 simpld ⊢ φ → V ∈ SubRing ⁡ E
72 34 subrgss ⊢ V ∈ SubRing ⁡ E → V ⊆ Base E
73 71 72 syl ⊢ φ → V ⊆ Base E
74 70 73 srabase ⊢ φ → Base E = Base A
75 74 ad4antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x → Base E = Base A
76 69 75 eleqtrd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x → i ⋅ E j ∈ Base A
77 76 anasss ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x → i ⋅ E j ∈ Base A
78 77 ralrimivva ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → ∀ j ∈ y ∀ i ∈ x i ⋅ E j ∈ Base A
79 oveq2 ⊢ w = j → t ⋅ E w = t ⋅ E j
80 oveq1 ⊢ t = i → t ⋅ E j = i ⋅ E j
81 79 80 cbvmpov ⊢ w ∈ y , t ∈ x ⟼ t ⋅ E w = j ∈ y , i ∈ x ⟼ i ⋅ E j
82 81 fmpo ⊢ ∀ j ∈ y ∀ i ∈ x i ⋅ E j ∈ Base A ↔ w ∈ y , t ∈ x ⟼ t ⋅ E w : y × x ⟶ Base A
83 78 82 sylib ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → w ∈ y , t ∈ x ⟼ t ⋅ E w : y × x ⟶ Base A
84 eqid ⊢ Base Scalar ⁡ B = Base Scalar ⁡ B
85 eqid ⊢ ⋅ B = ⋅ B
86 eqid ⊢ + B = + B
87 eqid ⊢ 0 Scalar ⁡ B = 0 Scalar ⁡ B
88 27 ad2antrr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → B ∈ LVec
89 88 ad5antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → B ∈ LVec
90 28 lbslinds ⊢ LBasis ⁡ B ⊆ LIndS ⁡ B
91 90 58 sselid ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → y ∈ LIndS ⁡ B
92 91 ad5antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → y ∈ LIndS ⁡ B
93 67 ad3antrrr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → j ∈ y
94 simpllr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → v ∈ y
95 62 43 srasca ⊢ φ → E ↾ 𝑠 U = Scalar ⁡ B
96 4 95 eqtrid ⊢ φ → F = Scalar ⁡ B
97 96 fveq2d ⊢ φ → Base F = Base Scalar ⁡ B
98 97 50 eqtr3d ⊢ φ → Base Scalar ⁡ B = Base C
99 98 ad2antrr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → Base Scalar ⁡ B = Base C
100 41 99 sseqtrrd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → x ⊆ Base Scalar ⁡ B
101 100 ad5antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → x ⊆ Base Scalar ⁡ B
102 simp-4r ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → i ∈ x
103 101 102 sseldd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → i ∈ Base Scalar ⁡ B
104 simplr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → u ∈ x
105 101 104 sseldd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → u ∈ Base Scalar ⁡ B
106 22 ad2antrr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → C ∈ LVec
107 eqid ⊢ LSpan ⁡ C = LSpan ⁡ C
108 39 23 107 islbs4 ⊢ x ∈ LBasis ⁡ C ↔ x ∈ LIndS ⁡ C ∧ LSpan ⁡ C ⁡ x = Base C
109 38 108 sylib ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → x ∈ LIndS ⁡ C ∧ LSpan ⁡ C ⁡ x = Base C
110 109 simpld ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → x ∈ LIndS ⁡ C
111 eqid ⊢ 0 C = 0 C
112 111 0nellinds ⊢ C ∈ LVec ∧ x ∈ LIndS ⁡ C → ¬ 0 C ∈ x
113 106 110 112 syl2anc ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → ¬ 0 C ∈ x
114 113 ad5antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → ¬ 0 C ∈ x
115 nelne2 ⊢ i ∈ x ∧ ¬ 0 C ∈ x → i ≠ 0 C
116 102 114 115 syl2anc ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → i ≠ 0 C
117 96 fveq2d ⊢ φ → 0 F = 0 Scalar ⁡ B
118 3 7 10 drgext0g ⊢ φ → 0 F = 0 C
119 117 118 eqtr3d ⊢ φ → 0 Scalar ⁡ B = 0 C
120 119 ad7antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → 0 Scalar ⁡ B = 0 C
121 116 120 neeqtrrd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → i ≠ 0 Scalar ⁡ B
122 simpr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u
123 ovexd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → i ⋅ E j ∈ V
124 81 ovmpt4g ⊢ j ∈ y ∧ i ∈ x ∧ i ⋅ E j ∈ V → j w ∈ y , t ∈ x ⟼ t ⋅ E w i = i ⋅ E j
125 93 102 123 124 syl3anc ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → j w ∈ y , t ∈ x ⟼ t ⋅ E w i = i ⋅ E j
126 2 6 9 drgextvsca ⊢ φ → ⋅ E = ⋅ B
127 126 oveqd ⊢ φ → i ⋅ E j = i ⋅ B j
128 127 ad7antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → i ⋅ E j = i ⋅ B j
129 125 128 eqtrd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → j w ∈ y , t ∈ x ⟼ t ⋅ E w i = i ⋅ B j
130 81 a1i ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ v ∈ y ∧ u ∈ x → w ∈ y , t ∈ x ⟼ t ⋅ E w = j ∈ y , i ∈ x ⟼ i ⋅ E j
131 simprr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ v ∈ y ∧ u ∈ x ∧ j = v ∧ i = u → i = u
132 simprl ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ v ∈ y ∧ u ∈ x ∧ j = v ∧ i = u → j = v
133 131 132 oveq12d ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ v ∈ y ∧ u ∈ x ∧ j = v ∧ i = u → i ⋅ E j = u ⋅ E v
134 simplr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ v ∈ y ∧ u ∈ x → v ∈ y
135 simpr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ v ∈ y ∧ u ∈ x → u ∈ x
136 ovexd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ v ∈ y ∧ u ∈ x → u ⋅ E v ∈ V
137 130 133 134 135 136 ovmpod ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ v ∈ y ∧ u ∈ x → v w ∈ y , t ∈ x ⟼ t ⋅ E w u = u ⋅ E v
138 137 adantllr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x → v w ∈ y , t ∈ x ⟼ t ⋅ E w u = u ⋅ E v
139 138 adantl3r ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x → v w ∈ y , t ∈ x ⟼ t ⋅ E w u = u ⋅ E v
140 139 adantr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → v w ∈ y , t ∈ x ⟼ t ⋅ E w u = u ⋅ E v
141 126 oveqd ⊢ φ → u ⋅ E v = u ⋅ B v
142 141 ad7antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → u ⋅ E v = u ⋅ B v
143 140 142 eqtrd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → v w ∈ y , t ∈ x ⟼ t ⋅ E w u = u ⋅ B v
144 122 129 143 3eqtr3d ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → i ⋅ B j = u ⋅ B v
145 84 85 86 87 89 92 93 94 103 105 121 144 linds2eq ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x ∧ j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → j = v ∧ i = u
146 145 ex ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x → j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → j = v ∧ i = u
147 146 anasss ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x ∧ v ∈ y ∧ u ∈ x → j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → j = v ∧ i = u
148 147 ralrimivva ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x → ∀ v ∈ y ∀ u ∈ x j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → j = v ∧ i = u
149 148 anasss ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x → ∀ v ∈ y ∀ u ∈ x j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → j = v ∧ i = u
150 149 ralrimivva ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → ∀ j ∈ y ∀ i ∈ x ∀ v ∈ y ∀ u ∈ x j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → j = v ∧ i = u
151 f1opr ⊢ w ∈ y , t ∈ x ⟼ t ⋅ E w : y × x ⟶ 1-1 Base A ↔ w ∈ y , t ∈ x ⟼ t ⋅ E w : y × x ⟶ Base A ∧ ∀ j ∈ y ∀ i ∈ x ∀ v ∈ y ∀ u ∈ x j w ∈ y , t ∈ x ⟼ t ⋅ E w i = v w ∈ y , t ∈ x ⟼ t ⋅ E w u → j = v ∧ i = u
152 83 150 151 sylanbrc ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → w ∈ y , t ∈ x ⟼ t ⋅ E w : y × x ⟶ 1-1 Base A
153 58 38 xpexd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → y × x ∈ V
154 f1rnen ⊢ w ∈ y , t ∈ x ⟼ t ⋅ E w : y × x ⟶ 1-1 Base A ∧ y × x ∈ V → ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w ≈ y × x
155 152 153 154 syl2anc ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w ≈ y × x
156 hasheni ⊢ ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w ≈ y × x → ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w = y × x
157 155 156 syl ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w = y × x
158 hashxpe ⊢ y ∈ LBasis ⁡ B ∧ x ∈ LBasis ⁡ C → y × x = y ⋅ 𝑒 x
159 58 38 158 syl2anc ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → y × x = y ⋅ 𝑒 x
160 157 159 eqtrd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w = y ⋅ 𝑒 x
161 1 5 sralvec ⊢ E ∈ DivRing ∧ K ∈ DivRing ∧ V ∈ SubRing ⁡ E → A ∈ LVec
162 6 8 71 161 syl3anc ⊢ φ → A ∈ LVec
163 162 ad2antrr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → A ∈ LVec
164 162 lveclmodd ⊢ φ → A ∈ LMod
165 164 ad2antrr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → A ∈ LMod
166 6 ad4antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ c ∈ Base Scalar ⁡ A freeLMod y × x ∧ ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = 0 A → E ∈ DivRing
167 7 ad4antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ c ∈ Base Scalar ⁡ A freeLMod y × x ∧ ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = 0 A → F ∈ DivRing
168 8 ad4antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ c ∈ Base Scalar ⁡ A freeLMod y × x ∧ ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = 0 A → K ∈ DivRing
169 9 ad4antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ c ∈ Base Scalar ⁡ A freeLMod y × x ∧ ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = 0 A → U ∈ SubRing ⁡ E
170 10 ad4antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ c ∈ Base Scalar ⁡ A freeLMod y × x ∧ ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = 0 A → V ∈ SubRing ⁡ F
171 fveq2 ⊢ w = j → f ⁡ w = f ⁡ j
172 171 fveq1d ⊢ w = j → f ⁡ w ⁡ v = f ⁡ j ⁡ v
173 fveq2 ⊢ v = i → f ⁡ j ⁡ v = f ⁡ j ⁡ i
174 172 173 cbvmpov ⊢ w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v = j ∈ y , i ∈ x ⟼ f ⁡ j ⁡ i
175 simp-4r ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ c ∈ Base Scalar ⁡ A freeLMod y × x ∧ ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = 0 A → x ∈ LBasis ⁡ C
176 simpllr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ c ∈ Base Scalar ⁡ A freeLMod y × x ∧ ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = 0 A → y ∈ LBasis ⁡ B
177 simplr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ c ∈ Base Scalar ⁡ A freeLMod y × x ∧ ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = 0 A → c ∈ Base Scalar ⁡ A freeLMod y × x
178 simpr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ c ∈ Base Scalar ⁡ A freeLMod y × x ∧ ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = 0 A → ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = 0 A
179 1 2 3 4 5 166 167 168 169 170 81 174 175 176 177 178 fedgmullem2 ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ c ∈ Base Scalar ⁡ A freeLMod y × x ∧ ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = 0 A → c = y × x × 0 Scalar ⁡ A
180 179 ex ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ c ∈ Base Scalar ⁡ A freeLMod y × x → ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = 0 A → c = y × x × 0 Scalar ⁡ A
181 180 ralrimiva ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → ∀ c ∈ Base Scalar ⁡ A freeLMod y × x ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = 0 A → c = y × x × 0 Scalar ⁡ A
182 eqid ⊢ Base A = Base A
183 eqid ⊢ Scalar ⁡ A = Scalar ⁡ A
184 eqid ⊢ ⋅ A = ⋅ A
185 eqid ⊢ 0 A = 0 A
186 eqid ⊢ 0 Scalar ⁡ A = 0 Scalar ⁡ A
187 eqid ⊢ Base Scalar ⁡ A freeLMod y × x = Base Scalar ⁡ A freeLMod y × x
188 182 183 184 185 186 187 islindf4 ⊢ A ∈ LMod ∧ y × x ∈ V ∧ w ∈ y , t ∈ x ⟼ t ⋅ E w : y × x ⟶ Base A → w ∈ y , t ∈ x ⟼ t ⋅ E w LIndF A ↔ ∀ c ∈ Base Scalar ⁡ A freeLMod y × x ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = 0 A → c = y × x × 0 Scalar ⁡ A
189 188 biimpar ⊢ A ∈ LMod ∧ y × x ∈ V ∧ w ∈ y , t ∈ x ⟼ t ⋅ E w : y × x ⟶ Base A ∧ ∀ c ∈ Base Scalar ⁡ A freeLMod y × x ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = 0 A → c = y × x × 0 Scalar ⁡ A → w ∈ y , t ∈ x ⟼ t ⋅ E w LIndF A
190 165 153 83 181 189 syl31anc ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → w ∈ y , t ∈ x ⟼ t ⋅ E w LIndF A
191 69 anasss ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ j ∈ y ∧ i ∈ x → i ⋅ E j ∈ Base E
192 191 ralrimivva ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → ∀ j ∈ y ∀ i ∈ x i ⋅ E j ∈ Base E
193 81 rnmposs ⊢ ∀ j ∈ y ∀ i ∈ x i ⋅ E j ∈ Base E → ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w ⊆ Base E
194 192 193 syl ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w ⊆ Base E
195 74 ad2antrr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → Base E = Base A
196 194 195 sseqtrd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w ⊆ Base A
197 eqid ⊢ LSpan ⁡ A = LSpan ⁡ A
198 182 197 lspssv ⊢ A ∈ LMod ∧ ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w ⊆ Base A → LSpan ⁡ A ⁡ ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w ⊆ Base A
199 165 196 198 syl2anc ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → LSpan ⁡ A ⁡ ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w ⊆ Base A
200 simpl ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A → φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B
201 200 ad4antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ j ∈ y → φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B
202 elmapi ⊢ a ∈ Base Scalar ⁡ B y → a : y ⟶ Base Scalar ⁡ B
203 202 ad4antlr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ j ∈ y → a : y ⟶ Base Scalar ⁡ B
204 simpr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ j ∈ y → j ∈ y
205 203 204 ffvelcdmd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ j ∈ y → a ⁡ j ∈ Base Scalar ⁡ B
206 109 simprd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → LSpan ⁡ C ⁡ x = Base C
207 201 206 syl ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ j ∈ y → LSpan ⁡ C ⁡ x = Base C
208 98 ad7antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ j ∈ y → Base Scalar ⁡ B = Base C
209 207 208 eqtr4d ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ j ∈ y → LSpan ⁡ C ⁡ x = Base Scalar ⁡ B
210 205 209 eleqtrrd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ j ∈ y → a ⁡ j ∈ LSpan ⁡ C ⁡ x
211 eqid ⊢ Base Scalar ⁡ C = Base Scalar ⁡ C
212 eqid ⊢ Scalar ⁡ C = Scalar ⁡ C
213 eqid ⊢ 0 Scalar ⁡ C = 0 Scalar ⁡ C
214 eqid ⊢ ⋅ C = ⋅ C
215 22 lveclmodd ⊢ φ → C ∈ LMod
216 215 ad2antrr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → C ∈ LMod
217 107 39 211 212 213 214 216 41 ellspds ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → a ⁡ j ∈ LSpan ⁡ C ⁡ x ↔ ∃ b ∈ Base Scalar ⁡ C x finSupp 0 Scalar ⁡ C ⁡ b ∧ a ⁡ j = ∑ C i ∈ x b ⁡ i ⋅ C i
218 217 biimpa ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ a ⁡ j ∈ LSpan ⁡ C ⁡ x → ∃ b ∈ Base Scalar ⁡ C x finSupp 0 Scalar ⁡ C ⁡ b ∧ a ⁡ j = ∑ C i ∈ x b ⁡ i ⋅ C i
219 201 210 218 syl2anc ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ j ∈ y → ∃ b ∈ Base Scalar ⁡ C x finSupp 0 Scalar ⁡ C ⁡ b ∧ a ⁡ j = ∑ C i ∈ x b ⁡ i ⋅ C i
220 219 ralrimiva ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w → ∀ j ∈ y ∃ b ∈ Base Scalar ⁡ C x finSupp 0 Scalar ⁡ C ⁡ b ∧ a ⁡ j = ∑ C i ∈ x b ⁡ i ⋅ C i
221 fveq2 ⊢ w = j → a ⁡ w = a ⁡ j
222 fveq2 ⊢ v = i → b ⁡ v = b ⁡ i
223 id ⊢ v = i → v = i
224 222 223 oveq12d ⊢ v = i → b ⁡ v ⋅ C v = b ⁡ i ⋅ C i
225 224 cbvmptv ⊢ v ∈ x ⟼ b ⁡ v ⋅ C v = i ∈ x ⟼ b ⁡ i ⋅ C i
226 225 oveq2i ⊢ ∑ C v ∈ x b ⁡ v ⋅ C v = ∑ C i ∈ x b ⁡ i ⋅ C i
227 226 a1i ⊢ w = j → ∑ C v ∈ x b ⁡ v ⋅ C v = ∑ C i ∈ x b ⁡ i ⋅ C i
228 221 227 eqeq12d ⊢ w = j → a ⁡ w = ∑ C v ∈ x b ⁡ v ⋅ C v ↔ a ⁡ j = ∑ C i ∈ x b ⁡ i ⋅ C i
229 228 anbi2d ⊢ w = j → finSupp 0 Scalar ⁡ C ⁡ b ∧ a ⁡ w = ∑ C v ∈ x b ⁡ v ⋅ C v ↔ finSupp 0 Scalar ⁡ C ⁡ b ∧ a ⁡ j = ∑ C i ∈ x b ⁡ i ⋅ C i
230 229 rexbidv ⊢ w = j → ∃ b ∈ Base Scalar ⁡ C x finSupp 0 Scalar ⁡ C ⁡ b ∧ a ⁡ w = ∑ C v ∈ x b ⁡ v ⋅ C v ↔ ∃ b ∈ Base Scalar ⁡ C x finSupp 0 Scalar ⁡ C ⁡ b ∧ a ⁡ j = ∑ C i ∈ x b ⁡ i ⋅ C i
231 230 cbvralvw ⊢ ∀ w ∈ y ∃ b ∈ Base Scalar ⁡ C x finSupp 0 Scalar ⁡ C ⁡ b ∧ a ⁡ w = ∑ C v ∈ x b ⁡ v ⋅ C v ↔ ∀ j ∈ y ∃ b ∈ Base Scalar ⁡ C x finSupp 0 Scalar ⁡ C ⁡ b ∧ a ⁡ j = ∑ C i ∈ x b ⁡ i ⋅ C i
232 vex ⊢ y ∈ V
233 ovex ⊢ Base Scalar ⁡ C x ∈ V
234 breq1 ⊢ b = f ⁡ w → finSupp 0 Scalar ⁡ C ⁡ b ↔ finSupp 0 Scalar ⁡ C ⁡ f ⁡ w
235 fveq1 ⊢ b = f ⁡ w → b ⁡ v = f ⁡ w ⁡ v
236 235 oveq1d ⊢ b = f ⁡ w → b ⁡ v ⋅ C v = f ⁡ w ⁡ v ⋅ C v
237 236 mpteq2dv ⊢ b = f ⁡ w → v ∈ x ⟼ b ⁡ v ⋅ C v = v ∈ x ⟼ f ⁡ w ⁡ v ⋅ C v
238 237 oveq2d ⊢ b = f ⁡ w → ∑ C v ∈ x b ⁡ v ⋅ C v = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v
239 238 eqeq2d ⊢ b = f ⁡ w → a ⁡ w = ∑ C v ∈ x b ⁡ v ⋅ C v ↔ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v
240 234 239 anbi12d ⊢ b = f ⁡ w → finSupp 0 Scalar ⁡ C ⁡ b ∧ a ⁡ w = ∑ C v ∈ x b ⁡ v ⋅ C v ↔ finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v
241 240 ac6 ⊢ y ∈ V ∧ Base Scalar ⁡ C x ∈ V ∧ ∀ w ∈ y ∃ b ∈ Base Scalar ⁡ C x finSupp 0 Scalar ⁡ C ⁡ b ∧ a ⁡ w = ∑ C v ∈ x b ⁡ v ⋅ C v → ∃ f f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v
242 232 233 241 mp3an12 ⊢ ∀ w ∈ y ∃ b ∈ Base Scalar ⁡ C x finSupp 0 Scalar ⁡ C ⁡ b ∧ a ⁡ w = ∑ C v ∈ x b ⁡ v ⋅ C v → ∃ f f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v
243 231 242 sylbir ⊢ ∀ j ∈ y ∃ b ∈ Base Scalar ⁡ C x finSupp 0 Scalar ⁡ C ⁡ b ∧ a ⁡ j = ∑ C i ∈ x b ⁡ i ⋅ C i → ∃ f f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v
244 220 243 syl ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w → ∃ f f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v
245 fvexd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ f : y ⟶ Base Scalar ⁡ C x → Base Scalar ⁡ A ∈ V
246 153 adantr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ f : y ⟶ Base Scalar ⁡ C x → y × x ∈ V
247 simpllr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ f : y ⟶ Base Scalar ⁡ C x ∧ j ∈ y ∧ i ∈ x → f : y ⟶ Base Scalar ⁡ C x
248 simplr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ f : y ⟶ Base Scalar ⁡ C x ∧ j ∈ y ∧ i ∈ x → j ∈ y
249 247 248 ffvelcdmd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ f : y ⟶ Base Scalar ⁡ C x ∧ j ∈ y ∧ i ∈ x → f ⁡ j ∈ Base Scalar ⁡ C x
250 249 elmaprd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ f : y ⟶ Base Scalar ⁡ C x ∧ j ∈ y ∧ i ∈ x → f ⁡ j : x ⟶ Base Scalar ⁡ C
251 250 anasss ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ f : y ⟶ Base Scalar ⁡ C x ∧ j ∈ y ∧ i ∈ x → f ⁡ j : x ⟶ Base Scalar ⁡ C
252 simprr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ f : y ⟶ Base Scalar ⁡ C x ∧ j ∈ y ∧ i ∈ x → i ∈ x
253 251 252 ffvelcdmd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ f : y ⟶ Base Scalar ⁡ C x ∧ j ∈ y ∧ i ∈ x → f ⁡ j ⁡ i ∈ Base Scalar ⁡ C
254 70 73 srasca ⊢ φ → E ↾ 𝑠 V = Scalar ⁡ A
255 5 254 eqtrid ⊢ φ → K = Scalar ⁡ A
256 46 49 srasca ⊢ φ → F ↾ 𝑠 V = Scalar ⁡ C
257 18 256 eqtr3d ⊢ φ → K = Scalar ⁡ C
258 255 257 eqtr3d ⊢ φ → Scalar ⁡ A = Scalar ⁡ C
259 258 fveq2d ⊢ φ → Base Scalar ⁡ A = Base Scalar ⁡ C
260 259 ad4antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ f : y ⟶ Base Scalar ⁡ C x ∧ j ∈ y ∧ i ∈ x → Base Scalar ⁡ A = Base Scalar ⁡ C
261 253 260 eleqtrrd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ f : y ⟶ Base Scalar ⁡ C x ∧ j ∈ y ∧ i ∈ x → f ⁡ j ⁡ i ∈ Base Scalar ⁡ A
262 261 ralrimivva ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ f : y ⟶ Base Scalar ⁡ C x → ∀ j ∈ y ∀ i ∈ x f ⁡ j ⁡ i ∈ Base Scalar ⁡ A
263 174 fmpo ⊢ ∀ j ∈ y ∀ i ∈ x f ⁡ j ⁡ i ∈ Base Scalar ⁡ A ↔ w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v : y × x ⟶ Base Scalar ⁡ A
264 262 263 sylib ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ f : y ⟶ Base Scalar ⁡ C x → w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v : y × x ⟶ Base Scalar ⁡ A
265 245 246 264 elmapdd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ f : y ⟶ Base Scalar ⁡ C x → w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v ∈ Base Scalar ⁡ A y × x
266 265 ad5ant15 ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x → w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v ∈ Base Scalar ⁡ A y × x
267 266 adantr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v ∈ Base Scalar ⁡ A y × x
268 267 adantl3r ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v ∈ Base Scalar ⁡ A y × x
269 simpr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v ∧ c = w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v → c = w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v
270 269 breq1d ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v ∧ c = w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v → finSupp 0 Scalar ⁡ A ⁡ c ↔ finSupp 0 Scalar ⁡ A ⁡ w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v
271 269 oveq1d ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v ∧ c = w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v → c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w
272 271 oveq2d ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v ∧ c = w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v → ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w = ∑ A w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w
273 272 eqeq2d ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v ∧ c = w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v → z = ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w ↔ z = ∑ A w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w
274 270 273 anbi12d ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v ∧ c = w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v → finSupp 0 Scalar ⁡ A ⁡ c ∧ z = ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w ↔ finSupp 0 Scalar ⁡ A ⁡ w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v ∧ z = ∑ A w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w
275 6 ad8antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → E ∈ DivRing
276 7 ad8antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → F ∈ DivRing
277 8 ad8antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → K ∈ DivRing
278 9 ad8antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → U ∈ SubRing ⁡ E
279 10 ad8antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → V ∈ SubRing ⁡ F
280 38 ad6antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → x ∈ LBasis ⁡ C
281 58 ad6antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → y ∈ LBasis ⁡ B
282 simpr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A → z ∈ Base A
283 282 ad5antr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → z ∈ Base A
284 202 ad5antlr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → a : y ⟶ Base Scalar ⁡ B
285 simp-4r ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → finSupp 0 Scalar ⁡ B ⁡ a
286 simpllr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → z = ∑ B w ∈ y a ⁡ w ⋅ B w
287 id ⊢ w = j → w = j
288 221 287 oveq12d ⊢ w = j → a ⁡ w ⋅ B w = a ⁡ j ⋅ B j
289 288 cbvmptv ⊢ w ∈ y ⟼ a ⁡ w ⋅ B w = j ∈ y ⟼ a ⁡ j ⋅ B j
290 289 oveq2i ⊢ ∑ B w ∈ y a ⁡ w ⋅ B w = ∑ B j ∈ y a ⁡ j ⋅ B j
291 286 290 eqtrdi ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → z = ∑ B j ∈ y a ⁡ j ⋅ B j
292 simplr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → f : y ⟶ Base Scalar ⁡ C x
293 171 breq1d ⊢ w = j → finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ↔ finSupp 0 Scalar ⁡ C ⁡ f ⁡ j
294 fveq2 ⊢ v = i → f ⁡ w ⁡ v = f ⁡ w ⁡ i
295 294 223 oveq12d ⊢ v = i → f ⁡ w ⁡ v ⋅ C v = f ⁡ w ⁡ i ⋅ C i
296 295 cbvmptv ⊢ v ∈ x ⟼ f ⁡ w ⁡ v ⋅ C v = i ∈ x ⟼ f ⁡ w ⁡ i ⋅ C i
297 171 fveq1d ⊢ w = j → f ⁡ w ⁡ i = f ⁡ j ⁡ i
298 297 oveq1d ⊢ w = j → f ⁡ w ⁡ i ⋅ C i = f ⁡ j ⁡ i ⋅ C i
299 298 mpteq2dv ⊢ w = j → i ∈ x ⟼ f ⁡ w ⁡ i ⋅ C i = i ∈ x ⟼ f ⁡ j ⁡ i ⋅ C i
300 296 299 eqtrid ⊢ w = j → v ∈ x ⟼ f ⁡ w ⁡ v ⋅ C v = i ∈ x ⟼ f ⁡ j ⁡ i ⋅ C i
301 300 oveq2d ⊢ w = j → ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v = ∑ C i ∈ x f ⁡ j ⁡ i ⋅ C i
302 221 301 eqeq12d ⊢ w = j → a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v ↔ a ⁡ j = ∑ C i ∈ x f ⁡ j ⁡ i ⋅ C i
303 293 302 anbi12d ⊢ w = j → finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v ↔ finSupp 0 Scalar ⁡ C ⁡ f ⁡ j ∧ a ⁡ j = ∑ C i ∈ x f ⁡ j ⁡ i ⋅ C i
304 303 cbvralvw ⊢ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v ↔ ∀ j ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ j ∧ a ⁡ j = ∑ C i ∈ x f ⁡ j ⁡ i ⋅ C i
305 304 bilani ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → ∀ j ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ j ∧ a ⁡ j = ∑ C i ∈ x f ⁡ j ⁡ i ⋅ C i
306 305 r19.21bi ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v ∧ j ∈ y → finSupp 0 Scalar ⁡ C ⁡ f ⁡ j ∧ a ⁡ j = ∑ C i ∈ x f ⁡ j ⁡ i ⋅ C i
307 306 simpld ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v ∧ j ∈ y → finSupp 0 Scalar ⁡ C ⁡ f ⁡ j
308 306 simprd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v ∧ j ∈ y → a ⁡ j = ∑ C i ∈ x f ⁡ j ⁡ i ⋅ C i
309 1 2 3 4 5 275 276 277 278 279 81 174 280 281 283 284 285 291 292 307 308 fedgmullem1 ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → finSupp 0 Scalar ⁡ A ⁡ w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v ∧ z = ∑ A w ∈ y , v ∈ x ⟼ f ⁡ w ⁡ v ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w
310 268 274 309 rspcedvd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → ∃ c ∈ Base Scalar ⁡ A y × x finSupp 0 Scalar ⁡ A ⁡ c ∧ z = ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w
311 310 anasss ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w ∧ f : y ⟶ Base Scalar ⁡ C x ∧ ∀ w ∈ y finSupp 0 Scalar ⁡ C ⁡ f ⁡ w ∧ a ⁡ w = ∑ C v ∈ x f ⁡ w ⁡ v ⋅ C v → ∃ c ∈ Base Scalar ⁡ A y × x finSupp 0 Scalar ⁡ A ⁡ c ∧ z = ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w
312 244 311 exlimddv ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w → ∃ c ∈ Base Scalar ⁡ A y × x finSupp 0 Scalar ⁡ A ⁡ c ∧ z = ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w
313 312 anasss ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A ∧ a ∈ Base Scalar ⁡ B y ∧ finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w → ∃ c ∈ Base Scalar ⁡ A y × x finSupp 0 Scalar ⁡ A ⁡ c ∧ z = ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w
314 eqid ⊢ LSpan ⁡ B = LSpan ⁡ B
315 59 28 314 islbs4 ⊢ y ∈ LBasis ⁡ B ↔ y ∈ LIndS ⁡ B ∧ LSpan ⁡ B ⁡ y = Base B
316 315 bilani ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → y ∈ LIndS ⁡ B ∧ LSpan ⁡ B ⁡ y = Base B
317 316 simprd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → LSpan ⁡ B ⁡ y = Base B
318 317 adantr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A → LSpan ⁡ B ⁡ y = Base B
319 74 63 eqtr3d ⊢ φ → Base A = Base B
320 319 ad3antrrr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A → Base A = Base B
321 318 320 eqtr4d ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A → LSpan ⁡ B ⁡ y = Base A
322 282 321 eleqtrrd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A → z ∈ LSpan ⁡ B ⁡ y
323 eqid ⊢ Scalar ⁡ B = Scalar ⁡ B
324 27 lveclmodd ⊢ φ → B ∈ LMod
325 324 ad2antrr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → B ∈ LMod
326 314 59 84 323 87 85 325 61 ellspds ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → z ∈ LSpan ⁡ B ⁡ y ↔ ∃ a ∈ Base Scalar ⁡ B y finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w
327 326 biimpa ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ LSpan ⁡ B ⁡ y → ∃ a ∈ Base Scalar ⁡ B y finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w
328 200 322 327 syl2anc ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A → ∃ a ∈ Base Scalar ⁡ B y finSupp 0 Scalar ⁡ B ⁡ a ∧ z = ∑ B w ∈ y a ⁡ w ⋅ B w
329 313 328 r19.29a ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A → ∃ c ∈ Base Scalar ⁡ A y × x finSupp 0 Scalar ⁡ A ⁡ c ∧ z = ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w
330 eqid ⊢ Base Scalar ⁡ A = Base Scalar ⁡ A
331 197 182 330 183 186 184 83 165 153 ellspd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → z ∈ LSpan ⁡ A ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w y × x ↔ ∃ c ∈ Base Scalar ⁡ A y × x finSupp 0 Scalar ⁡ A ⁡ c ∧ z = ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w
332 331 adantr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A → z ∈ LSpan ⁡ A ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w y × x ↔ ∃ c ∈ Base Scalar ⁡ A y × x finSupp 0 Scalar ⁡ A ⁡ c ∧ z = ∑ A c ⋅ A f w ∈ y , t ∈ x ⟼ t ⋅ E w
333 329 332 mpbird ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A → z ∈ LSpan ⁡ A ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w y × x
334 83 ffnd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → w ∈ y , t ∈ x ⟼ t ⋅ E w Fn y × x
335 334 adantr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A → w ∈ y , t ∈ x ⟼ t ⋅ E w Fn y × x
336 fnima ⊢ w ∈ y , t ∈ x ⟼ t ⋅ E w Fn y × x → w ∈ y , t ∈ x ⟼ t ⋅ E w y × x = ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w
337 335 336 syl ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A → w ∈ y , t ∈ x ⟼ t ⋅ E w y × x = ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w
338 337 fveq2d ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A → LSpan ⁡ A ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w y × x = LSpan ⁡ A ⁡ ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w
339 333 338 eleqtrd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B ∧ z ∈ Base A → z ∈ LSpan ⁡ A ⁡ ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w
340 199 339 eqelssd ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → LSpan ⁡ A ⁡ ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w = Base A
341 eqid ⊢ Base w ∈ y , t ∈ x ⟼ t ⋅ E w = Base w ∈ y , t ∈ x ⟼ t ⋅ E w
342 drngnzr ⊢ K ∈ DivRing → K ∈ NzRing
343 8 342 syl ⊢ φ → K ∈ NzRing
344 255 343 eqeltrrd ⊢ φ → Scalar ⁡ A ∈ NzRing
345 344 ad2antrr ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → Scalar ⁡ A ∈ NzRing
346 182 341 183 184 185 186 197 165 345 153 152 lindflbs ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w ∈ LBasis ⁡ A ↔ w ∈ y , t ∈ x ⟼ t ⋅ E w LIndF A ∧ LSpan ⁡ A ⁡ ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w = Base A
347 190 340 346 mpbir2and ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w ∈ LBasis ⁡ A
348 eqid ⊢ LBasis ⁡ A = LBasis ⁡ A
349 348 dimval ⊢ A ∈ LVec ∧ ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w ∈ LBasis ⁡ A → dim ⁡ A = ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w
350 163 347 349 syl2anc ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → dim ⁡ A = ran ⁡ w ∈ y , t ∈ x ⟼ t ⋅ E w
351 28 dimval ⊢ B ∈ LVec ∧ y ∈ LBasis ⁡ B → dim ⁡ B = y
352 88 58 351 syl2anc ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → dim ⁡ B = y
353 23 dimval ⊢ C ∈ LVec ∧ x ∈ LBasis ⁡ C → dim ⁡ C = x
354 106 38 353 syl2anc ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → dim ⁡ C = x
355 352 354 oveq12d ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → dim ⁡ B ⋅ 𝑒 dim ⁡ C = y ⋅ 𝑒 x
356 160 350 355 3eqtr4d ⊢ φ ∧ x ∈ LBasis ⁡ C ∧ y ∈ LBasis ⁡ B → dim ⁡ A = dim ⁡ B ⋅ 𝑒 dim ⁡ C
357 33 356 exlimddv ⊢ φ ∧ x ∈ LBasis ⁡ C → dim ⁡ A = dim ⁡ B ⋅ 𝑒 dim ⁡ C
358 25 357 n0limd ⊢ φ → dim ⁡ A = dim ⁡ B ⋅ 𝑒 dim ⁡ C