![]() |
Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
|
Mirrors > Home > MPE Home > Th. List > lgsqrlem3 | Structured version Visualization version GIF version |
Description: Lemma for lgsqr 26702. (Contributed by Mario Carneiro, 15-Jun-2015.) |
Ref | Expression |
---|---|
lgsqr.y | ⊢ 𝑌 = (ℤ/nℤ‘𝑃) |
lgsqr.s | ⊢ 𝑆 = (Poly1‘𝑌) |
lgsqr.b | ⊢ 𝐵 = (Base‘𝑆) |
lgsqr.d | ⊢ 𝐷 = ( deg1 ‘𝑌) |
lgsqr.o | ⊢ 𝑂 = (eval1‘𝑌) |
lgsqr.e | ⊢ ↑ = (.g‘(mulGrp‘𝑆)) |
lgsqr.x | ⊢ 𝑋 = (var1‘𝑌) |
lgsqr.m | ⊢ − = (-g‘𝑆) |
lgsqr.u | ⊢ 1 = (1r‘𝑆) |
lgsqr.t | ⊢ 𝑇 = ((((𝑃 − 1) / 2) ↑ 𝑋) − 1 ) |
lgsqr.l | ⊢ 𝐿 = (ℤRHom‘𝑌) |
lgsqr.1 | ⊢ (𝜑 → 𝑃 ∈ (ℙ ∖ {2})) |
lgsqr.g | ⊢ 𝐺 = (𝑦 ∈ (1...((𝑃 − 1) / 2)) ↦ (𝐿‘(𝑦↑2))) |
lgsqr.3 | ⊢ (𝜑 → 𝐴 ∈ ℤ) |
lgsqr.4 | ⊢ (𝜑 → (𝐴 /L 𝑃) = 1) |
Ref | Expression |
---|---|
lgsqrlem3 | ⊢ (𝜑 → (𝐿‘𝐴) ∈ (◡(𝑂‘𝑇) “ {(0g‘𝑌)})) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | lgsqr.1 | . . . . . . . . . 10 ⊢ (𝜑 → 𝑃 ∈ (ℙ ∖ {2})) | |
2 | 1 | eldifad 3923 | . . . . . . . . 9 ⊢ (𝜑 → 𝑃 ∈ ℙ) |
3 | lgsqr.y | . . . . . . . . . 10 ⊢ 𝑌 = (ℤ/nℤ‘𝑃) | |
4 | 3 | znfld 20970 | . . . . . . . . 9 ⊢ (𝑃 ∈ ℙ → 𝑌 ∈ Field) |
5 | 2, 4 | syl 17 | . . . . . . . 8 ⊢ (𝜑 → 𝑌 ∈ Field) |
6 | fldidom 20778 | . . . . . . . 8 ⊢ (𝑌 ∈ Field → 𝑌 ∈ IDomn) | |
7 | 5, 6 | syl 17 | . . . . . . 7 ⊢ (𝜑 → 𝑌 ∈ IDomn) |
8 | isidom 20777 | . . . . . . . 8 ⊢ (𝑌 ∈ IDomn ↔ (𝑌 ∈ CRing ∧ 𝑌 ∈ Domn)) | |
9 | 8 | simplbi 499 | . . . . . . 7 ⊢ (𝑌 ∈ IDomn → 𝑌 ∈ CRing) |
10 | 7, 9 | syl 17 | . . . . . 6 ⊢ (𝜑 → 𝑌 ∈ CRing) |
11 | crngring 19977 | . . . . . 6 ⊢ (𝑌 ∈ CRing → 𝑌 ∈ Ring) | |
12 | 10, 11 | syl 17 | . . . . 5 ⊢ (𝜑 → 𝑌 ∈ Ring) |
13 | lgsqr.l | . . . . . 6 ⊢ 𝐿 = (ℤRHom‘𝑌) | |
14 | 13 | zrhrhm 20915 | . . . . 5 ⊢ (𝑌 ∈ Ring → 𝐿 ∈ (ℤring RingHom 𝑌)) |
15 | 12, 14 | syl 17 | . . . 4 ⊢ (𝜑 → 𝐿 ∈ (ℤring RingHom 𝑌)) |
16 | zringbas 20878 | . . . . 5 ⊢ ℤ = (Base‘ℤring) | |
17 | eqid 2737 | . . . . 5 ⊢ (Base‘𝑌) = (Base‘𝑌) | |
18 | 16, 17 | rhmf 20159 | . . . 4 ⊢ (𝐿 ∈ (ℤring RingHom 𝑌) → 𝐿:ℤ⟶(Base‘𝑌)) |
19 | 15, 18 | syl 17 | . . 3 ⊢ (𝜑 → 𝐿:ℤ⟶(Base‘𝑌)) |
20 | lgsqr.3 | . . 3 ⊢ (𝜑 → 𝐴 ∈ ℤ) | |
21 | 19, 20 | ffvelcdmd 7037 | . 2 ⊢ (𝜑 → (𝐿‘𝐴) ∈ (Base‘𝑌)) |
22 | lgsqr.s | . . 3 ⊢ 𝑆 = (Poly1‘𝑌) | |
23 | lgsqr.b | . . 3 ⊢ 𝐵 = (Base‘𝑆) | |
24 | lgsqr.d | . . 3 ⊢ 𝐷 = ( deg1 ‘𝑌) | |
25 | lgsqr.o | . . 3 ⊢ 𝑂 = (eval1‘𝑌) | |
26 | lgsqr.e | . . 3 ⊢ ↑ = (.g‘(mulGrp‘𝑆)) | |
27 | lgsqr.x | . . 3 ⊢ 𝑋 = (var1‘𝑌) | |
28 | lgsqr.m | . . 3 ⊢ − = (-g‘𝑆) | |
29 | lgsqr.u | . . 3 ⊢ 1 = (1r‘𝑆) | |
30 | lgsqr.t | . . 3 ⊢ 𝑇 = ((((𝑃 − 1) / 2) ↑ 𝑋) − 1 ) | |
31 | lgsvalmod 26667 | . . . . 5 ⊢ ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ((𝐴 /L 𝑃) mod 𝑃) = ((𝐴↑((𝑃 − 1) / 2)) mod 𝑃)) | |
32 | 20, 1, 31 | syl2anc 585 | . . . 4 ⊢ (𝜑 → ((𝐴 /L 𝑃) mod 𝑃) = ((𝐴↑((𝑃 − 1) / 2)) mod 𝑃)) |
33 | lgsqr.4 | . . . . 5 ⊢ (𝜑 → (𝐴 /L 𝑃) = 1) | |
34 | 33 | oveq1d 7373 | . . . 4 ⊢ (𝜑 → ((𝐴 /L 𝑃) mod 𝑃) = (1 mod 𝑃)) |
35 | 32, 34 | eqtr3d 2779 | . . 3 ⊢ (𝜑 → ((𝐴↑((𝑃 − 1) / 2)) mod 𝑃) = (1 mod 𝑃)) |
36 | 3, 22, 23, 24, 25, 26, 27, 28, 29, 30, 13, 1, 20, 35 | lgsqrlem1 26697 | . 2 ⊢ (𝜑 → ((𝑂‘𝑇)‘(𝐿‘𝐴)) = (0g‘𝑌)) |
37 | eqid 2737 | . . . . 5 ⊢ (𝑌 ↑s (Base‘𝑌)) = (𝑌 ↑s (Base‘𝑌)) | |
38 | eqid 2737 | . . . . 5 ⊢ (Base‘(𝑌 ↑s (Base‘𝑌))) = (Base‘(𝑌 ↑s (Base‘𝑌))) | |
39 | fvexd 6858 | . . . . 5 ⊢ (𝜑 → (Base‘𝑌) ∈ V) | |
40 | 25, 22, 37, 17 | evl1rhm 21701 | . . . . . . . 8 ⊢ (𝑌 ∈ CRing → 𝑂 ∈ (𝑆 RingHom (𝑌 ↑s (Base‘𝑌)))) |
41 | 10, 40 | syl 17 | . . . . . . 7 ⊢ (𝜑 → 𝑂 ∈ (𝑆 RingHom (𝑌 ↑s (Base‘𝑌)))) |
42 | 23, 38 | rhmf 20159 | . . . . . . 7 ⊢ (𝑂 ∈ (𝑆 RingHom (𝑌 ↑s (Base‘𝑌))) → 𝑂:𝐵⟶(Base‘(𝑌 ↑s (Base‘𝑌)))) |
43 | 41, 42 | syl 17 | . . . . . 6 ⊢ (𝜑 → 𝑂:𝐵⟶(Base‘(𝑌 ↑s (Base‘𝑌)))) |
44 | 22 | ply1ring 21622 | . . . . . . . . . 10 ⊢ (𝑌 ∈ Ring → 𝑆 ∈ Ring) |
45 | 12, 44 | syl 17 | . . . . . . . . 9 ⊢ (𝜑 → 𝑆 ∈ Ring) |
46 | ringgrp 19970 | . . . . . . . . 9 ⊢ (𝑆 ∈ Ring → 𝑆 ∈ Grp) | |
47 | 45, 46 | syl 17 | . . . . . . . 8 ⊢ (𝜑 → 𝑆 ∈ Grp) |
48 | eqid 2737 | . . . . . . . . . 10 ⊢ (mulGrp‘𝑆) = (mulGrp‘𝑆) | |
49 | 48, 23 | mgpbas 19903 | . . . . . . . . 9 ⊢ 𝐵 = (Base‘(mulGrp‘𝑆)) |
50 | 48 | ringmgp 19971 | . . . . . . . . . 10 ⊢ (𝑆 ∈ Ring → (mulGrp‘𝑆) ∈ Mnd) |
51 | 45, 50 | syl 17 | . . . . . . . . 9 ⊢ (𝜑 → (mulGrp‘𝑆) ∈ Mnd) |
52 | oddprm 16683 | . . . . . . . . . . 11 ⊢ (𝑃 ∈ (ℙ ∖ {2}) → ((𝑃 − 1) / 2) ∈ ℕ) | |
53 | 1, 52 | syl 17 | . . . . . . . . . 10 ⊢ (𝜑 → ((𝑃 − 1) / 2) ∈ ℕ) |
54 | 53 | nnnn0d 12474 | . . . . . . . . 9 ⊢ (𝜑 → ((𝑃 − 1) / 2) ∈ ℕ0) |
55 | 27, 22, 23 | vr1cl 21591 | . . . . . . . . . 10 ⊢ (𝑌 ∈ Ring → 𝑋 ∈ 𝐵) |
56 | 12, 55 | syl 17 | . . . . . . . . 9 ⊢ (𝜑 → 𝑋 ∈ 𝐵) |
57 | 49, 26, 51, 54, 56 | mulgnn0cld 18898 | . . . . . . . 8 ⊢ (𝜑 → (((𝑃 − 1) / 2) ↑ 𝑋) ∈ 𝐵) |
58 | 23, 29 | ringidcl 19990 | . . . . . . . . 9 ⊢ (𝑆 ∈ Ring → 1 ∈ 𝐵) |
59 | 45, 58 | syl 17 | . . . . . . . 8 ⊢ (𝜑 → 1 ∈ 𝐵) |
60 | 23, 28 | grpsubcl 18828 | . . . . . . . 8 ⊢ ((𝑆 ∈ Grp ∧ (((𝑃 − 1) / 2) ↑ 𝑋) ∈ 𝐵 ∧ 1 ∈ 𝐵) → ((((𝑃 − 1) / 2) ↑ 𝑋) − 1 ) ∈ 𝐵) |
61 | 47, 57, 59, 60 | syl3anc 1372 | . . . . . . 7 ⊢ (𝜑 → ((((𝑃 − 1) / 2) ↑ 𝑋) − 1 ) ∈ 𝐵) |
62 | 30, 61 | eqeltrid 2842 | . . . . . 6 ⊢ (𝜑 → 𝑇 ∈ 𝐵) |
63 | 43, 62 | ffvelcdmd 7037 | . . . . 5 ⊢ (𝜑 → (𝑂‘𝑇) ∈ (Base‘(𝑌 ↑s (Base‘𝑌)))) |
64 | 37, 17, 38, 5, 39, 63 | pwselbas 17372 | . . . 4 ⊢ (𝜑 → (𝑂‘𝑇):(Base‘𝑌)⟶(Base‘𝑌)) |
65 | 64 | ffnd 6670 | . . 3 ⊢ (𝜑 → (𝑂‘𝑇) Fn (Base‘𝑌)) |
66 | fniniseg 7011 | . . 3 ⊢ ((𝑂‘𝑇) Fn (Base‘𝑌) → ((𝐿‘𝐴) ∈ (◡(𝑂‘𝑇) “ {(0g‘𝑌)}) ↔ ((𝐿‘𝐴) ∈ (Base‘𝑌) ∧ ((𝑂‘𝑇)‘(𝐿‘𝐴)) = (0g‘𝑌)))) | |
67 | 65, 66 | syl 17 | . 2 ⊢ (𝜑 → ((𝐿‘𝐴) ∈ (◡(𝑂‘𝑇) “ {(0g‘𝑌)}) ↔ ((𝐿‘𝐴) ∈ (Base‘𝑌) ∧ ((𝑂‘𝑇)‘(𝐿‘𝐴)) = (0g‘𝑌)))) |
68 | 21, 36, 67 | mpbir2and 712 | 1 ⊢ (𝜑 → (𝐿‘𝐴) ∈ (◡(𝑂‘𝑇) “ {(0g‘𝑌)})) |
Colors of variables: wff setvar class |
Syntax hints: → wi 4 ↔ wb 205 ∧ wa 397 = wceq 1542 ∈ wcel 2107 Vcvv 3446 ∖ cdif 3908 {csn 4587 ↦ cmpt 5189 ◡ccnv 5633 “ cima 5637 Fn wfn 6492 ⟶wf 6493 ‘cfv 6497 (class class class)co 7358 1c1 11053 − cmin 11386 / cdiv 11813 ℕcn 12154 2c2 12209 ℤcz 12500 ...cfz 13425 mod cmo 13775 ↑cexp 13968 ℙcprime 16548 Basecbs 17084 0gc0g 17322 ↑s cpws 17329 Mndcmnd 18557 Grpcgrp 18749 -gcsg 18751 .gcmg 18873 mulGrpcmgp 19897 1rcur 19914 Ringcrg 19965 CRingccrg 19966 RingHom crh 20144 Fieldcfield 20187 Domncdomn 20753 IDomncidom 20754 ℤringczring 20872 ℤRHomczrh 20903 ℤ/nℤczn 20906 var1cv1 21550 Poly1cpl1 21551 eval1ce1 21683 deg1 cdg1 25419 /L clgs 26645 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2708 ax-rep 5243 ax-sep 5257 ax-nul 5264 ax-pow 5321 ax-pr 5385 ax-un 7673 ax-cnex 11108 ax-resscn 11109 ax-1cn 11110 ax-icn 11111 ax-addcl 11112 ax-addrcl 11113 ax-mulcl 11114 ax-mulrcl 11115 ax-mulcom 11116 ax-addass 11117 ax-mulass 11118 ax-distr 11119 ax-i2m1 11120 ax-1ne0 11121 ax-1rid 11122 ax-rnegex 11123 ax-rrecex 11124 ax-cnre 11125 ax-pre-lttri 11126 ax-pre-lttrn 11127 ax-pre-ltadd 11128 ax-pre-mulgt0 11129 ax-pre-sup 11130 ax-addf 11131 ax-mulf 11132 |
This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-3or 1089 df-3an 1090 df-tru 1545 df-fal 1555 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2539 df-eu 2568 df-clab 2715 df-cleq 2729 df-clel 2815 df-nfc 2890 df-ne 2945 df-nel 3051 df-ral 3066 df-rex 3075 df-rmo 3354 df-reu 3355 df-rab 3409 df-v 3448 df-sbc 3741 df-csb 3857 df-dif 3914 df-un 3916 df-in 3918 df-ss 3928 df-pss 3930 df-nul 4284 df-if 4488 df-pw 4563 df-sn 4588 df-pr 4590 df-tp 4592 df-op 4594 df-uni 4867 df-int 4909 df-iun 4957 df-iin 4958 df-br 5107 df-opab 5169 df-mpt 5190 df-tr 5224 df-id 5532 df-eprel 5538 df-po 5546 df-so 5547 df-fr 5589 df-se 5590 df-we 5591 df-xp 5640 df-rel 5641 df-cnv 5642 df-co 5643 df-dm 5644 df-rn 5645 df-res 5646 df-ima 5647 df-pred 6254 df-ord 6321 df-on 6322 df-lim 6323 df-suc 6324 df-iota 6449 df-fun 6499 df-fn 6500 df-f 6501 df-f1 6502 df-fo 6503 df-f1o 6504 df-fv 6505 df-isom 6506 df-riota 7314 df-ov 7361 df-oprab 7362 df-mpo 7363 df-of 7618 df-ofr 7619 df-om 7804 df-1st 7922 df-2nd 7923 df-supp 8094 df-tpos 8158 df-frecs 8213 df-wrecs 8244 df-recs 8318 df-rdg 8357 df-1o 8413 df-2o 8414 df-oadd 8417 df-er 8649 df-ec 8651 df-qs 8655 df-map 8768 df-pm 8769 df-ixp 8837 df-en 8885 df-dom 8886 df-sdom 8887 df-fin 8888 df-fsupp 9307 df-sup 9379 df-inf 9380 df-oi 9447 df-dju 9838 df-card 9876 df-pnf 11192 df-mnf 11193 df-xr 11194 df-ltxr 11195 df-le 11196 df-sub 11388 df-neg 11389 df-div 11814 df-nn 12155 df-2 12217 df-3 12218 df-4 12219 df-5 12220 df-6 12221 df-7 12222 df-8 12223 df-9 12224 df-n0 12415 df-xnn0 12487 df-z 12501 df-dec 12620 df-uz 12765 df-q 12875 df-rp 12917 df-fz 13426 df-fzo 13569 df-fl 13698 df-mod 13776 df-seq 13908 df-exp 13969 df-hash 14232 df-cj 14985 df-re 14986 df-im 14987 df-sqrt 15121 df-abs 15122 df-dvds 16138 df-gcd 16376 df-prm 16549 df-phi 16639 df-pc 16710 df-struct 17020 df-sets 17037 df-slot 17055 df-ndx 17067 df-base 17085 df-ress 17114 df-plusg 17147 df-mulr 17148 df-starv 17149 df-sca 17150 df-vsca 17151 df-ip 17152 df-tset 17153 df-ple 17154 df-ds 17156 df-unif 17157 df-hom 17158 df-cco 17159 df-0g 17324 df-gsum 17325 df-prds 17330 df-pws 17332 df-imas 17391 df-qus 17392 df-mre 17467 df-mrc 17468 df-acs 17470 df-mgm 18498 df-sgrp 18547 df-mnd 18558 df-mhm 18602 df-submnd 18603 df-grp 18752 df-minusg 18753 df-sbg 18754 df-mulg 18874 df-subg 18926 df-nsg 18927 df-eqg 18928 df-ghm 19007 df-cntz 19098 df-cmn 19565 df-abl 19566 df-mgp 19898 df-ur 19915 df-srg 19919 df-ring 19967 df-cring 19968 df-oppr 20050 df-dvdsr 20071 df-unit 20072 df-invr 20102 df-dvr 20113 df-rnghom 20147 df-drng 20188 df-field 20189 df-subrg 20223 df-lmod 20327 df-lss 20396 df-lsp 20436 df-sra 20636 df-rgmod 20637 df-lidl 20638 df-rsp 20639 df-2idl 20705 df-nzr 20731 df-rlreg 20756 df-domn 20757 df-idom 20758 df-cnfld 20800 df-zring 20873 df-zrh 20907 df-zn 20910 df-assa 21262 df-asp 21263 df-ascl 21264 df-psr 21314 df-mvr 21315 df-mpl 21316 df-opsr 21318 df-evls 21485 df-evl 21486 df-psr1 21554 df-vr1 21555 df-ply1 21556 df-evl1 21685 df-lgs 26646 |
This theorem is referenced by: lgsqrlem4 26700 |
Copyright terms: Public domain | W3C validator |