Step | Hyp | Ref
| Expression |
1 | | nmoco.1 |
. 2
β’ π = (π normOp π) |
2 | | eqid 2732 |
. 2
β’
(Baseβπ) =
(Baseβπ) |
3 | | eqid 2732 |
. 2
β’
(normβπ) =
(normβπ) |
4 | | eqid 2732 |
. 2
β’
(normβπ) =
(normβπ) |
5 | | eqid 2732 |
. 2
β’
(0gβπ) = (0gβπ) |
6 | | nghmrcl1 24240 |
. . 3
β’ (πΊ β (π NGHom π) β π β NrmGrp) |
7 | 6 | adantl 482 |
. 2
β’ ((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β π β NrmGrp) |
8 | | nghmrcl2 24241 |
. . 3
β’ (πΉ β (π NGHom π) β π β NrmGrp) |
9 | 8 | adantr 481 |
. 2
β’ ((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β π β NrmGrp) |
10 | | nghmghm 24242 |
. . 3
β’ (πΉ β (π NGHom π) β πΉ β (π GrpHom π)) |
11 | | nghmghm 24242 |
. . 3
β’ (πΊ β (π NGHom π) β πΊ β (π GrpHom π)) |
12 | | ghmco 19106 |
. . 3
β’ ((πΉ β (π GrpHom π) β§ πΊ β (π GrpHom π)) β (πΉ β πΊ) β (π GrpHom π)) |
13 | 10, 11, 12 | syl2an 596 |
. 2
β’ ((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β (πΉ β πΊ) β (π GrpHom π)) |
14 | | nmoco.2 |
. . . 4
β’ πΏ = (π normOp π) |
15 | 14 | nghmcl 24235 |
. . 3
β’ (πΉ β (π NGHom π) β (πΏβπΉ) β β) |
16 | | nmoco.3 |
. . . 4
β’ π = (π normOp π) |
17 | 16 | nghmcl 24235 |
. . 3
β’ (πΊ β (π NGHom π) β (πβπΊ) β β) |
18 | | remulcl 11191 |
. . 3
β’ (((πΏβπΉ) β β β§ (πβπΊ) β β) β ((πΏβπΉ) Β· (πβπΊ)) β β) |
19 | 15, 17, 18 | syl2an 596 |
. 2
β’ ((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β ((πΏβπΉ) Β· (πβπΊ)) β β) |
20 | | nghmrcl1 24240 |
. . . . 5
β’ (πΉ β (π NGHom π) β π β NrmGrp) |
21 | 14 | nmoge0 24229 |
. . . . 5
β’ ((π β NrmGrp β§ π β NrmGrp β§ πΉ β (π GrpHom π)) β 0 β€ (πΏβπΉ)) |
22 | 20, 8, 10, 21 | syl3anc 1371 |
. . . 4
β’ (πΉ β (π NGHom π) β 0 β€ (πΏβπΉ)) |
23 | 15, 22 | jca 512 |
. . 3
β’ (πΉ β (π NGHom π) β ((πΏβπΉ) β β β§ 0 β€ (πΏβπΉ))) |
24 | | nghmrcl2 24241 |
. . . . 5
β’ (πΊ β (π NGHom π) β π β NrmGrp) |
25 | 16 | nmoge0 24229 |
. . . . 5
β’ ((π β NrmGrp β§ π β NrmGrp β§ πΊ β (π GrpHom π)) β 0 β€ (πβπΊ)) |
26 | 6, 24, 11, 25 | syl3anc 1371 |
. . . 4
β’ (πΊ β (π NGHom π) β 0 β€ (πβπΊ)) |
27 | 17, 26 | jca 512 |
. . 3
β’ (πΊ β (π NGHom π) β ((πβπΊ) β β β§ 0 β€ (πβπΊ))) |
28 | | mulge0 11728 |
. . 3
β’ ((((πΏβπΉ) β β β§ 0 β€ (πΏβπΉ)) β§ ((πβπΊ) β β β§ 0 β€ (πβπΊ))) β 0 β€ ((πΏβπΉ) Β· (πβπΊ))) |
29 | 23, 27, 28 | syl2an 596 |
. 2
β’ ((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β 0 β€ ((πΏβπΉ) Β· (πβπΊ))) |
30 | 8 | ad2antrr 724 |
. . . . 5
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β π β NrmGrp) |
31 | 10 | ad2antrr 724 |
. . . . . . 7
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β πΉ β (π GrpHom π)) |
32 | | eqid 2732 |
. . . . . . . 8
β’
(Baseβπ) =
(Baseβπ) |
33 | | eqid 2732 |
. . . . . . . 8
β’
(Baseβπ) =
(Baseβπ) |
34 | 32, 33 | ghmf 19090 |
. . . . . . 7
β’ (πΉ β (π GrpHom π) β πΉ:(Baseβπ)βΆ(Baseβπ)) |
35 | 31, 34 | syl 17 |
. . . . . 6
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β πΉ:(Baseβπ)βΆ(Baseβπ)) |
36 | 11 | ad2antlr 725 |
. . . . . . . 8
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β πΊ β (π GrpHom π)) |
37 | 2, 32 | ghmf 19090 |
. . . . . . . 8
β’ (πΊ β (π GrpHom π) β πΊ:(Baseβπ)βΆ(Baseβπ)) |
38 | 36, 37 | syl 17 |
. . . . . . 7
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β πΊ:(Baseβπ)βΆ(Baseβπ)) |
39 | | simprl 769 |
. . . . . . 7
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β π₯ β (Baseβπ)) |
40 | 38, 39 | ffvelcdmd 7084 |
. . . . . 6
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β (πΊβπ₯) β (Baseβπ)) |
41 | 35, 40 | ffvelcdmd 7084 |
. . . . 5
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β (πΉβ(πΊβπ₯)) β (Baseβπ)) |
42 | 33, 4 | nmcl 24116 |
. . . . 5
β’ ((π β NrmGrp β§ (πΉβ(πΊβπ₯)) β (Baseβπ)) β ((normβπ)β(πΉβ(πΊβπ₯))) β β) |
43 | 30, 41, 42 | syl2anc 584 |
. . . 4
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β ((normβπ)β(πΉβ(πΊβπ₯))) β β) |
44 | 15 | ad2antrr 724 |
. . . . 5
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β (πΏβπΉ) β β) |
45 | 20 | ad2antrr 724 |
. . . . . 6
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β π β NrmGrp) |
46 | | eqid 2732 |
. . . . . . 7
β’
(normβπ) =
(normβπ) |
47 | 32, 46 | nmcl 24116 |
. . . . . 6
β’ ((π β NrmGrp β§ (πΊβπ₯) β (Baseβπ)) β ((normβπ)β(πΊβπ₯)) β β) |
48 | 45, 40, 47 | syl2anc 584 |
. . . . 5
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β ((normβπ)β(πΊβπ₯)) β β) |
49 | 44, 48 | remulcld 11240 |
. . . 4
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β ((πΏβπΉ) Β· ((normβπ)β(πΊβπ₯))) β β) |
50 | 17 | ad2antlr 725 |
. . . . . 6
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β (πβπΊ) β β) |
51 | 2, 3 | nmcl 24116 |
. . . . . . . 8
β’ ((π β NrmGrp β§ π₯ β (Baseβπ)) β ((normβπ)βπ₯) β β) |
52 | 6, 51 | sylan 580 |
. . . . . . 7
β’ ((πΊ β (π NGHom π) β§ π₯ β (Baseβπ)) β ((normβπ)βπ₯) β β) |
53 | 52 | ad2ant2lr 746 |
. . . . . 6
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β ((normβπ)βπ₯) β β) |
54 | 50, 53 | remulcld 11240 |
. . . . 5
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β ((πβπΊ) Β· ((normβπ)βπ₯)) β β) |
55 | 44, 54 | remulcld 11240 |
. . . 4
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β ((πΏβπΉ) Β· ((πβπΊ) Β· ((normβπ)βπ₯))) β β) |
56 | | simpll 765 |
. . . . 5
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β πΉ β (π NGHom π)) |
57 | 14, 32, 46, 4 | nmoi 24236 |
. . . . 5
β’ ((πΉ β (π NGHom π) β§ (πΊβπ₯) β (Baseβπ)) β ((normβπ)β(πΉβ(πΊβπ₯))) β€ ((πΏβπΉ) Β· ((normβπ)β(πΊβπ₯)))) |
58 | 56, 40, 57 | syl2anc 584 |
. . . 4
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β ((normβπ)β(πΉβ(πΊβπ₯))) β€ ((πΏβπΉ) Β· ((normβπ)β(πΊβπ₯)))) |
59 | 23 | ad2antrr 724 |
. . . . 5
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β ((πΏβπΉ) β β β§ 0 β€ (πΏβπΉ))) |
60 | 16, 2, 3, 46 | nmoi 24236 |
. . . . . 6
β’ ((πΊ β (π NGHom π) β§ π₯ β (Baseβπ)) β ((normβπ)β(πΊβπ₯)) β€ ((πβπΊ) Β· ((normβπ)βπ₯))) |
61 | 60 | ad2ant2lr 746 |
. . . . 5
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β ((normβπ)β(πΊβπ₯)) β€ ((πβπΊ) Β· ((normβπ)βπ₯))) |
62 | | lemul2a 12065 |
. . . . 5
β’
(((((normβπ)β(πΊβπ₯)) β β β§ ((πβπΊ) Β· ((normβπ)βπ₯)) β β β§ ((πΏβπΉ) β β β§ 0 β€ (πΏβπΉ))) β§ ((normβπ)β(πΊβπ₯)) β€ ((πβπΊ) Β· ((normβπ)βπ₯))) β ((πΏβπΉ) Β· ((normβπ)β(πΊβπ₯))) β€ ((πΏβπΉ) Β· ((πβπΊ) Β· ((normβπ)βπ₯)))) |
63 | 48, 54, 59, 61, 62 | syl31anc 1373 |
. . . 4
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β ((πΏβπΉ) Β· ((normβπ)β(πΊβπ₯))) β€ ((πΏβπΉ) Β· ((πβπΊ) Β· ((normβπ)βπ₯)))) |
64 | 43, 49, 55, 58, 63 | letrd 11367 |
. . 3
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β ((normβπ)β(πΉβ(πΊβπ₯))) β€ ((πΏβπΉ) Β· ((πβπΊ) Β· ((normβπ)βπ₯)))) |
65 | | fvco3 6987 |
. . . . 5
β’ ((πΊ:(Baseβπ)βΆ(Baseβπ) β§ π₯ β (Baseβπ)) β ((πΉ β πΊ)βπ₯) = (πΉβ(πΊβπ₯))) |
66 | 38, 39, 65 | syl2anc 584 |
. . . 4
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β ((πΉ β πΊ)βπ₯) = (πΉβ(πΊβπ₯))) |
67 | 66 | fveq2d 6892 |
. . 3
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β ((normβπ)β((πΉ β πΊ)βπ₯)) = ((normβπ)β(πΉβ(πΊβπ₯)))) |
68 | 44 | recnd 11238 |
. . . 4
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β (πΏβπΉ) β β) |
69 | 50 | recnd 11238 |
. . . 4
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β (πβπΊ) β β) |
70 | 53 | recnd 11238 |
. . . 4
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β ((normβπ)βπ₯) β β) |
71 | 68, 69, 70 | mulassd 11233 |
. . 3
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β (((πΏβπΉ) Β· (πβπΊ)) Β· ((normβπ)βπ₯)) = ((πΏβπΉ) Β· ((πβπΊ) Β· ((normβπ)βπ₯)))) |
72 | 64, 67, 71 | 3brtr4d 5179 |
. 2
β’ (((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β§ (π₯ β (Baseβπ) β§ π₯ β (0gβπ))) β ((normβπ)β((πΉ β πΊ)βπ₯)) β€ (((πΏβπΉ) Β· (πβπΊ)) Β· ((normβπ)βπ₯))) |
73 | 1, 2, 3, 4, 5, 7, 9, 13, 19, 29, 72 | nmolb2d 24226 |
1
β’ ((πΉ β (π NGHom π) β§ πΊ β (π NGHom π)) β (πβ(πΉ β πΊ)) β€ ((πΏβπΉ) Β· (πβπΊ))) |