Theorem lgsqrlem2 27612

Description: Lemma for lgsqr 27616. (Contributed by Mario Carneiro, 15-Jun-2015.)

Hypotheses

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)))

Assertion

Ref	Expression
lgsqrlem2	⊢ (𝜑 → 𝐺:(1...((𝑃 − 1) / 2))–1-1→(◡(𝑂‘𝑇) “ {(0g‘𝑌)}))

Distinct variable groups:   𝑦,𝑂   𝑦,𝑃   𝜑,𝑦   𝑦,𝑇   𝑦,𝐿   𝑦,𝑌

Allowed substitution hints:   𝐵(𝑦)   𝐷(𝑦)   𝑆(𝑦)   1 (𝑦)   ↑ (𝑦)   𝐺(𝑦)   − (𝑦)   𝑋(𝑦)

Proof of Theorem lgsqrlem2

Dummy variables 𝑥 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		lgsqr.1	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑃 ∈ (ℙ ∖ {2}))
2	1	eldifad 3911	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑃 ∈ ℙ)
3		lgsqr.y	. . . . . . . . . . . . 13 ⊢ 𝑌 = (ℤ/nℤ‘𝑃)
4	3	znfld 21802	. . . . . . . . . . . 12 ⊢ (𝑃 ∈ ℙ → 𝑌 ∈ Field)
5	2, 4	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑌 ∈ Field)
6		fldidom 20965	. . . . . . . . . . 11 ⊢ (𝑌 ∈ Field → 𝑌 ∈ IDomn)
7	5, 6	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → 𝑌 ∈ IDomn)
8		isidom 20912	. . . . . . . . . . 11 ⊢ (𝑌 ∈ IDomn ↔ (𝑌 ∈ CRing ∧ 𝑌 ∈ Domn))
9	8	simplbi 502	. . . . . . . . . 10 ⊢ (𝑌 ∈ IDomn → 𝑌 ∈ CRing)
10	7, 9	syl 18	. . . . . . . . 9 ⊢ (𝜑 → 𝑌 ∈ CRing)
11		crngring 20408	. . . . . . . . 9 ⊢ (𝑌 ∈ CRing → 𝑌 ∈ Ring)
12	10, 11	syl 18	. . . . . . . 8 ⊢ (𝜑 → 𝑌 ∈ Ring)
13		lgsqr.l	. . . . . . . . 9 ⊢ 𝐿 = (ℤRHom‘𝑌)
14	13	zrhrhm 21753	. . . . . . . 8 ⊢ (𝑌 ∈ Ring → 𝐿 ∈ (ℤring RingHom 𝑌))
15	12, 14	syl 18	. . . . . . 7 ⊢ (𝜑 → 𝐿 ∈ (ℤring RingHom 𝑌))
16		zringbas 21695	. . . . . . . 8 ⊢ ℤ = (Base‘ℤring)
17		eqid 2760	. . . . . . . 8 ⊢ (Base‘𝑌) = (Base‘𝑌)
18	16, 17	rhmf 20651	. . . . . . 7 ⊢ (𝐿 ∈ (ℤring RingHom 𝑌) → 𝐿:ℤ⟶(Base‘𝑌))
19	15, 18	syl 18	. . . . . 6 ⊢ (𝜑 → 𝐿:ℤ⟶(Base‘𝑌))
20	19	adantr 486	. . . . 5 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝐿:ℤ⟶(Base‘𝑌))
21		elfzelz 13600	. . . . . . 7 ⊢ (𝑦 ∈ (1...((𝑃 − 1) / 2)) → 𝑦 ∈ ℤ)
22	21	adantl 487	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑦 ∈ ℤ)
23		zsqcl 14215	. . . . . 6 ⊢ (𝑦 ∈ ℤ → (𝑦↑2) ∈ ℤ)
24	22, 23	syl 18	. . . . 5 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑦↑2) ∈ ℤ)
25	20, 24	ffvelcdmd 7080	. . . 4 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝐿‘(𝑦↑2)) ∈ (Base‘𝑌))
26		lgsqr.s	. . . . 5 ⊢ 𝑆 = (Poly1‘𝑌)
27		lgsqr.b	. . . . 5 ⊢ 𝐵 = (Base‘𝑆)
28		lgsqr.d	. . . . 5 ⊢ 𝐷 = (deg1‘𝑌)
29		lgsqr.o	. . . . 5 ⊢ 𝑂 = (eval1‘𝑌)
30		lgsqr.e	. . . . 5 ⊢ ↑ = (.g‘(mulGrp‘𝑆))
31		lgsqr.x	. . . . 5 ⊢ 𝑋 = (var1‘𝑌)
32		lgsqr.m	. . . . 5 ⊢ − = (-g‘𝑆)
33		lgsqr.u	. . . . 5 ⊢ 1 = (1r‘𝑆)
34		lgsqr.t	. . . . 5 ⊢ 𝑇 = ((((𝑃 − 1) / 2) ↑ 𝑋) − 1 )
35	1	adantr 486	. . . . 5 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑃 ∈ (ℙ ∖ {2}))
36		elfznn 13630	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (1...((𝑃 − 1) / 2)) → 𝑦 ∈ ℕ)
37	36	adantl 487	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑦 ∈ ℕ)
38	37	nncnd 12295	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑦 ∈ ℂ)
39		oddprm 16924	. . . . . . . . . . . 12 ⊢ (𝑃 ∈ (ℙ ∖ {2}) → ((𝑃 − 1) / 2) ∈ ℕ)
40	1, 39	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑃 − 1) / 2) ∈ ℕ)
41	40	nnnn0d 12611	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑃 − 1) / 2) ∈ ℕ0)
42	41	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → ((𝑃 − 1) / 2) ∈ ℕ0)
43		2nn0 12567	. . . . . . . . . 10 ⊢ 2 ∈ ℕ0
44	43	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → 2 ∈ ℕ0)
45	38, 42, 44	expmuld 14235	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑦↑(2 · ((𝑃 − 1) / 2))) = ((𝑦↑2)↑((𝑃 − 1) / 2)))
46		prmnn 16786	. . . . . . . . . . . . . . . 16 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
47	2, 46	syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑃 ∈ ℕ)
48	47	nnred 12294	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑃 ∈ ℝ)
49		peano2rem 11571	. . . . . . . . . . . . . 14 ⊢ (𝑃 ∈ ℝ → (𝑃 − 1) ∈ ℝ)
50	48, 49	syl 18	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑃 − 1) ∈ ℝ)
51	50	recnd 11283	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑃 − 1) ∈ ℂ)
52		2cnd 12365	. . . . . . . . . . . 12 ⊢ (𝜑 → 2 ∈ ℂ)
53		2ne0 12393	. . . . . . . . . . . . 13 ⊢ 2 ≠ 0
54	53	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → 2 ≠ 0)
55	51, 52, 54	divcan2d 12039	. . . . . . . . . . 11 ⊢ (𝜑 → (2 · ((𝑃 − 1) / 2)) = (𝑃 − 1))
56		phiprm 16890	. . . . . . . . . . . 12 ⊢ (𝑃 ∈ ℙ → (ϕ‘𝑃) = (𝑃 − 1))
57	2, 56	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → (ϕ‘𝑃) = (𝑃 − 1))
58	55, 57	eqtr4d 2798	. . . . . . . . . 10 ⊢ (𝜑 → (2 · ((𝑃 − 1) / 2)) = (ϕ‘𝑃))
59	58	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → (2 · ((𝑃 − 1) / 2)) = (ϕ‘𝑃))
60	59	oveq2d 7431	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑦↑(2 · ((𝑃 − 1) / 2))) = (𝑦↑(ϕ‘𝑃)))
61	45, 60	eqtr3d 2797	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → ((𝑦↑2)↑((𝑃 − 1) / 2)) = (𝑦↑(ϕ‘𝑃)))
62	61	oveq1d 7430	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → (((𝑦↑2)↑((𝑃 − 1) / 2)) mod 𝑃) = ((𝑦↑(ϕ‘𝑃)) mod 𝑃))
63	2	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑃 ∈ ℙ)
64	63, 46	syl 18	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑃 ∈ ℕ)
65	47	nnzd 12663	. . . . . . . . . 10 ⊢ (𝜑 → 𝑃 ∈ ℤ)
66	65	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑃 ∈ ℤ)
67	22, 66	gcdcomd 16626	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑦 gcd 𝑃) = (𝑃 gcd 𝑦))
68	37	nnred 12294	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑦 ∈ ℝ)
69	50	rehalfcld 12537	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝑃 − 1) / 2) ∈ ℝ)
70	69	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → ((𝑃 − 1) / 2) ∈ ℝ)
71	48	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑃 ∈ ℝ)
72		elfzle2 13604	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (1...((𝑃 − 1) / 2)) → 𝑦 ≤ ((𝑃 − 1) / 2))
73	72	adantl 487	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑦 ≤ ((𝑃 − 1) / 2))
74		prmuz2 16808	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ (ℤ≥‘2))
75	2, 74	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝑃 ∈ (ℤ≥‘2))
76		uz2m1nn 12994	. . . . . . . . . . . . . . . . 17 ⊢ (𝑃 ∈ (ℤ≥‘2) → (𝑃 − 1) ∈ ℕ)
77	75, 76	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑃 − 1) ∈ ℕ)
78	77	nnrpd 13106	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑃 − 1) ∈ ℝ+)
79		rphalflt 13095	. . . . . . . . . . . . . . 15 ⊢ ((𝑃 − 1) ∈ ℝ+ → ((𝑃 − 1) / 2) < (𝑃 − 1))
80	78, 79	syl 18	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑃 − 1) / 2) < (𝑃 − 1))
81	48	ltm1d 12193	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑃 − 1) < 𝑃)
82	69, 50, 48, 80, 81	lttrd 11417	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝑃 − 1) / 2) < 𝑃)
83	82	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → ((𝑃 − 1) / 2) < 𝑃)
84	68, 70, 71, 73, 83	lelttrd 11414	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → 𝑦 < 𝑃)
85	68, 71	ltnled 11403	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑦 < 𝑃 ↔ ¬ 𝑃 ≤ 𝑦))
86	84, 85	mpbid 235	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → ¬ 𝑃 ≤ 𝑦)
87		dvdsle 16422	. . . . . . . . . . 11 ⊢ ((𝑃 ∈ ℤ ∧ 𝑦 ∈ ℕ) → (𝑃 ∥ 𝑦 → 𝑃 ≤ 𝑦))
88	66, 37, 87	syl2anc 596	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑃 ∥ 𝑦 → 𝑃 ≤ 𝑦))
89	86, 88	mtod 201	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → ¬ 𝑃 ∥ 𝑦)
90		coprm 16824	. . . . . . . . . 10 ⊢ ((𝑃 ∈ ℙ ∧ 𝑦 ∈ ℤ) → (¬ 𝑃 ∥ 𝑦 ↔ (𝑃 gcd 𝑦) = 1))
91	63, 22, 90	syl2anc 596	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → (¬ 𝑃 ∥ 𝑦 ↔ (𝑃 gcd 𝑦) = 1))
92	89, 91	mpbid 235	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑃 gcd 𝑦) = 1)
93	67, 92	eqtrd 2795	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑦 gcd 𝑃) = 1)
94		eulerth 16896	. . . . . . 7 ⊢ ((𝑃 ∈ ℕ ∧ 𝑦 ∈ ℤ ∧ (𝑦 gcd 𝑃) = 1) → ((𝑦↑(ϕ‘𝑃)) mod 𝑃) = (1 mod 𝑃))
95	64, 22, 93, 94	syl3anc 1398	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → ((𝑦↑(ϕ‘𝑃)) mod 𝑃) = (1 mod 𝑃))
96	62, 95	eqtrd 2795	. . . . 5 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → (((𝑦↑2)↑((𝑃 − 1) / 2)) mod 𝑃) = (1 mod 𝑃))
97	3, 26, 27, 28, 29, 30, 31, 32, 33, 34, 13, 35, 24, 96	lgsqrlem1 27611	. . . 4 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → ((𝑂‘𝑇)‘(𝐿‘(𝑦↑2))) = (0g‘𝑌))
98		eqid 2760	. . . . . . . 8 ⊢ (𝑌 ↑s (Base‘𝑌)) = (𝑌 ↑s (Base‘𝑌))
99		eqid 2760	. . . . . . . 8 ⊢ (Base‘(𝑌 ↑s (Base‘𝑌))) = (Base‘(𝑌 ↑s (Base‘𝑌)))
100		fvexd 6895	. . . . . . . 8 ⊢ (𝜑 → (Base‘𝑌) ∈ V)
101	29, 26, 98, 17	evl1rhm 22586	. . . . . . . . . . 11 ⊢ (𝑌 ∈ CRing → 𝑂 ∈ (𝑆 RingHom (𝑌 ↑s (Base‘𝑌))))
102	10, 101	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → 𝑂 ∈ (𝑆 RingHom (𝑌 ↑s (Base‘𝑌))))
103	27, 99	rhmf 20651	. . . . . . . . . 10 ⊢ (𝑂 ∈ (𝑆 RingHom (𝑌 ↑s (Base‘𝑌))) → 𝑂:𝐵⟶(Base‘(𝑌 ↑s (Base‘𝑌))))
104	102, 103	syl 18	. . . . . . . . 9 ⊢ (𝜑 → 𝑂:𝐵⟶(Base‘(𝑌 ↑s (Base‘𝑌))))
105	26	ply1ring 22501	. . . . . . . . . . . . 13 ⊢ (𝑌 ∈ Ring → 𝑆 ∈ Ring)
106	12, 105	syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑆 ∈ Ring)
107		ringgrp 20400	. . . . . . . . . . . 12 ⊢ (𝑆 ∈ Ring → 𝑆 ∈ Grp)
108	106, 107	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑆 ∈ Grp)
109		eqid 2760	. . . . . . . . . . . . 13 ⊢ (mulGrp‘𝑆) = (mulGrp‘𝑆)
110	109, 27	mgpbas 20301	. . . . . . . . . . . 12 ⊢ 𝐵 = (Base‘(mulGrp‘𝑆))
111	109	ringmgp 20401	. . . . . . . . . . . . 13 ⊢ (𝑆 ∈ Ring → (mulGrp‘𝑆) ∈ Mnd)
112	106, 111	syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → (mulGrp‘𝑆) ∈ Mnd)
113	31, 26, 27	vr1cl 22471	. . . . . . . . . . . . 13 ⊢ (𝑌 ∈ Ring → 𝑋 ∈ 𝐵)
114	12, 113	syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋 ∈ 𝐵)
115	110, 30, 112, 41, 114	mulgnn0cld 19241	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝑃 − 1) / 2) ↑ 𝑋) ∈ 𝐵)
116	27, 33	ringidcl 20430	. . . . . . . . . . . 12 ⊢ (𝑆 ∈ Ring → 1 ∈ 𝐵)
117	106, 116	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → 1 ∈ 𝐵)
118	27, 32	grpsubcl 19166	. . . . . . . . . . 11 ⊢ ((𝑆 ∈ Grp ∧ (((𝑃 − 1) / 2) ↑ 𝑋) ∈ 𝐵 ∧ 1 ∈ 𝐵) → ((((𝑃 − 1) / 2) ↑ 𝑋) − 1 ) ∈ 𝐵)
119	108, 115, 117, 118	syl3anc 1398	. . . . . . . . . 10 ⊢ (𝜑 → ((((𝑃 − 1) / 2) ↑ 𝑋) − 1 ) ∈ 𝐵)
120	34, 119	eqeltrid 2864	. . . . . . . . 9 ⊢ (𝜑 → 𝑇 ∈ 𝐵)
121	104, 120	ffvelcdmd 7080	. . . . . . . 8 ⊢ (𝜑 → (𝑂‘𝑇) ∈ (Base‘(𝑌 ↑s (Base‘𝑌))))
122	98, 17, 99, 5, 100, 121	pwselbas 17596	. . . . . . 7 ⊢ (𝜑 → (𝑂‘𝑇):(Base‘𝑌)⟶(Base‘𝑌))
123	122	ffnd 6705	. . . . . 6 ⊢ (𝜑 → (𝑂‘𝑇) Fn (Base‘𝑌))
124	123	adantr 486	. . . . 5 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝑂‘𝑇) Fn (Base‘𝑌))
125		fniniseg 7054	. . . . 5 ⊢ ((𝑂‘𝑇) Fn (Base‘𝑌) → ((𝐿‘(𝑦↑2)) ∈ (◡(𝑂‘𝑇) “ {(0g‘𝑌)}) ↔ ((𝐿‘(𝑦↑2)) ∈ (Base‘𝑌) ∧ ((𝑂‘𝑇)‘(𝐿‘(𝑦↑2))) = (0g‘𝑌))))
126	124, 125	syl 18	. . . 4 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → ((𝐿‘(𝑦↑2)) ∈ (◡(𝑂‘𝑇) “ {(0g‘𝑌)}) ↔ ((𝐿‘(𝑦↑2)) ∈ (Base‘𝑌) ∧ ((𝑂‘𝑇)‘(𝐿‘(𝑦↑2))) = (0g‘𝑌))))
127	25, 97, 126	mpbir2and 726	. . 3 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...((𝑃 − 1) / 2))) → (𝐿‘(𝑦↑2)) ∈ (◡(𝑂‘𝑇) “ {(0g‘𝑌)}))
128		lgsqr.g	. . 3 ⊢ 𝐺 = (𝑦 ∈ (1...((𝑃 − 1) / 2)) ↦ (𝐿‘(𝑦↑2)))
129	127, 128	fmptd 7109	. 2 ⊢ (𝜑 → 𝐺:(1...((𝑃 − 1) / 2))⟶(◡(𝑂‘𝑇) “ {(0g‘𝑌)}))
130		fvoveq1 7438	. . . . . . . 8 ⊢ (𝑦 = 𝑥 → (𝐿‘(𝑦↑2)) = (𝐿‘(𝑥↑2)))
131		fvex 6893	. . . . . . . 8 ⊢ (𝐿‘(𝑥↑2)) ∈ V
132	130, 128, 131	fvmpt 6988	. . . . . . 7 ⊢ (𝑥 ∈ (1...((𝑃 − 1) / 2)) → (𝐺‘𝑥) = (𝐿‘(𝑥↑2)))
133	132	ad2antrl 741	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝐺‘𝑥) = (𝐿‘(𝑥↑2)))
134		fvoveq1 7438	. . . . . . . 8 ⊢ (𝑦 = 𝑧 → (𝐿‘(𝑦↑2)) = (𝐿‘(𝑧↑2)))
135		fvex 6893	. . . . . . . 8 ⊢ (𝐿‘(𝑧↑2)) ∈ V
136	134, 128, 135	fvmpt 6988	. . . . . . 7 ⊢ (𝑧 ∈ (1...((𝑃 − 1) / 2)) → (𝐺‘𝑧) = (𝐿‘(𝑧↑2)))
137	136	ad2antll 742	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝐺‘𝑧) = (𝐿‘(𝑧↑2)))
138	133, 137	eqeq12d 2776	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝐺‘𝑥) = (𝐺‘𝑧) ↔ (𝐿‘(𝑥↑2)) = (𝐿‘(𝑧↑2))))
139	47	nnnn0d 12611	. . . . . . 7 ⊢ (𝜑 → 𝑃 ∈ ℕ0)
140	139	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑃 ∈ ℕ0)
141		elfzelz 13600	. . . . . . . 8 ⊢ (𝑥 ∈ (1...((𝑃 − 1) / 2)) → 𝑥 ∈ ℤ)
142	141	ad2antrl 741	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑥 ∈ ℤ)
143		zsqcl 14215	. . . . . . 7 ⊢ (𝑥 ∈ ℤ → (𝑥↑2) ∈ ℤ)
144	142, 143	syl 18	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥↑2) ∈ ℤ)
145		elfzelz 13600	. . . . . . . 8 ⊢ (𝑧 ∈ (1...((𝑃 − 1) / 2)) → 𝑧 ∈ ℤ)
146	145	ad2antll 742	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑧 ∈ ℤ)
147		zsqcl 14215	. . . . . . 7 ⊢ (𝑧 ∈ ℤ → (𝑧↑2) ∈ ℤ)
148	146, 147	syl 18	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑧↑2) ∈ ℤ)
149	3, 13	zndvds 21791	. . . . . 6 ⊢ ((𝑃 ∈ ℕ0 ∧ (𝑥↑2) ∈ ℤ ∧ (𝑧↑2) ∈ ℤ) → ((𝐿‘(𝑥↑2)) = (𝐿‘(𝑧↑2)) ↔ 𝑃 ∥ ((𝑥↑2) − (𝑧↑2))))
150	140, 144, 148, 149	syl3anc 1398	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝐿‘(𝑥↑2)) = (𝐿‘(𝑧↑2)) ↔ 𝑃 ∥ ((𝑥↑2) − (𝑧↑2))))
151		elfznn 13630	. . . . . . . . 9 ⊢ (𝑥 ∈ (1...((𝑃 − 1) / 2)) → 𝑥 ∈ ℕ)
152	151	ad2antrl 741	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑥 ∈ ℕ)
153	152	nncnd 12295	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑥 ∈ ℂ)
154		elfznn 13630	. . . . . . . . 9 ⊢ (𝑧 ∈ (1...((𝑃 − 1) / 2)) → 𝑧 ∈ ℕ)
155	154	ad2antll 742	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑧 ∈ ℕ)
156	155	nncnd 12295	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑧 ∈ ℂ)
157		subsq 14296	. . . . . . 7 ⊢ ((𝑥 ∈ ℂ ∧ 𝑧 ∈ ℂ) → ((𝑥↑2) − (𝑧↑2)) = ((𝑥 + 𝑧) · (𝑥 − 𝑧)))
158	153, 156, 157	syl2anc 596	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝑥↑2) − (𝑧↑2)) = ((𝑥 + 𝑧) · (𝑥 − 𝑧)))
159	158	breq2d 5115	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 ∥ ((𝑥↑2) − (𝑧↑2)) ↔ 𝑃 ∥ ((𝑥 + 𝑧) · (𝑥 − 𝑧))))
160	138, 150, 159	3bitrd 308	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝐺‘𝑥) = (𝐺‘𝑧) ↔ 𝑃 ∥ ((𝑥 + 𝑧) · (𝑥 − 𝑧))))
161	2	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑃 ∈ ℙ)
162	142, 146	zaddcld 12751	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥 + 𝑧) ∈ ℤ)
163	142, 146	zsubcld 12752	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥 − 𝑧) ∈ ℤ)
164		euclemma 16826	. . . . . 6 ⊢ ((𝑃 ∈ ℙ ∧ (𝑥 + 𝑧) ∈ ℤ ∧ (𝑥 − 𝑧) ∈ ℤ) → (𝑃 ∥ ((𝑥 + 𝑧) · (𝑥 − 𝑧)) ↔ (𝑃 ∥ (𝑥 + 𝑧) ∨ 𝑃 ∥ (𝑥 − 𝑧))))
165	161, 162, 163, 164	syl3anc 1398	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 ∥ ((𝑥 + 𝑧) · (𝑥 − 𝑧)) ↔ (𝑃 ∥ (𝑥 + 𝑧) ∨ 𝑃 ∥ (𝑥 − 𝑧))))
166	161, 46	syl 18	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑃 ∈ ℕ)
167	166	nnzd 12663	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑃 ∈ ℤ)
168	152, 155	nnaddcld 12334	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥 + 𝑧) ∈ ℕ)
169		dvdsle 16422	. . . . . . . 8 ⊢ ((𝑃 ∈ ℤ ∧ (𝑥 + 𝑧) ∈ ℕ) → (𝑃 ∥ (𝑥 + 𝑧) → 𝑃 ≤ (𝑥 + 𝑧)))
170	167, 168, 169	syl2anc 596	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 ∥ (𝑥 + 𝑧) → 𝑃 ≤ (𝑥 + 𝑧)))
171	168	nnred 12294	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥 + 𝑧) ∈ ℝ)
172	166	nnred 12294	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑃 ∈ ℝ)
173	172, 49	syl 18	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 − 1) ∈ ℝ)
174	152	nnred 12294	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑥 ∈ ℝ)
175	155	nnred 12294	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑧 ∈ ℝ)
176	69	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝑃 − 1) / 2) ∈ ℝ)
177		elfzle2 13604	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ (1...((𝑃 − 1) / 2)) → 𝑥 ≤ ((𝑃 − 1) / 2))
178	177	ad2antrl 741	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑥 ≤ ((𝑃 − 1) / 2))
179		elfzle2 13604	. . . . . . . . . . . . 13 ⊢ (𝑧 ∈ (1...((𝑃 − 1) / 2)) → 𝑧 ≤ ((𝑃 − 1) / 2))
180	179	ad2antll 742	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑧 ≤ ((𝑃 − 1) / 2))
181	174, 175, 176, 176, 178, 180	le2addd 11879	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥 + 𝑧) ≤ (((𝑃 − 1) / 2) + ((𝑃 − 1) / 2)))
182	51	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 − 1) ∈ ℂ)
183	182	2halvesd 12536	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (((𝑃 − 1) / 2) + ((𝑃 − 1) / 2)) = (𝑃 − 1))
184	181, 183	breqtrd 5131	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥 + 𝑧) ≤ (𝑃 − 1))
185	172	ltm1d 12193	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 − 1) < 𝑃)
186	171, 173, 172, 184, 185	lelttrd 11414	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥 + 𝑧) < 𝑃)
187	171, 172	ltnled 11403	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝑥 + 𝑧) < 𝑃 ↔ ¬ 𝑃 ≤ (𝑥 + 𝑧)))
188	186, 187	mpbid 235	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ¬ 𝑃 ≤ (𝑥 + 𝑧))
189	188	pm2.21d 122	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 ≤ (𝑥 + 𝑧) → 𝑥 = 𝑧))
190	170, 189	syld 48	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 ∥ (𝑥 + 𝑧) → 𝑥 = 𝑧))
191		moddvds 16375	. . . . . . . . 9 ⊢ ((𝑃 ∈ ℕ ∧ 𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ) → ((𝑥 mod 𝑃) = (𝑧 mod 𝑃) ↔ 𝑃 ∥ (𝑥 − 𝑧)))
192	166, 142, 146, 191	syl3anc 1398	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝑥 mod 𝑃) = (𝑧 mod 𝑃) ↔ 𝑃 ∥ (𝑥 − 𝑧)))
193	166	nnrpd 13106	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑃 ∈ ℝ+)
194	152	nnnn0d 12611	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑥 ∈ ℕ0)
195	194	nn0ge0d 12614	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 0 ≤ 𝑥)
196	82	adantr 486	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝑃 − 1) / 2) < 𝑃)
197	174, 176, 172, 178, 196	lelttrd 11414	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑥 < 𝑃)
198		modid 13979	. . . . . . . . . 10 ⊢ (((𝑥 ∈ ℝ ∧ 𝑃 ∈ ℝ+) ∧ (0 ≤ 𝑥 ∧ 𝑥 < 𝑃)) → (𝑥 mod 𝑃) = 𝑥)
199	174, 193, 195, 197, 198	syl22anc 852	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑥 mod 𝑃) = 𝑥)
200	155	nnnn0d 12611	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑧 ∈ ℕ0)
201	200	nn0ge0d 12614	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 0 ≤ 𝑧)
202	175, 176, 172, 180, 196	lelttrd 11414	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → 𝑧 < 𝑃)
203		modid 13979	. . . . . . . . . 10 ⊢ (((𝑧 ∈ ℝ ∧ 𝑃 ∈ ℝ+) ∧ (0 ≤ 𝑧 ∧ 𝑧 < 𝑃)) → (𝑧 mod 𝑃) = 𝑧)
204	175, 193, 201, 202, 203	syl22anc 852	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑧 mod 𝑃) = 𝑧)
205	199, 204	eqeq12d 2776	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝑥 mod 𝑃) = (𝑧 mod 𝑃) ↔ 𝑥 = 𝑧))
206	192, 205	bitr3d 284	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 ∥ (𝑥 − 𝑧) ↔ 𝑥 = 𝑧))
207	206	biimpd 232	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 ∥ (𝑥 − 𝑧) → 𝑥 = 𝑧))
208	190, 207	jaod 873	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝑃 ∥ (𝑥 + 𝑧) ∨ 𝑃 ∥ (𝑥 − 𝑧)) → 𝑥 = 𝑧))
209	165, 208	sylbid 243	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → (𝑃 ∥ ((𝑥 + 𝑧) · (𝑥 − 𝑧)) → 𝑥 = 𝑧))
210	160, 209	sylbid 243	. . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ (1...((𝑃 − 1) / 2)) ∧ 𝑧 ∈ (1...((𝑃 − 1) / 2)))) → ((𝐺‘𝑥) = (𝐺‘𝑧) → 𝑥 = 𝑧))
211	210	ralrimivva 3205	. 2 ⊢ (𝜑 → ∀𝑥 ∈ (1...((𝑃 − 1) / 2))∀𝑧 ∈ (1...((𝑃 − 1) / 2))((𝐺‘𝑥) = (𝐺‘𝑧) → 𝑥 = 𝑧))
212		dff13 7253	. 2 ⊢ (𝐺:(1...((𝑃 − 1) / 2))–1-1→(◡(𝑂‘𝑇) “ {(0g‘𝑌)}) ↔ (𝐺:(1...((𝑃 − 1) / 2))⟶(◡(𝑂‘𝑇) “ {(0g‘𝑌)}) ∧ ∀𝑥 ∈ (1...((𝑃 − 1) / 2))∀𝑧 ∈ (1...((𝑃 − 1) / 2))((𝐺‘𝑥) = (𝐺‘𝑧) → 𝑥 = 𝑧)))
213	129, 211, 212	sylanbrc 595	1 ⊢ (𝜑 → 𝐺:(1...((𝑃 − 1) / 2))–1-1→(◡(𝑂‘𝑇) “ {(0g‘𝑌)}))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861   = wceq 1570   ∈ wcel 2145   ≠ wne 2955  ∀wral 3076  Vcvv 3450   ∖ cdif 3896  {csn 4584   class class class wbr 5103   ↦ cmpt 5186  ^◡ccnv 5654   “ cima 5658   Fn wfn 6529  ⟶wf 6530  –1-1→wf1 6531  ‘cfv 6534  (class class class)co 7415  ℂcc 11144  ℝcr 11145  0cc0 11146  1c1 11147   + caddc 11149   · cmul 11151   < clt 11289   ≤ cle 11290   − cmin 11487   / cdiv 11917  ℕcn 12279  2c2 12341  ℕ₀cn0 12550  ℤcz 12637  ℤ_≥cuz 12909  ℝ⁺crp 13064  ...cfz 13583   mod cmo 13952  ↑cexp 14147   ∥ cdvds 16364   gcd cgcd 16606  ℙcprime 16783  ϕcphi 16877  Basecbs 17323  0_gc0g 17546   ↑_s cpws 17553  Mndcmnd 18859  Grpcgrp 19080  -_gcsg 19082  ._gcmg 19213  mulGrpcmgp 20296  1_rcur 20343  Ringcrg 20395  CRingccrg 20396   RingHom crh 20635  Domncdomn 20880  IDomncidom 20881  Fieldcfield 20917  ℤ_ringczring 21688  ℤRHomczrh 21741  ℤ/nℤczn 21744  var₁cv1 22430  Poly₁cpl1 22431  eval₁ce1 22568  deg₁cdg1 26308

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7738  ax-cnex 11202  ax-resscn 11203  ax-1cn 11204  ax-icn 11205  ax-addcl 11206  ax-addrcl 11207  ax-mulcl 11208  ax-mulrcl 11209  ax-mulcom 11210  ax-addass 11211  ax-mulass 11212  ax-distr 11213  ax-i2m1 11214  ax-1ne0 11215  ax-1rid 11216  ax-rnegex 11217  ax-rrecex 11218  ax-cnre 11219  ax-pre-lttri 11220  ax-pre-lttrn 11221  ax-pre-ltadd 11222  ax-pre-mulgt0 11223  ax-pre-sup 11224  ax-addf 11225  ax-mulf 11226

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-iin 4954  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-se 5609  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6300  df-ord 6361  df-on 6362  df-lim 6363  df-suc 6364  df-iota 6490  df-fun 6536  df-fn 6537  df-f 6538  df-f1 6539  df-fo 6540  df-f1o 6541  df-fv 6542  df-isom 6543  df-riota 7372  df-ov 7418  df-oprab 7419  df-mpo 7420  df-of 7680  df-ofr 7681  df-om 7865  df-1st 7988  df-2nd 7989  df-supp 8161  df-tpos 8226  df-frecs 8282  df-wrecs 8313  df-recs 8362  df-rdg 8401  df-1o 8459  df-2o 8460  df-oadd 8463  df-er 8700  df-ec 8702  df-qs 8706  df-map 8832  df-pm 8833  df-ixp 8909  df-en 8957  df-dom 8958  df-sdom 8959  df-fin 8960  df-fsupp 9336  df-sup 9416  df-inf 9417  df-oi 9486  df-dju 9928  df-card 9966  df-pnf 11291  df-mnf 11292  df-xr 11293  df-ltxr 11294  df-le 11295  df-sub 11489  df-neg 11490  df-div 11918  df-nn 12280  df-2 12349  df-3 12350  df-4 12351  df-5 12352  df-6 12353  df-7 12354  df-8 12355  df-9 12356  df-n0 12551  df-xnn0 12624  df-z 12638  df-dec 12759  df-uz 12910  df-rp 13065  df-fz 13584  df-fzo 13732  df-fl 13875  df-mod 13953  df-seq 14088  df-exp 14148  df-hash 14417  df-cj 15208  df-re 15209  df-im 15210  df-sqrt 15344  df-abs 15345  df-dvds 16365  df-gcd 16607  df-prm 16784  df-phi 16879  df-struct 17261  df-sets 17278  df-slot 17296  df-ndx 17308  df-base 17324  df-ress 17345  df-plusg 17377  df-mulr 17378  df-starv 17379  df-sca 17380  df-vsca 17381  df-ip 17382  df-tset 17383  df-ple 17384  df-ds 17386  df-unif 17387  df-hom 17388  df-cco 17389  df-0g 17548  df-gsum 17549  df-prds 17554  df-pws 17556  df-imas 17616  df-qus 17617  df-mre 17692  df-mrc 17693  df-acs 17695  df-mgm 18752  df-sgrp 18844  df-mnd 18860  df-mhm 18914  df-submnd 18915  df-grp 19083  df-minusg 19084  df-sbg 19085  df-mulg 19214  df-subg 19269  df-nsg 19270  df-eqg 19271  df-ghm 19364  df-cntz 19467  df-cmn 19932  df-abl 19933  df-mgp 20297  df-rng 20311  df-ur 20344  df-srg 20349  df-ring 20397  df-cring 20398  df-oppr 20503  df-dvdsr 20523  df-unit 20524  df-invr 20554  df-dvr 20567  df-rhm 20638  df-nzr 20699  df-subrng 20734  df-subrg 20758  df-rlreg 20882  df-domn 20883  df-idom 20884  df-drng 20918  df-field 20919  df-lmod 21073  df-lss 21143  df-lsp 21183  df-sra 21384  df-rgmod 21385  df-lidl 21422  df-rsp 21423  df-2idl 21479  df-cnfld 21615  df-zring 21689  df-zrh 21745  df-zn 21748  df-assa 22097  df-asp 22098  df-ascl 22099  df-psr 22153  df-mvr 22154  df-mpl 22155  df-opsr 22157  df-evls 22319  df-evl 22320  df-psr1 22434  df-vr1 22435  df-ply1 22436  df-evl1 22570

This theorem is used by:  lgsqrlem4  27614