Proof of Theorem vcoprnelem
| Step | Hyp | Ref
| Expression |
| 1 | | vcrel 8162 |
. . . . 5
⊢ Rel CVec |
| 2 | | df-rel 3191 |
. . . . 5
⊢ (Rel CVec ↔ CVec
⊆ (V × V)) |
| 3 | 1, 2 | mpbi 189 |
. . . 4
⊢ CVec ⊆ (V × V) |
| 4 | 3 | sseli 2068 |
. . 3
⊢ (〈G, G〉 ∈ CVec → 〈G, G〉 ∈ (V × V)) |
| 5 | | opelxp1 3211 |
. . 3
⊢ (〈G, G〉 ∈ (V × V) → G ∈
V) |
| 6 | 4, 5 | syl 10 |
. 2
⊢ (〈G, G〉 ∈ CVec → G
∈ V) |
| 7 | | eqid 1478 |
. . . . . 6
⊢ ran G = ran G |
| 8 | 7 | isvclem 8192 |
. . . . 5
⊢ ((G ∈ V ⋀ G ∈ V) → (〈G, G〉 ∈ CVec ↔ (G ∈ Abel ⋀ G:(ℂ × ran G)–→ran G ⋀ ∀x ∈ ran G((1Gx) = x ⋀ ∀y ∈ ℂ (∀z ∈ ran G(yG(xGz)) =
((yGx)G(yGz)) ⋀ ∀z ∈ ℂ (((y +
z)Gx) = ((yGx)G(zGx)) ⋀ ((y · z)Gx) = (yG(zGx)))))))) |
| 9 | 8 | anidms 436 |
. . . 4
⊢ (G ∈ V
→ (〈G, G〉 ∈ CVec ↔
(G ∈ Abel
⋀ G:(ℂ × ran
G)–→ran G ⋀ ∀x ∈ ran G((1Gx) = x ⋀ ∀y ∈ ℂ (∀z ∈ ran G(yG(xGz)) =
((yGx)G(yGz)) ⋀ ∀z ∈ ℂ (((y +
z)Gx) = ((yGx)G(zGx)) ⋀ ((y · z)Gx) = (yG(zGx)))))))) |
| 10 | 9 | biimpa 418 |
. . 3
⊢ ((G ∈ V ⋀ 〈G, G〉 ∈ CVec) →
(G ∈ Abel
⋀ G:(ℂ × ran
G)–→ran G ⋀ ∀x ∈ ran G((1Gx) = x ⋀ ∀y ∈ ℂ (∀z ∈ ran G(yG(xGz)) =
((yGx)G(yGz)) ⋀ ∀z ∈ ℂ (((y +
z)Gx) = ((yGx)G(zGx)) ⋀ ((y · z)Gx) = (yG(zGx))))))) |
| 11 | | pm3.27 323 |
. . . . 5
⊢ ((G ∈ Abel ⋀ G:(ℂ × ran G)–→ran G) → G:(ℂ × ran
G)–→ran G) |
| 12 | | fndmu 3595 |
. . . . . . . . 9
⊢ ((G Fn (ran G
× ran G) ⋀ G Fn (ℂ × ran G)) → (ran G × ran G)
= (ℂ × ran G)) |
| 13 | 7 | grpfo 8040 |
. . . . . . . . . 10
⊢ (G ∈ Grp →
G:(ran G × ran G)–onto→ran G) |
| 14 | | fof 3678 |
. . . . . . . . . . 11
⊢ (G:(ran G ×
ran G)–onto→ran G
→ G:(ran G × ran G)–→ran G) |
| 15 | | ffn 3633 |
. . . . . . . . . . 11
⊢ (G:(ran G ×
ran G)–→ran G → G Fn
(ran G × ran G)) |
| 16 | 14, 15 | syl 10 |
. . . . . . . . . 10
⊢ (G:(ran G ×
ran G)–onto→ran G
→ G Fn (ran G × ran G)) |
| 17 | 13, 16 | syl 10 |
. . . . . . . . 9
⊢ (G ∈ Grp →
G Fn (ran G × ran G)) |
| 18 | | ffn 3633 |
. . . . . . . . 9
⊢ (G:(ℂ × ran
G)–→ran G → G Fn
(ℂ × ran G)) |
| 19 | 12, 17, 18 | syl2an 456 |
. . . . . . . 8
⊢ ((G ∈ Grp ⋀ G:(ℂ × ran G)–→ran G) → (ran G
× ran G) = (ℂ × ran G)) |
| 20 | 7 | grpn0 8043 |
. . . . . . . . . 10
⊢ (G ∈ Grp → ran
G ≠ ∅) |
| 21 | | xp11a 3483 |
. . . . . . . . . 10
⊢ (ran G ≠ ∅ →
((ran G × ran G) = (ℂ ×
ran G) ↔ ran G = ℂ)) |
| 22 | 20, 21 | syl 10 |
. . . . . . . . 9
⊢ (G ∈ Grp →
((ran G × ran G) = (ℂ ×
ran G) ↔ ran G = ℂ)) |
| 23 | 22 | adantr 391 |
. . . . . . . 8
⊢ ((G ∈ Grp ⋀ G:(ℂ × ran G)–→ran G) → ((ran G × ran G)
= (ℂ × ran G) ↔ ran G
= ℂ)) |
| 24 | 19, 23 | mpbid 195 |
. . . . . . 7
⊢ ((G ∈ Grp ⋀ G:(ℂ × ran G)–→ran G) → ran G
= ℂ) |
| 25 | | ablgrp 8098 |
. . . . . . 7
⊢ (G ∈ Abel →
G ∈
Grp) |
| 26 | 24, 25 | sylan 450 |
. . . . . 6
⊢ ((G ∈ Abel ⋀ G:(ℂ × ran G)–→ran G) → ran G
= ℂ) |
| 27 | | xpeq2 3207 |
. . . . . . . 8
⊢ (ran G = ℂ →
(ℂ × ran G) = (ℂ ×
ℂ)) |
| 28 | | feq2 3627 |
. . . . . . . 8
⊢ ((ℂ × ran G) = (ℂ ×
ℂ) → (G:(ℂ × ran
G)–→ran G ↔ G:(ℂ ×
ℂ)–→ran G)) |
| 29 | 27, 28 | syl 10 |
. . . . . . 7
⊢ (ran G = ℂ →
(G:(ℂ
× ran G)–→ran G ↔ G:(ℂ ×
ℂ)–→ran G)) |
| 30 | | feq3 3628 |
. . . . . . 7
⊢ (ran G = ℂ →
(G:(ℂ
× ℂ)–→ran G ↔ G:(ℂ ×
ℂ)–→ℂ)) |
| 31 | 29, 30 | bitrd 530 |
. . . . . 6
⊢ (ran G = ℂ →
(G:(ℂ
× ran G)–→ran G ↔ G:(ℂ ×
ℂ)–→ℂ)) |
| 32 | 26, 31 | syl 10 |
. . . . 5
⊢ ((G ∈ Abel ⋀ G:(ℂ × ran G)–→ran G) → (G:(ℂ × ran
G)–→ran G ↔ G:(ℂ ×
ℂ)–→ℂ)) |
| 33 | 11, 32 | mpbid 195 |
. . . 4
⊢ ((G ∈ Abel ⋀ G:(ℂ × ran G)–→ran G) → G:(ℂ ×
ℂ)–→ℂ) |
| 34 | 33 | 3adant3 801 |
. . 3
⊢ ((G ∈ Abel ⋀ G:(ℂ × ran G)–→ran G ⋀ ∀x ∈ ran G((1Gx) = x ⋀ ∀y ∈ ℂ (∀z ∈ ran G(yG(xGz)) =
((yGx)G(yGz)) ⋀ ∀z ∈ ℂ (((y +
z)Gx) = ((yGx)G(zGx)) ⋀ ((y · z)Gx) = (yG(zGx)))))) →
G:(ℂ
× ℂ)–→ℂ) |
| 35 | 10, 34 | syl 10 |
. 2
⊢ ((G ∈ V ⋀ 〈G, G〉 ∈ CVec) →
G:(ℂ
× ℂ)–→ℂ) |
| 36 | 6, 35 | mpancom 707 |
1
⊢ (〈G, G〉 ∈ CVec → G:(ℂ ×
ℂ)–→ℂ) |