Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
||
Mirrors > Home > MPE Home > Th. List > lgsqrlem3 | Structured version Visualization version GIF version |
Description: Lemma for lgsqr 25921. (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 3948 | . . . . . . . . 9 ⊢ (𝜑 → 𝑃 ∈ ℙ) |
3 | lgsqr.y | . . . . . . . . . 10 ⊢ 𝑌 = (ℤ/nℤ‘𝑃) | |
4 | 3 | znfld 20701 | . . . . . . . . 9 ⊢ (𝑃 ∈ ℙ → 𝑌 ∈ Field) |
5 | 2, 4 | syl 17 | . . . . . . . 8 ⊢ (𝜑 → 𝑌 ∈ Field) |
6 | fldidom 20072 | . . . . . . . 8 ⊢ (𝑌 ∈ Field → 𝑌 ∈ IDomn) | |
7 | 5, 6 | syl 17 | . . . . . . 7 ⊢ (𝜑 → 𝑌 ∈ IDomn) |
8 | isidom 20071 | . . . . . . . 8 ⊢ (𝑌 ∈ IDomn ↔ (𝑌 ∈ CRing ∧ 𝑌 ∈ Domn)) | |
9 | 8 | simplbi 500 | . . . . . . 7 ⊢ (𝑌 ∈ IDomn → 𝑌 ∈ CRing) |
10 | 7, 9 | syl 17 | . . . . . 6 ⊢ (𝜑 → 𝑌 ∈ CRing) |
11 | crngring 19302 | . . . . . 6 ⊢ (𝑌 ∈ CRing → 𝑌 ∈ Ring) | |
12 | 10, 11 | syl 17 | . . . . 5 ⊢ (𝜑 → 𝑌 ∈ Ring) |
13 | lgsqr.l | . . . . . 6 ⊢ 𝐿 = (ℤRHom‘𝑌) | |
14 | 13 | zrhrhm 20653 | . . . . 5 ⊢ (𝑌 ∈ Ring → 𝐿 ∈ (ℤring RingHom 𝑌)) |
15 | 12, 14 | syl 17 | . . . 4 ⊢ (𝜑 → 𝐿 ∈ (ℤring RingHom 𝑌)) |
16 | zringbas 20617 | . . . . 5 ⊢ ℤ = (Base‘ℤring) | |
17 | eqid 2821 | . . . . 5 ⊢ (Base‘𝑌) = (Base‘𝑌) | |
18 | 16, 17 | rhmf 19472 | . . . 4 ⊢ (𝐿 ∈ (ℤring RingHom 𝑌) → 𝐿:ℤ⟶(Base‘𝑌)) |
19 | 15, 18 | syl 17 | . . 3 ⊢ (𝜑 → 𝐿:ℤ⟶(Base‘𝑌)) |
20 | lgsqr.3 | . . 3 ⊢ (𝜑 → 𝐴 ∈ ℤ) | |
21 | 19, 20 | ffvelrnd 6847 | . 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 25886 | . . . . 5 ⊢ ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ((𝐴 /L 𝑃) mod 𝑃) = ((𝐴↑((𝑃 − 1) / 2)) mod 𝑃)) | |
32 | 20, 1, 31 | syl2anc 586 | . . . 4 ⊢ (𝜑 → ((𝐴 /L 𝑃) mod 𝑃) = ((𝐴↑((𝑃 − 1) / 2)) mod 𝑃)) |
33 | lgsqr.4 | . . . . 5 ⊢ (𝜑 → (𝐴 /L 𝑃) = 1) | |
34 | 33 | oveq1d 7165 | . . . 4 ⊢ (𝜑 → ((𝐴 /L 𝑃) mod 𝑃) = (1 mod 𝑃)) |
35 | 32, 34 | eqtr3d 2858 | . . 3 ⊢ (𝜑 → ((𝐴↑((𝑃 − 1) / 2)) mod 𝑃) = (1 mod 𝑃)) |
36 | 3, 22, 23, 24, 25, 26, 27, 28, 29, 30, 13, 1, 20, 35 | lgsqrlem1 25916 | . 2 ⊢ (𝜑 → ((𝑂‘𝑇)‘(𝐿‘𝐴)) = (0g‘𝑌)) |
37 | eqid 2821 | . . . . 5 ⊢ (𝑌 ↑s (Base‘𝑌)) = (𝑌 ↑s (Base‘𝑌)) | |
38 | eqid 2821 | . . . . 5 ⊢ (Base‘(𝑌 ↑s (Base‘𝑌))) = (Base‘(𝑌 ↑s (Base‘𝑌))) | |
39 | fvexd 6680 | . . . . 5 ⊢ (𝜑 → (Base‘𝑌) ∈ V) | |
40 | 25, 22, 37, 17 | evl1rhm 20489 | . . . . . . . 8 ⊢ (𝑌 ∈ CRing → 𝑂 ∈ (𝑆 RingHom (𝑌 ↑s (Base‘𝑌)))) |
41 | 10, 40 | syl 17 | . . . . . . 7 ⊢ (𝜑 → 𝑂 ∈ (𝑆 RingHom (𝑌 ↑s (Base‘𝑌)))) |
42 | 23, 38 | rhmf 19472 | . . . . . . 7 ⊢ (𝑂 ∈ (𝑆 RingHom (𝑌 ↑s (Base‘𝑌))) → 𝑂:𝐵⟶(Base‘(𝑌 ↑s (Base‘𝑌)))) |
43 | 41, 42 | syl 17 | . . . . . 6 ⊢ (𝜑 → 𝑂:𝐵⟶(Base‘(𝑌 ↑s (Base‘𝑌)))) |
44 | 22 | ply1ring 20410 | . . . . . . . . . 10 ⊢ (𝑌 ∈ Ring → 𝑆 ∈ Ring) |
45 | 12, 44 | syl 17 | . . . . . . . . 9 ⊢ (𝜑 → 𝑆 ∈ Ring) |
46 | ringgrp 19296 | . . . . . . . . 9 ⊢ (𝑆 ∈ Ring → 𝑆 ∈ Grp) | |
47 | 45, 46 | syl 17 | . . . . . . . 8 ⊢ (𝜑 → 𝑆 ∈ Grp) |
48 | eqid 2821 | . . . . . . . . . . 11 ⊢ (mulGrp‘𝑆) = (mulGrp‘𝑆) | |
49 | 48 | ringmgp 19297 | . . . . . . . . . 10 ⊢ (𝑆 ∈ Ring → (mulGrp‘𝑆) ∈ Mnd) |
50 | 45, 49 | syl 17 | . . . . . . . . 9 ⊢ (𝜑 → (mulGrp‘𝑆) ∈ Mnd) |
51 | oddprm 16141 | . . . . . . . . . . 11 ⊢ (𝑃 ∈ (ℙ ∖ {2}) → ((𝑃 − 1) / 2) ∈ ℕ) | |
52 | 1, 51 | syl 17 | . . . . . . . . . 10 ⊢ (𝜑 → ((𝑃 − 1) / 2) ∈ ℕ) |
53 | 52 | nnnn0d 11949 | . . . . . . . . 9 ⊢ (𝜑 → ((𝑃 − 1) / 2) ∈ ℕ0) |
54 | 27, 22, 23 | vr1cl 20379 | . . . . . . . . . 10 ⊢ (𝑌 ∈ Ring → 𝑋 ∈ 𝐵) |
55 | 12, 54 | syl 17 | . . . . . . . . 9 ⊢ (𝜑 → 𝑋 ∈ 𝐵) |
56 | 48, 23 | mgpbas 19239 | . . . . . . . . . 10 ⊢ 𝐵 = (Base‘(mulGrp‘𝑆)) |
57 | 56, 26 | mulgnn0cl 18238 | . . . . . . . . 9 ⊢ (((mulGrp‘𝑆) ∈ Mnd ∧ ((𝑃 − 1) / 2) ∈ ℕ0 ∧ 𝑋 ∈ 𝐵) → (((𝑃 − 1) / 2) ↑ 𝑋) ∈ 𝐵) |
58 | 50, 53, 55, 57 | syl3anc 1367 | . . . . . . . 8 ⊢ (𝜑 → (((𝑃 − 1) / 2) ↑ 𝑋) ∈ 𝐵) |
59 | 23, 29 | ringidcl 19312 | . . . . . . . . 9 ⊢ (𝑆 ∈ Ring → 1 ∈ 𝐵) |
60 | 45, 59 | syl 17 | . . . . . . . 8 ⊢ (𝜑 → 1 ∈ 𝐵) |
61 | 23, 28 | grpsubcl 18173 | . . . . . . . 8 ⊢ ((𝑆 ∈ Grp ∧ (((𝑃 − 1) / 2) ↑ 𝑋) ∈ 𝐵 ∧ 1 ∈ 𝐵) → ((((𝑃 − 1) / 2) ↑ 𝑋) − 1 ) ∈ 𝐵) |
62 | 47, 58, 60, 61 | syl3anc 1367 | . . . . . . 7 ⊢ (𝜑 → ((((𝑃 − 1) / 2) ↑ 𝑋) − 1 ) ∈ 𝐵) |
63 | 30, 62 | eqeltrid 2917 | . . . . . 6 ⊢ (𝜑 → 𝑇 ∈ 𝐵) |
64 | 43, 63 | ffvelrnd 6847 | . . . . 5 ⊢ (𝜑 → (𝑂‘𝑇) ∈ (Base‘(𝑌 ↑s (Base‘𝑌)))) |
65 | 37, 17, 38, 5, 39, 64 | pwselbas 16756 | . . . 4 ⊢ (𝜑 → (𝑂‘𝑇):(Base‘𝑌)⟶(Base‘𝑌)) |
66 | 65 | ffnd 6510 | . . 3 ⊢ (𝜑 → (𝑂‘𝑇) Fn (Base‘𝑌)) |
67 | fniniseg 6825 | . . 3 ⊢ ((𝑂‘𝑇) Fn (Base‘𝑌) → ((𝐿‘𝐴) ∈ (◡(𝑂‘𝑇) “ {(0g‘𝑌)}) ↔ ((𝐿‘𝐴) ∈ (Base‘𝑌) ∧ ((𝑂‘𝑇)‘(𝐿‘𝐴)) = (0g‘𝑌)))) | |
68 | 66, 67 | syl 17 | . 2 ⊢ (𝜑 → ((𝐿‘𝐴) ∈ (◡(𝑂‘𝑇) “ {(0g‘𝑌)}) ↔ ((𝐿‘𝐴) ∈ (Base‘𝑌) ∧ ((𝑂‘𝑇)‘(𝐿‘𝐴)) = (0g‘𝑌)))) |
69 | 21, 36, 68 | mpbir2and 711 | 1 ⊢ (𝜑 → (𝐿‘𝐴) ∈ (◡(𝑂‘𝑇) “ {(0g‘𝑌)})) |
Colors of variables: wff setvar class |
Syntax hints: → wi 4 ↔ wb 208 ∧ wa 398 = wceq 1533 ∈ wcel 2110 Vcvv 3495 ∖ cdif 3933 {csn 4561 ↦ cmpt 5139 ◡ccnv 5549 “ cima 5553 Fn wfn 6345 ⟶wf 6346 ‘cfv 6350 (class class class)co 7150 1c1 10532 − cmin 10864 / cdiv 11291 ℕcn 11632 2c2 11686 ℕ0cn0 11891 ℤcz 11975 ...cfz 12886 mod cmo 13231 ↑cexp 13423 ℙcprime 16009 Basecbs 16477 0gc0g 16707 ↑s cpws 16714 Mndcmnd 17905 Grpcgrp 18097 -gcsg 18099 .gcmg 18218 mulGrpcmgp 19233 1rcur 19245 Ringcrg 19291 CRingccrg 19292 RingHom crh 19458 Fieldcfield 19497 Domncdomn 20047 IDomncidom 20048 var1cv1 20338 Poly1cpl1 20339 eval1ce1 20471 ℤringzring 20611 ℤRHomczrh 20641 ℤ/nℤczn 20644 deg1 cdg1 24642 /L clgs 25864 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1792 ax-4 1806 ax-5 1907 ax-6 1966 ax-7 2011 ax-8 2112 ax-9 2120 ax-10 2141 ax-11 2156 ax-12 2172 ax-ext 2793 ax-rep 5183 ax-sep 5196 ax-nul 5203 ax-pow 5259 ax-pr 5322 ax-un 7455 ax-cnex 10587 ax-resscn 10588 ax-1cn 10589 ax-icn 10590 ax-addcl 10591 ax-addrcl 10592 ax-mulcl 10593 ax-mulrcl 10594 ax-mulcom 10595 ax-addass 10596 ax-mulass 10597 ax-distr 10598 ax-i2m1 10599 ax-1ne0 10600 ax-1rid 10601 ax-rnegex 10602 ax-rrecex 10603 ax-cnre 10604 ax-pre-lttri 10605 ax-pre-lttrn 10606 ax-pre-ltadd 10607 ax-pre-mulgt0 10608 ax-pre-sup 10609 ax-addf 10610 ax-mulf 10611 |
This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1536 df-ex 1777 df-nf 1781 df-sb 2066 df-mo 2618 df-eu 2650 df-clab 2800 df-cleq 2814 df-clel 2893 df-nfc 2963 df-ne 3017 df-nel 3124 df-ral 3143 df-rex 3144 df-reu 3145 df-rmo 3146 df-rab 3147 df-v 3497 df-sbc 3773 df-csb 3884 df-dif 3939 df-un 3941 df-in 3943 df-ss 3952 df-pss 3954 df-nul 4292 df-if 4468 df-pw 4541 df-sn 4562 df-pr 4564 df-tp 4566 df-op 4568 df-uni 4833 df-int 4870 df-iun 4914 df-iin 4915 df-br 5060 df-opab 5122 df-mpt 5140 df-tr 5166 df-id 5455 df-eprel 5460 df-po 5469 df-so 5470 df-fr 5509 df-se 5510 df-we 5511 df-xp 5556 df-rel 5557 df-cnv 5558 df-co 5559 df-dm 5560 df-rn 5561 df-res 5562 df-ima 5563 df-pred 6143 df-ord 6189 df-on 6190 df-lim 6191 df-suc 6192 df-iota 6309 df-fun 6352 df-fn 6353 df-f 6354 df-f1 6355 df-fo 6356 df-f1o 6357 df-fv 6358 df-isom 6359 df-riota 7108 df-ov 7153 df-oprab 7154 df-mpo 7155 df-of 7403 df-ofr 7404 df-om 7575 df-1st 7683 df-2nd 7684 df-supp 7825 df-tpos 7886 df-wrecs 7941 df-recs 8002 df-rdg 8040 df-1o 8096 df-2o 8097 df-oadd 8100 df-er 8283 df-ec 8285 df-qs 8289 df-map 8402 df-pm 8403 df-ixp 8456 df-en 8504 df-dom 8505 df-sdom 8506 df-fin 8507 df-fsupp 8828 df-sup 8900 df-inf 8901 df-oi 8968 df-dju 9324 df-card 9362 df-pnf 10671 df-mnf 10672 df-xr 10673 df-ltxr 10674 df-le 10675 df-sub 10866 df-neg 10867 df-div 11292 df-nn 11633 df-2 11694 df-3 11695 df-4 11696 df-5 11697 df-6 11698 df-7 11699 df-8 11700 df-9 11701 df-n0 11892 df-xnn0 11962 df-z 11976 df-dec 12093 df-uz 12238 df-q 12343 df-rp 12384 df-fz 12887 df-fzo 13028 df-fl 13156 df-mod 13232 df-seq 13364 df-exp 13424 df-hash 13685 df-cj 14452 df-re 14453 df-im 14454 df-sqrt 14588 df-abs 14589 df-dvds 15602 df-gcd 15838 df-prm 16010 df-phi 16097 df-pc 16168 df-struct 16479 df-ndx 16480 df-slot 16481 df-base 16483 df-sets 16484 df-ress 16485 df-plusg 16572 df-mulr 16573 df-starv 16574 df-sca 16575 df-vsca 16576 df-ip 16577 df-tset 16578 df-ple 16579 df-ds 16581 df-unif 16582 df-hom 16583 df-cco 16584 df-0g 16709 df-gsum 16710 df-prds 16715 df-pws 16717 df-imas 16775 df-qus 16776 df-mre 16851 df-mrc 16852 df-acs 16854 df-mgm 17846 df-sgrp 17895 df-mnd 17906 df-mhm 17950 df-submnd 17951 df-grp 18100 df-minusg 18101 df-sbg 18102 df-mulg 18219 df-subg 18270 df-nsg 18271 df-eqg 18272 df-ghm 18350 df-cntz 18441 df-cmn 18902 df-abl 18903 df-mgp 19234 df-ur 19246 df-srg 19250 df-ring 19293 df-cring 19294 df-oppr 19367 df-dvdsr 19385 df-unit 19386 df-invr 19416 df-dvr 19427 df-rnghom 19461 df-drng 19498 df-field 19499 df-subrg 19527 df-lmod 19630 df-lss 19698 df-lsp 19738 df-sra 19938 df-rgmod 19939 df-lidl 19940 df-rsp 19941 df-2idl 19999 df-nzr 20025 df-rlreg 20050 df-domn 20051 df-idom 20052 df-assa 20079 df-asp 20080 df-ascl 20081 df-psr 20130 df-mvr 20131 df-mpl 20132 df-opsr 20134 df-evls 20280 df-evl 20281 df-psr1 20342 df-vr1 20343 df-ply1 20344 df-evl1 20473 df-cnfld 20540 df-zring 20612 df-zrh 20645 df-zn 20648 df-lgs 25865 |
This theorem is referenced by: lgsqrlem4 25919 |
Copyright terms: Public domain | W3C validator |