Proof of Theorem cramerimplem1
Step | Hyp | Ref
| Expression |
1 | | crngring 18558 |
. . . . . . . . 9
⊢ (𝑅 ∈ CRing → 𝑅 ∈ Ring) |
2 | 1 | anim2i 593 |
. . . . . . . 8
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring)) |
3 | 2 | ancomd 467 |
. . . . . . 7
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → (𝑅 ∈ Ring ∧ 𝑁 ∈ Fin)) |
4 | 3 | 3adant3 1081 |
. . . . . 6
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) → (𝑅 ∈ Ring ∧ 𝑁 ∈ Fin)) |
5 | 4 | adantr 481 |
. . . . 5
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → (𝑅 ∈ Ring ∧ 𝑁 ∈ Fin)) |
6 | | simp3 1063 |
. . . . . 6
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) → 𝐼 ∈ 𝑁) |
7 | 6 | anim1i 592 |
. . . . 5
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → (𝐼 ∈ 𝑁 ∧ 𝑍 ∈ 𝑉)) |
8 | | cramerimplem1.v |
. . . . . 6
⊢ 𝑉 = ((Base‘𝑅) ↑𝑚
𝑁) |
9 | | cramerimplem1.a |
. . . . . . 7
⊢ 𝐴 = (𝑁 Mat 𝑅) |
10 | 9 | fveq2i 6194 |
. . . . . 6
⊢
(1r‘𝐴) = (1r‘(𝑁 Mat 𝑅)) |
11 | | cramerimplem1.e |
. . . . . 6
⊢ 𝐸 = (((1r‘𝐴)(𝑁 matRepV 𝑅)𝑍)‘𝐼) |
12 | 8, 10, 11 | 1marepvmarrepid 20381 |
. . . . 5
⊢ (((𝑅 ∈ Ring ∧ 𝑁 ∈ Fin) ∧ (𝐼 ∈ 𝑁 ∧ 𝑍 ∈ 𝑉)) → (𝐼(𝐸(𝑁 matRRep 𝑅)(𝑍‘𝐼))𝐼) = 𝐸) |
13 | 5, 7, 12 | syl2anc 693 |
. . . 4
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → (𝐼(𝐸(𝑁 matRRep 𝑅)(𝑍‘𝐼))𝐼) = 𝐸) |
14 | 13 | eqcomd 2628 |
. . 3
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → 𝐸 = (𝐼(𝐸(𝑁 matRRep 𝑅)(𝑍‘𝐼))𝐼)) |
15 | 14 | fveq2d 6195 |
. 2
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → (𝐷‘𝐸) = (𝐷‘(𝐼(𝐸(𝑁 matRRep 𝑅)(𝑍‘𝐼))𝐼))) |
16 | | cramerimplem1.d |
. . . . 5
⊢ 𝐷 = (𝑁 maDet 𝑅) |
17 | 16 | a1i 11 |
. . . 4
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → 𝐷 = (𝑁 maDet 𝑅)) |
18 | 17 | fveq1d 6193 |
. . 3
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → (𝐷‘(𝐼(𝐸(𝑁 matRRep 𝑅)(𝑍‘𝐼))𝐼)) = ((𝑁 maDet 𝑅)‘(𝐼(𝐸(𝑁 matRRep 𝑅)(𝑍‘𝐼))𝐼))) |
19 | | simpl2 1065 |
. . . 4
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → 𝑅 ∈ CRing) |
20 | 7 | ancomd 467 |
. . . . . 6
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → (𝑍 ∈ 𝑉 ∧ 𝐼 ∈ 𝑁)) |
21 | 9 | eqcomi 2631 |
. . . . . . . 8
⊢ (𝑁 Mat 𝑅) = 𝐴 |
22 | 21 | fveq2i 6194 |
. . . . . . 7
⊢
(Base‘(𝑁 Mat
𝑅)) = (Base‘𝐴) |
23 | | eqid 2622 |
. . . . . . 7
⊢
(1r‘𝐴) = (1r‘𝐴) |
24 | 9, 22, 8, 23 | ma1repvcl 20376 |
. . . . . 6
⊢ (((𝑅 ∈ Ring ∧ 𝑁 ∈ Fin) ∧ (𝑍 ∈ 𝑉 ∧ 𝐼 ∈ 𝑁)) → (((1r‘𝐴)(𝑁 matRepV 𝑅)𝑍)‘𝐼) ∈ (Base‘(𝑁 Mat 𝑅))) |
25 | 5, 20, 24 | syl2anc 693 |
. . . . 5
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → (((1r‘𝐴)(𝑁 matRepV 𝑅)𝑍)‘𝐼) ∈ (Base‘(𝑁 Mat 𝑅))) |
26 | 11, 25 | syl5eqel 2705 |
. . . 4
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → 𝐸 ∈ (Base‘(𝑁 Mat 𝑅))) |
27 | 6 | adantr 481 |
. . . 4
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → 𝐼 ∈ 𝑁) |
28 | | elmapi 7879 |
. . . . . . . . 9
⊢ (𝑍 ∈ ((Base‘𝑅) ↑𝑚
𝑁) → 𝑍:𝑁⟶(Base‘𝑅)) |
29 | | ffvelrn 6357 |
. . . . . . . . . 10
⊢ ((𝑍:𝑁⟶(Base‘𝑅) ∧ 𝐼 ∈ 𝑁) → (𝑍‘𝐼) ∈ (Base‘𝑅)) |
30 | 29 | ex 450 |
. . . . . . . . 9
⊢ (𝑍:𝑁⟶(Base‘𝑅) → (𝐼 ∈ 𝑁 → (𝑍‘𝐼) ∈ (Base‘𝑅))) |
31 | 28, 30 | syl 17 |
. . . . . . . 8
⊢ (𝑍 ∈ ((Base‘𝑅) ↑𝑚
𝑁) → (𝐼 ∈ 𝑁 → (𝑍‘𝐼) ∈ (Base‘𝑅))) |
32 | 31, 8 | eleq2s 2719 |
. . . . . . 7
⊢ (𝑍 ∈ 𝑉 → (𝐼 ∈ 𝑁 → (𝑍‘𝐼) ∈ (Base‘𝑅))) |
33 | 32 | com12 32 |
. . . . . 6
⊢ (𝐼 ∈ 𝑁 → (𝑍 ∈ 𝑉 → (𝑍‘𝐼) ∈ (Base‘𝑅))) |
34 | 33 | 3ad2ant3 1084 |
. . . . 5
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) → (𝑍 ∈ 𝑉 → (𝑍‘𝐼) ∈ (Base‘𝑅))) |
35 | 34 | imp 445 |
. . . 4
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → (𝑍‘𝐼) ∈ (Base‘𝑅)) |
36 | | smadiadetr 20481 |
. . . 4
⊢ (((𝑅 ∈ CRing ∧ 𝐸 ∈ (Base‘(𝑁 Mat 𝑅))) ∧ (𝐼 ∈ 𝑁 ∧ (𝑍‘𝐼) ∈ (Base‘𝑅))) → ((𝑁 maDet 𝑅)‘(𝐼(𝐸(𝑁 matRRep 𝑅)(𝑍‘𝐼))𝐼)) = ((𝑍‘𝐼)(.r‘𝑅)(((𝑁 ∖ {𝐼}) maDet 𝑅)‘(𝐼((𝑁 subMat 𝑅)‘𝐸)𝐼)))) |
37 | 19, 26, 27, 35, 36 | syl22anc 1327 |
. . 3
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → ((𝑁 maDet 𝑅)‘(𝐼(𝐸(𝑁 matRRep 𝑅)(𝑍‘𝐼))𝐼)) = ((𝑍‘𝐼)(.r‘𝑅)(((𝑁 ∖ {𝐼}) maDet 𝑅)‘(𝐼((𝑁 subMat 𝑅)‘𝐸)𝐼)))) |
38 | 18, 37 | eqtrd 2656 |
. 2
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → (𝐷‘(𝐼(𝐸(𝑁 matRRep 𝑅)(𝑍‘𝐼))𝐼)) = ((𝑍‘𝐼)(.r‘𝑅)(((𝑁 ∖ {𝐼}) maDet 𝑅)‘(𝐼((𝑁 subMat 𝑅)‘𝐸)𝐼)))) |
39 | 8, 10, 11 | 1marepvsma1 20389 |
. . . . . 6
⊢ (((𝑅 ∈ Ring ∧ 𝑁 ∈ Fin) ∧ (𝐼 ∈ 𝑁 ∧ 𝑍 ∈ 𝑉)) → (𝐼((𝑁 subMat 𝑅)‘𝐸)𝐼) = (1r‘((𝑁 ∖ {𝐼}) Mat 𝑅))) |
40 | 5, 7, 39 | syl2anc 693 |
. . . . 5
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → (𝐼((𝑁 subMat 𝑅)‘𝐸)𝐼) = (1r‘((𝑁 ∖ {𝐼}) Mat 𝑅))) |
41 | 40 | fveq2d 6195 |
. . . 4
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → (((𝑁 ∖ {𝐼}) maDet 𝑅)‘(𝐼((𝑁 subMat 𝑅)‘𝐸)𝐼)) = (((𝑁 ∖ {𝐼}) maDet 𝑅)‘(1r‘((𝑁 ∖ {𝐼}) Mat 𝑅)))) |
42 | 41 | oveq2d 6666 |
. . 3
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → ((𝑍‘𝐼)(.r‘𝑅)(((𝑁 ∖ {𝐼}) maDet 𝑅)‘(𝐼((𝑁 subMat 𝑅)‘𝐸)𝐼))) = ((𝑍‘𝐼)(.r‘𝑅)(((𝑁 ∖ {𝐼}) maDet 𝑅)‘(1r‘((𝑁 ∖ {𝐼}) Mat 𝑅))))) |
43 | | diffi 8192 |
. . . . . . . . 9
⊢ (𝑁 ∈ Fin → (𝑁 ∖ {𝐼}) ∈ Fin) |
44 | 43 | anim1i 592 |
. . . . . . . 8
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → ((𝑁 ∖ {𝐼}) ∈ Fin ∧ 𝑅 ∈ CRing)) |
45 | 44 | ancomd 467 |
. . . . . . 7
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → (𝑅 ∈ CRing ∧ (𝑁 ∖ {𝐼}) ∈ Fin)) |
46 | 45 | 3adant3 1081 |
. . . . . 6
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) → (𝑅 ∈ CRing ∧ (𝑁 ∖ {𝐼}) ∈ Fin)) |
47 | 46 | adantr 481 |
. . . . 5
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → (𝑅 ∈ CRing ∧ (𝑁 ∖ {𝐼}) ∈ Fin)) |
48 | | eqid 2622 |
. . . . . 6
⊢ ((𝑁 ∖ {𝐼}) maDet 𝑅) = ((𝑁 ∖ {𝐼}) maDet 𝑅) |
49 | | eqid 2622 |
. . . . . 6
⊢ ((𝑁 ∖ {𝐼}) Mat 𝑅) = ((𝑁 ∖ {𝐼}) Mat 𝑅) |
50 | | eqid 2622 |
. . . . . 6
⊢
(1r‘((𝑁 ∖ {𝐼}) Mat 𝑅)) = (1r‘((𝑁 ∖ {𝐼}) Mat 𝑅)) |
51 | | eqid 2622 |
. . . . . 6
⊢
(1r‘𝑅) = (1r‘𝑅) |
52 | 48, 49, 50, 51 | mdet1 20407 |
. . . . 5
⊢ ((𝑅 ∈ CRing ∧ (𝑁 ∖ {𝐼}) ∈ Fin) → (((𝑁 ∖ {𝐼}) maDet 𝑅)‘(1r‘((𝑁 ∖ {𝐼}) Mat 𝑅))) = (1r‘𝑅)) |
53 | 47, 52 | syl 17 |
. . . 4
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → (((𝑁 ∖ {𝐼}) maDet 𝑅)‘(1r‘((𝑁 ∖ {𝐼}) Mat 𝑅))) = (1r‘𝑅)) |
54 | 53 | oveq2d 6666 |
. . 3
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → ((𝑍‘𝐼)(.r‘𝑅)(((𝑁 ∖ {𝐼}) maDet 𝑅)‘(1r‘((𝑁 ∖ {𝐼}) Mat 𝑅)))) = ((𝑍‘𝐼)(.r‘𝑅)(1r‘𝑅))) |
55 | 1 | 3ad2ant2 1083 |
. . . . 5
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) → 𝑅 ∈ Ring) |
56 | 55 | adantr 481 |
. . . 4
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → 𝑅 ∈ Ring) |
57 | | eqid 2622 |
. . . . 5
⊢
(Base‘𝑅) =
(Base‘𝑅) |
58 | | eqid 2622 |
. . . . 5
⊢
(.r‘𝑅) = (.r‘𝑅) |
59 | 57, 58, 51 | ringridm 18572 |
. . . 4
⊢ ((𝑅 ∈ Ring ∧ (𝑍‘𝐼) ∈ (Base‘𝑅)) → ((𝑍‘𝐼)(.r‘𝑅)(1r‘𝑅)) = (𝑍‘𝐼)) |
60 | 56, 35, 59 | syl2anc 693 |
. . 3
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → ((𝑍‘𝐼)(.r‘𝑅)(1r‘𝑅)) = (𝑍‘𝐼)) |
61 | 42, 54, 60 | 3eqtrd 2660 |
. 2
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → ((𝑍‘𝐼)(.r‘𝑅)(((𝑁 ∖ {𝐼}) maDet 𝑅)‘(𝐼((𝑁 subMat 𝑅)‘𝐸)𝐼))) = (𝑍‘𝐼)) |
62 | 15, 38, 61 | 3eqtrd 2660 |
1
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝐼 ∈ 𝑁) ∧ 𝑍 ∈ 𝑉) → (𝐷‘𝐸) = (𝑍‘𝐼)) |