Theorem ablfac1eulem 19590

Description: Lemma for ablfac1eu 19591. (Contributed by Mario Carneiro, 27-Apr-2016.)

Hypotheses

Ref	Expression
ablfac1.b	⊢ 𝐵 = (Base‘𝐺)
ablfac1.o	⊢ 𝑂 = (od‘𝐺)
ablfac1.s	⊢ 𝑆 = (𝑝 ∈ 𝐴 ↦ {𝑥 ∈ 𝐵 ∣ (𝑂‘𝑥) ∥ (𝑝↑(𝑝 pCnt (♯‘𝐵)))})
ablfac1.g	⊢ (𝜑 → 𝐺 ∈ Abel)
ablfac1.f	⊢ (𝜑 → 𝐵 ∈ Fin)
ablfac1.1	⊢ (𝜑 → 𝐴 ⊆ ℙ)
ablfac1c.d	⊢ 𝐷 = {𝑤 ∈ ℙ ∣ 𝑤 ∥ (♯‘𝐵)}
ablfac1.2	⊢ (𝜑 → 𝐷 ⊆ 𝐴)
ablfac1eu.1	⊢ (𝜑 → (𝐺dom DProd 𝑇 ∧ (𝐺 DProd 𝑇) = 𝐵))
ablfac1eu.2	⊢ (𝜑 → dom 𝑇 = 𝐴)
ablfac1eu.3	⊢ ((𝜑 ∧ 𝑞 ∈ 𝐴) → 𝐶 ∈ ℕ0)
ablfac1eu.4	⊢ ((𝜑 ∧ 𝑞 ∈ 𝐴) → (♯‘(𝑇‘𝑞)) = (𝑞↑𝐶))
ablfac1eulem.1	⊢ (𝜑 → 𝑃 ∈ ℙ)
ablfac1eulem.2	⊢ (𝜑 → 𝐴 ∈ Fin)

Assertion

Ref	Expression
ablfac1eulem	⊢ (𝜑 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝐴 ∖ {𝑃})))))

Distinct variable groups:   𝑞,𝑝,𝑤,𝑥,𝐵   𝐷,𝑝,𝑞,𝑥   𝜑,𝑝,𝑞,𝑤,𝑥   𝑆,𝑞   𝐴,𝑝,𝑞,𝑥   𝑂,𝑝,𝑞,𝑥   𝑃,𝑝,𝑞,𝑥   𝑇,𝑞,𝑥   𝐺,𝑝,𝑞,𝑥

Allowed substitution hints:   𝐴(𝑤)   𝐶(𝑥,𝑤,𝑞,𝑝)   𝐷(𝑤)   𝑃(𝑤)   𝑆(𝑥,𝑤,𝑝)   𝑇(𝑤,𝑝)   𝐺(𝑤)   𝑂(𝑤)

Proof of Theorem ablfac1eulem

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

Step	Hyp	Ref	Expression
1		ssid 3939	. 2 ⊢ 𝐴 ⊆ 𝐴
2		ablfac1eulem.2	. . 3 ⊢ (𝜑 → 𝐴 ∈ Fin)
3		sseq1 3942	. . . . . 6 ⊢ (𝑦 = ∅ → (𝑦 ⊆ 𝐴 ↔ ∅ ⊆ 𝐴))
4		difeq1 4046	. . . . . . . . . . . . 13 ⊢ (𝑦 = ∅ → (𝑦 ∖ {𝑃}) = (∅ ∖ {𝑃}))
5		0dif 4332	. . . . . . . . . . . . 13 ⊢ (∅ ∖ {𝑃}) = ∅
6	4, 5	eqtrdi 2795	. . . . . . . . . . . 12 ⊢ (𝑦 = ∅ → (𝑦 ∖ {𝑃}) = ∅)
7	6	reseq2d 5880	. . . . . . . . . . 11 ⊢ (𝑦 = ∅ → (𝑇 ↾ (𝑦 ∖ {𝑃})) = (𝑇 ↾ ∅))
8		res0 5884	. . . . . . . . . . 11 ⊢ (𝑇 ↾ ∅) = ∅
9	7, 8	eqtrdi 2795	. . . . . . . . . 10 ⊢ (𝑦 = ∅ → (𝑇 ↾ (𝑦 ∖ {𝑃})) = ∅)
10	9	oveq2d 7271	. . . . . . . . 9 ⊢ (𝑦 = ∅ → (𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃}))) = (𝐺 DProd ∅))
11	10	fveq2d 6760	. . . . . . . 8 ⊢ (𝑦 = ∅ → (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃})))) = (♯‘(𝐺 DProd ∅)))
12	11	breq2d 5082	. . . . . . 7 ⊢ (𝑦 = ∅ → (𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃})))) ↔ 𝑃 ∥ (♯‘(𝐺 DProd ∅))))
13	12	notbid 317	. . . . . 6 ⊢ (𝑦 = ∅ → (¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃})))) ↔ ¬ 𝑃 ∥ (♯‘(𝐺 DProd ∅))))
14	3, 13	imbi12d 344	. . . . 5 ⊢ (𝑦 = ∅ → ((𝑦 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃}))))) ↔ (∅ ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd ∅)))))
15	14	imbi2d 340	. . . 4 ⊢ (𝑦 = ∅ → ((𝜑 → (𝑦 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃})))))) ↔ (𝜑 → (∅ ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd ∅))))))
16		sseq1 3942	. . . . . 6 ⊢ (𝑦 = 𝑧 → (𝑦 ⊆ 𝐴 ↔ 𝑧 ⊆ 𝐴))
17		difeq1 4046	. . . . . . . . . . 11 ⊢ (𝑦 = 𝑧 → (𝑦 ∖ {𝑃}) = (𝑧 ∖ {𝑃}))
18	17	reseq2d 5880	. . . . . . . . . 10 ⊢ (𝑦 = 𝑧 → (𝑇 ↾ (𝑦 ∖ {𝑃})) = (𝑇 ↾ (𝑧 ∖ {𝑃})))
19	18	oveq2d 7271	. . . . . . . . 9 ⊢ (𝑦 = 𝑧 → (𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃}))) = (𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))))
20	19	fveq2d 6760	. . . . . . . 8 ⊢ (𝑦 = 𝑧 → (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃})))) = (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))))
21	20	breq2d 5082	. . . . . . 7 ⊢ (𝑦 = 𝑧 → (𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃})))) ↔ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))))))
22	21	notbid 317	. . . . . 6 ⊢ (𝑦 = 𝑧 → (¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃})))) ↔ ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))))))
23	16, 22	imbi12d 344	. . . . 5 ⊢ (𝑦 = 𝑧 → ((𝑦 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃}))))) ↔ (𝑧 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))))))
24	23	imbi2d 340	. . . 4 ⊢ (𝑦 = 𝑧 → ((𝜑 → (𝑦 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃})))))) ↔ (𝜑 → (𝑧 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))))))))
25		sseq1 3942	. . . . . 6 ⊢ (𝑦 = (𝑧 ∪ {𝑞}) → (𝑦 ⊆ 𝐴 ↔ (𝑧 ∪ {𝑞}) ⊆ 𝐴))
26		difeq1 4046	. . . . . . . . . . 11 ⊢ (𝑦 = (𝑧 ∪ {𝑞}) → (𝑦 ∖ {𝑃}) = ((𝑧 ∪ {𝑞}) ∖ {𝑃}))
27	26	reseq2d 5880	. . . . . . . . . 10 ⊢ (𝑦 = (𝑧 ∪ {𝑞}) → (𝑇 ↾ (𝑦 ∖ {𝑃})) = (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})))
28	27	oveq2d 7271	. . . . . . . . 9 ⊢ (𝑦 = (𝑧 ∪ {𝑞}) → (𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃}))) = (𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃}))))
29	28	fveq2d 6760	. . . . . . . 8 ⊢ (𝑦 = (𝑧 ∪ {𝑞}) → (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃})))) = (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})))))
30	29	breq2d 5082	. . . . . . 7 ⊢ (𝑦 = (𝑧 ∪ {𝑞}) → (𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃})))) ↔ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃}))))))
31	30	notbid 317	. . . . . 6 ⊢ (𝑦 = (𝑧 ∪ {𝑞}) → (¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃})))) ↔ ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃}))))))
32	25, 31	imbi12d 344	. . . . 5 ⊢ (𝑦 = (𝑧 ∪ {𝑞}) → ((𝑦 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃}))))) ↔ ((𝑧 ∪ {𝑞}) ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})))))))
33	32	imbi2d 340	. . . 4 ⊢ (𝑦 = (𝑧 ∪ {𝑞}) → ((𝜑 → (𝑦 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃})))))) ↔ (𝜑 → ((𝑧 ∪ {𝑞}) ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃}))))))))
34		sseq1 3942	. . . . . 6 ⊢ (𝑦 = 𝐴 → (𝑦 ⊆ 𝐴 ↔ 𝐴 ⊆ 𝐴))
35		difeq1 4046	. . . . . . . . . . 11 ⊢ (𝑦 = 𝐴 → (𝑦 ∖ {𝑃}) = (𝐴 ∖ {𝑃}))
36	35	reseq2d 5880	. . . . . . . . . 10 ⊢ (𝑦 = 𝐴 → (𝑇 ↾ (𝑦 ∖ {𝑃})) = (𝑇 ↾ (𝐴 ∖ {𝑃})))
37	36	oveq2d 7271	. . . . . . . . 9 ⊢ (𝑦 = 𝐴 → (𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃}))) = (𝐺 DProd (𝑇 ↾ (𝐴 ∖ {𝑃}))))
38	37	fveq2d 6760	. . . . . . . 8 ⊢ (𝑦 = 𝐴 → (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃})))) = (♯‘(𝐺 DProd (𝑇 ↾ (𝐴 ∖ {𝑃})))))
39	38	breq2d 5082	. . . . . . 7 ⊢ (𝑦 = 𝐴 → (𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃})))) ↔ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝐴 ∖ {𝑃}))))))
40	39	notbid 317	. . . . . 6 ⊢ (𝑦 = 𝐴 → (¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃})))) ↔ ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝐴 ∖ {𝑃}))))))
41	34, 40	imbi12d 344	. . . . 5 ⊢ (𝑦 = 𝐴 → ((𝑦 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃}))))) ↔ (𝐴 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝐴 ∖ {𝑃})))))))
42	41	imbi2d 340	. . . 4 ⊢ (𝑦 = 𝐴 → ((𝜑 → (𝑦 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑦 ∖ {𝑃})))))) ↔ (𝜑 → (𝐴 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝐴 ∖ {𝑃}))))))))
43		ablfac1eulem.1	. . . . . . 7 ⊢ (𝜑 → 𝑃 ∈ ℙ)
44		nprmdvds1 16339	. . . . . . 7 ⊢ (𝑃 ∈ ℙ → ¬ 𝑃 ∥ 1)
45	43, 44	syl 17	. . . . . 6 ⊢ (𝜑 → ¬ 𝑃 ∥ 1)
46		ablfac1.g	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐺 ∈ Abel)
47		ablgrp 19306	. . . . . . . . . . 11 ⊢ (𝐺 ∈ Abel → 𝐺 ∈ Grp)
48		eqid 2738	. . . . . . . . . . . 12 ⊢ (0g‘𝐺) = (0g‘𝐺)
49	48	dprd0 19549	. . . . . . . . . . 11 ⊢ (𝐺 ∈ Grp → (𝐺dom DProd ∅ ∧ (𝐺 DProd ∅) = {(0g‘𝐺)}))
50	46, 47, 49	3syl 18	. . . . . . . . . 10 ⊢ (𝜑 → (𝐺dom DProd ∅ ∧ (𝐺 DProd ∅) = {(0g‘𝐺)}))
51	50	simprd 495	. . . . . . . . 9 ⊢ (𝜑 → (𝐺 DProd ∅) = {(0g‘𝐺)})
52	51	fveq2d 6760	. . . . . . . 8 ⊢ (𝜑 → (♯‘(𝐺 DProd ∅)) = (♯‘{(0g‘𝐺)}))
53		fvex 6769	. . . . . . . . 9 ⊢ (0g‘𝐺) ∈ V
54		hashsng 14012	. . . . . . . . 9 ⊢ ((0g‘𝐺) ∈ V → (♯‘{(0g‘𝐺)}) = 1)
55	53, 54	ax-mp 5	. . . . . . . 8 ⊢ (♯‘{(0g‘𝐺)}) = 1
56	52, 55	eqtrdi 2795	. . . . . . 7 ⊢ (𝜑 → (♯‘(𝐺 DProd ∅)) = 1)
57	56	breq2d 5082	. . . . . 6 ⊢ (𝜑 → (𝑃 ∥ (♯‘(𝐺 DProd ∅)) ↔ 𝑃 ∥ 1))
58	45, 57	mtbird 324	. . . . 5 ⊢ (𝜑 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd ∅)))
59	58	a1d 25	. . . 4 ⊢ (𝜑 → (∅ ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd ∅))))
60		ssun1 4102	. . . . . . . . . 10 ⊢ 𝑧 ⊆ (𝑧 ∪ {𝑞})
61		sstr 3925	. . . . . . . . . 10 ⊢ ((𝑧 ⊆ (𝑧 ∪ {𝑞}) ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴) → 𝑧 ⊆ 𝐴)
62	60, 61	mpan 686	. . . . . . . . 9 ⊢ ((𝑧 ∪ {𝑞}) ⊆ 𝐴 → 𝑧 ⊆ 𝐴)
63	62	imim1i 63	. . . . . . . 8 ⊢ ((𝑧 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))))) → ((𝑧 ∪ {𝑞}) ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))))))
64		ablfac1eu.1	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → (𝐺dom DProd 𝑇 ∧ (𝐺 DProd 𝑇) = 𝐵))
65	64	simpld 494	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → 𝐺dom DProd 𝑇)
66		ablfac1eu.2	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → dom 𝑇 = 𝐴)
67	65, 66	dprdf2 19525	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝑇:𝐴⟶(SubGrp‘𝐺))
68	67	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → 𝑇:𝐴⟶(SubGrp‘𝐺))
69		simprr 769	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝑧 ∪ {𝑞}) ⊆ 𝐴)
70	69	ssdifssd 4073	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → ((𝑧 ∪ {𝑞}) ∖ {𝑃}) ⊆ 𝐴)
71	68, 70	fssresd 6625	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})):((𝑧 ∪ {𝑞}) ∖ {𝑃})⟶(SubGrp‘𝐺))
72		simprl 767	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → ¬ 𝑞 ∈ 𝑧)
73		disjsn 4644	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑧 ∩ {𝑞}) = ∅ ↔ ¬ 𝑞 ∈ 𝑧)
74	72, 73	sylibr 233	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝑧 ∩ {𝑞}) = ∅)
75	74	difeq1d 4052	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → ((𝑧 ∩ {𝑞}) ∖ {𝑃}) = (∅ ∖ {𝑃}))
76		difindir 4213	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑧 ∩ {𝑞}) ∖ {𝑃}) = ((𝑧 ∖ {𝑃}) ∩ ({𝑞} ∖ {𝑃}))
77	75, 76, 5	3eqtr3g 2802	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → ((𝑧 ∖ {𝑃}) ∩ ({𝑞} ∖ {𝑃})) = ∅)
78		difundir 4211	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑧 ∪ {𝑞}) ∖ {𝑃}) = ((𝑧 ∖ {𝑃}) ∪ ({𝑞} ∖ {𝑃}))
79	78	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → ((𝑧 ∪ {𝑞}) ∖ {𝑃}) = ((𝑧 ∖ {𝑃}) ∪ ({𝑞} ∖ {𝑃})))
80		eqid 2738	. . . . . . . . . . . . . . . . 17 ⊢ (LSSum‘𝐺) = (LSSum‘𝐺)
81	65	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → 𝐺dom DProd 𝑇)
82	66	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → dom 𝑇 = 𝐴)
83	81, 82, 70	dprdres 19546	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝐺dom DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ∧ (𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃}))) ⊆ (𝐺 DProd 𝑇)))
84	83	simpld 494	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → 𝐺dom DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})))
85	71, 77, 79, 80, 84	dprdsplit 19566	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃}))) = ((𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃})))(LSSum‘𝐺)(𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃})))))
86	85	fveq2d 6760	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})))) = (♯‘((𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃})))(LSSum‘𝐺)(𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃}))))))
87		eqid 2738	. . . . . . . . . . . . . . . 16 ⊢ (Cntz‘𝐺) = (Cntz‘𝐺)
88	71	fdmd 6595	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → dom (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) = ((𝑧 ∪ {𝑞}) ∖ {𝑃}))
89		ssdif 4070	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑧 ⊆ (𝑧 ∪ {𝑞}) → (𝑧 ∖ {𝑃}) ⊆ ((𝑧 ∪ {𝑞}) ∖ {𝑃}))
90	60, 89	mp1i 13	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝑧 ∖ {𝑃}) ⊆ ((𝑧 ∪ {𝑞}) ∖ {𝑃}))
91	84, 88, 90	dprdres 19546	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝐺dom DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃})) ∧ (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃}))) ⊆ (𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})))))
92	91	simpld 494	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → 𝐺dom DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃})))
93		dprdsubg 19542	. . . . . . . . . . . . . . . . 17 ⊢ (𝐺dom DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃})) → (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃}))) ∈ (SubGrp‘𝐺))
94	92, 93	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃}))) ∈ (SubGrp‘𝐺))
95		ssun2 4103	. . . . . . . . . . . . . . . . . . . 20 ⊢ {𝑞} ⊆ (𝑧 ∪ {𝑞})
96		ssdif 4070	. . . . . . . . . . . . . . . . . . . 20 ⊢ ({𝑞} ⊆ (𝑧 ∪ {𝑞}) → ({𝑞} ∖ {𝑃}) ⊆ ((𝑧 ∪ {𝑞}) ∖ {𝑃}))
97	95, 96	mp1i 13	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → ({𝑞} ∖ {𝑃}) ⊆ ((𝑧 ∪ {𝑞}) ∖ {𝑃}))
98	84, 88, 97	dprdres 19546	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝐺dom DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃})) ∧ (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃}))) ⊆ (𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})))))
99	98	simpld 494	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → 𝐺dom DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃})))
100		dprdsubg 19542	. . . . . . . . . . . . . . . . 17 ⊢ (𝐺dom DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃})) → (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃}))) ∈ (SubGrp‘𝐺))
101	99, 100	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃}))) ∈ (SubGrp‘𝐺))
102	84, 88, 90, 97, 77, 48	dprddisj2 19557	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → ((𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃}))) ∩ (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃})))) = {(0g‘𝐺)})
103	84, 88, 90, 97, 77, 87	dprdcntz2 19556	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃}))) ⊆ ((Cntz‘𝐺)‘(𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃})))))
104		ablfac1.f	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝐵 ∈ Fin)
105	104	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → 𝐵 ∈ Fin)
106		ablfac1.b	. . . . . . . . . . . . . . . . . 18 ⊢ 𝐵 = (Base‘𝐺)
107	106	dprdssv 19534	. . . . . . . . . . . . . . . . 17 ⊢ (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃}))) ⊆ 𝐵
108		ssfi 8918	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐵 ∈ Fin ∧ (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃}))) ⊆ 𝐵) → (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃}))) ∈ Fin)
109	105, 107, 108	sylancl 585	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃}))) ∈ Fin)
110	106	dprdssv 19534	. . . . . . . . . . . . . . . . 17 ⊢ (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃}))) ⊆ 𝐵
111		ssfi 8918	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐵 ∈ Fin ∧ (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃}))) ⊆ 𝐵) → (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃}))) ∈ Fin)
112	105, 110, 111	sylancl 585	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃}))) ∈ Fin)
113	80, 48, 87, 94, 101, 102, 103, 109, 112	lsmhash 19226	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (♯‘((𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃})))(LSSum‘𝐺)(𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃}))))) = ((♯‘(𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃})))) · (♯‘(𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃}))))))
114	90	resabs1d 5911	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃})) = (𝑇 ↾ (𝑧 ∖ {𝑃})))
115	114	oveq2d 7271	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃}))) = (𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))))
116	115	fveq2d 6760	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (♯‘(𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃})))) = (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))))
117	97	resabs1d 5911	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃})) = (𝑇 ↾ ({𝑞} ∖ {𝑃})))
118	117	oveq2d 7271	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃}))) = (𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃}))))
119	118	fveq2d 6760	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (♯‘(𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃})))) = (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))))
120	116, 119	oveq12d 7273	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → ((♯‘(𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ (𝑧 ∖ {𝑃})))) · (♯‘(𝐺 DProd ((𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})) ↾ ({𝑞} ∖ {𝑃}))))) = ((♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))) · (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃}))))))
121	86, 113, 120	3eqtrd 2782	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})))) = ((♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))) · (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃}))))))
122	121	breq2d 5082	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})))) ↔ 𝑃 ∥ ((♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))) · (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))))))
123	43	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → 𝑃 ∈ ℙ)
124	106	dprdssv 19534	. . . . . . . . . . . . . . . . 17 ⊢ (𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))) ⊆ 𝐵
125		ssfi 8918	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐵 ∈ Fin ∧ (𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))) ⊆ 𝐵) → (𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))) ∈ Fin)
126	105, 124, 125	sylancl 585	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))) ∈ Fin)
127		hashcl 13999	. . . . . . . . . . . . . . . 16 ⊢ ((𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))) ∈ Fin → (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))) ∈ ℕ0)
128	126, 127	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))) ∈ ℕ0)
129	128	nn0zd 12353	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))) ∈ ℤ)
130	106	dprdssv 19534	. . . . . . . . . . . . . . . . 17 ⊢ (𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃}))) ⊆ 𝐵
131		ssfi 8918	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐵 ∈ Fin ∧ (𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃}))) ⊆ 𝐵) → (𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃}))) ∈ Fin)
132	105, 130, 131	sylancl 585	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃}))) ∈ Fin)
133		hashcl 13999	. . . . . . . . . . . . . . . 16 ⊢ ((𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃}))) ∈ Fin → (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))) ∈ ℕ0)
134	132, 133	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))) ∈ ℕ0)
135	134	nn0zd 12353	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))) ∈ ℤ)
136		euclemma 16346	. . . . . . . . . . . . . 14 ⊢ ((𝑃 ∈ ℙ ∧ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))) ∈ ℤ ∧ (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))) ∈ ℤ) → (𝑃 ∥ ((♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))) · (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃}))))) ↔ (𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))) ∨ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))))))
137	123, 129, 135, 136	syl3anc 1369	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝑃 ∥ ((♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))) · (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃}))))) ↔ (𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))) ∨ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))))))
138	122, 137	bitrd 278	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})))) ↔ (𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))) ∨ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))))))
139	45	ad2antrr 722	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 = 𝑃) → ¬ 𝑃 ∥ 1)
140		simpr 484	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 = 𝑃) → 𝑞 = 𝑃)
141	140	sneqd 4570	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 = 𝑃) → {𝑞} = {𝑃})
142	141	difeq1d 4052	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 = 𝑃) → ({𝑞} ∖ {𝑃}) = ({𝑃} ∖ {𝑃}))
143		difid 4301	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ({𝑃} ∖ {𝑃}) = ∅
144	142, 143	eqtrdi 2795	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 = 𝑃) → ({𝑞} ∖ {𝑃}) = ∅)
145	144	reseq2d 5880	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 = 𝑃) → (𝑇 ↾ ({𝑞} ∖ {𝑃})) = (𝑇 ↾ ∅))
146	145, 8	eqtrdi 2795	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 = 𝑃) → (𝑇 ↾ ({𝑞} ∖ {𝑃})) = ∅)
147	146	oveq2d 7271	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 = 𝑃) → (𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃}))) = (𝐺 DProd ∅))
148	51	ad2antrr 722	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 = 𝑃) → (𝐺 DProd ∅) = {(0g‘𝐺)})
149	147, 148	eqtrd 2778	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 = 𝑃) → (𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃}))) = {(0g‘𝐺)})
150	149	fveq2d 6760	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 = 𝑃) → (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))) = (♯‘{(0g‘𝐺)}))
151	150, 55	eqtrdi 2795	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 = 𝑃) → (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))) = 1)
152	151	breq2d 5082	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 = 𝑃) → (𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))) ↔ 𝑃 ∥ 1))
153	139, 152	mtbird 324	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 = 𝑃) → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))))
154		ablfac1.1	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → 𝐴 ⊆ ℙ)
155	154	adantr 480	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → 𝐴 ⊆ ℙ)
156	69	unssbd 4118	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → {𝑞} ⊆ 𝐴)
157		vex 3426	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 𝑞 ∈ V
158	157	snss 4716	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑞 ∈ 𝐴 ↔ {𝑞} ⊆ 𝐴)
159	156, 158	sylibr 233	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → 𝑞 ∈ 𝐴)
160	155, 159	sseldd 3918	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → 𝑞 ∈ ℙ)
161		ablfac1eu.3	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑞 ∈ 𝐴) → 𝐶 ∈ ℕ0)
162	159, 161	syldan 590	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → 𝐶 ∈ ℕ0)
163		prmdvdsexpr 16350	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑃 ∈ ℙ ∧ 𝑞 ∈ ℙ ∧ 𝐶 ∈ ℕ0) → (𝑃 ∥ (𝑞↑𝐶) → 𝑃 = 𝑞))
164	123, 160, 162, 163	syl3anc 1369	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝑃 ∥ (𝑞↑𝐶) → 𝑃 = 𝑞))
165		eqcom 2745	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑃 = 𝑞 ↔ 𝑞 = 𝑃)
166	164, 165	syl6ib 250	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝑃 ∥ (𝑞↑𝐶) → 𝑞 = 𝑃))
167	166	necon3ad 2955	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝑞 ≠ 𝑃 → ¬ 𝑃 ∥ (𝑞↑𝐶)))
168	167	imp 406	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 ≠ 𝑃) → ¬ 𝑃 ∥ (𝑞↑𝐶))
169		disjsn2 4645	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑞 ≠ 𝑃 → ({𝑞} ∩ {𝑃}) = ∅)
170	169	adantl 481	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 ≠ 𝑃) → ({𝑞} ∩ {𝑃}) = ∅)
171		disj3 4384	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (({𝑞} ∩ {𝑃}) = ∅ ↔ {𝑞} = ({𝑞} ∖ {𝑃}))
172	170, 171	sylib 217	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 ≠ 𝑃) → {𝑞} = ({𝑞} ∖ {𝑃}))
173	172	reseq2d 5880	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 ≠ 𝑃) → (𝑇 ↾ {𝑞}) = (𝑇 ↾ ({𝑞} ∖ {𝑃})))
174	173	oveq2d 7271	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 ≠ 𝑃) → (𝐺 DProd (𝑇 ↾ {𝑞})) = (𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃}))))
175	65	ad2antrr 722	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 ≠ 𝑃) → 𝐺dom DProd 𝑇)
176	66	ad2antrr 722	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 ≠ 𝑃) → dom 𝑇 = 𝐴)
177	159	adantr 480	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 ≠ 𝑃) → 𝑞 ∈ 𝐴)
178	175, 176, 177	dpjlem 19569	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 ≠ 𝑃) → (𝐺 DProd (𝑇 ↾ {𝑞})) = (𝑇‘𝑞))
179	174, 178	eqtr3d 2780	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 ≠ 𝑃) → (𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃}))) = (𝑇‘𝑞))
180	179	fveq2d 6760	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 ≠ 𝑃) → (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))) = (♯‘(𝑇‘𝑞)))
181		ablfac1eu.4	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑞 ∈ 𝐴) → (♯‘(𝑇‘𝑞)) = (𝑞↑𝐶))
182	159, 181	syldan 590	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (♯‘(𝑇‘𝑞)) = (𝑞↑𝐶))
183	182	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 ≠ 𝑃) → (♯‘(𝑇‘𝑞)) = (𝑞↑𝐶))
184	180, 183	eqtrd 2778	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 ≠ 𝑃) → (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))) = (𝑞↑𝐶))
185	184	breq2d 5082	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 ≠ 𝑃) → (𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))) ↔ 𝑃 ∥ (𝑞↑𝐶)))
186	168, 185	mtbird 324	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) ∧ 𝑞 ≠ 𝑃) → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))))
187	153, 186	pm2.61dane 3031	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))))
188		orel2 887	. . . . . . . . . . . . 13 ⊢ (¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃})))) → ((𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))) ∨ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃}))))) → 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))))))
189	187, 188	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → ((𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))) ∨ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ({𝑞} ∖ {𝑃}))))) → 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))))))
190	138, 189	sylbid 239	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})))) → 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))))))
191	190	con3d 152	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (¬ 𝑞 ∈ 𝑧 ∧ (𝑧 ∪ {𝑞}) ⊆ 𝐴)) → (¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))) → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃}))))))
192	191	expr 456	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 𝑞 ∈ 𝑧) → ((𝑧 ∪ {𝑞}) ⊆ 𝐴 → (¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))) → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})))))))
193	192	a2d 29	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ 𝑞 ∈ 𝑧) → (((𝑧 ∪ {𝑞}) ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))))) → ((𝑧 ∪ {𝑞}) ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})))))))
194	63, 193	syl5 34	. . . . . . 7 ⊢ ((𝜑 ∧ ¬ 𝑞 ∈ 𝑧) → ((𝑧 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))))) → ((𝑧 ∪ {𝑞}) ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃})))))))
195	194	expcom 413	. . . . . 6 ⊢ (¬ 𝑞 ∈ 𝑧 → (𝜑 → ((𝑧 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))))) → ((𝑧 ∪ {𝑞}) ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃}))))))))
196	195	adantl 481	. . . . 5 ⊢ ((𝑧 ∈ Fin ∧ ¬ 𝑞 ∈ 𝑧) → (𝜑 → ((𝑧 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃}))))) → ((𝑧 ∪ {𝑞}) ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃}))))))))
197	196	a2d 29	. . . 4 ⊢ ((𝑧 ∈ Fin ∧ ¬ 𝑞 ∈ 𝑧) → ((𝜑 → (𝑧 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝑧 ∖ {𝑃})))))) → (𝜑 → ((𝑧 ∪ {𝑞}) ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ ((𝑧 ∪ {𝑞}) ∖ {𝑃}))))))))
198	15, 24, 33, 42, 59, 197	findcard2s 8910	. . 3 ⊢ (𝐴 ∈ Fin → (𝜑 → (𝐴 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝐴 ∖ {𝑃})))))))
199	2, 198	mpcom 38	. 2 ⊢ (𝜑 → (𝐴 ⊆ 𝐴 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝐴 ∖ {𝑃}))))))
200	1, 199	mpi 20	1 ⊢ (𝜑 → ¬ 𝑃 ∥ (♯‘(𝐺 DProd (𝑇 ↾ (𝐴 ∖ {𝑃})))))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 395   ∨ wo 843   = wceq 1539   ∈ wcel 2108   ≠ wne 2942  {crab 3067  Vcvv 3422   ∖ cdif 3880   ∪ cun 3881   ∩ cin 3882   ⊆ wss 3883  ∅c0 4253  {csn 4558   class class class wbr 5070   ↦ cmpt 5153  dom cdm 5580   ↾ cres 5582  ⟶wf 6414  ‘cfv 6418  (class class class)co 7255  Fincfn 8691  1c1 10803   · cmul 10807  ℕ₀cn0 12163  ℤcz 12249  ↑cexp 13710  ♯chash 13972   ∥ cdvds 15891  ℙcprime 16304   pCnt cpc 16465  Basecbs 16840  0_gc0g 17067  Grpcgrp 18492  SubGrpcsubg 18664  Cntzccntz 18836  odcod 19047  LSSumclsm 19154  Abelcabl 19302   DProd cdprd 19511

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-rep 5205  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566  ax-cnex 10858  ax-resscn 10859  ax-1cn 10860  ax-icn 10861  ax-addcl 10862  ax-addrcl 10863  ax-mulcl 10864  ax-mulrcl 10865  ax-mulcom 10866  ax-addass 10867  ax-mulass 10868  ax-distr 10869  ax-i2m1 10870  ax-1ne0 10871  ax-1rid 10872  ax-rnegex 10873  ax-rrecex 10874  ax-cnre 10875  ax-pre-lttri 10876  ax-pre-lttrn 10877  ax-pre-ltadd 10878  ax-pre-mulgt0 10879  ax-pre-sup 10880

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-nel 3049  df-ral 3068  df-rex 3069  df-reu 3070  df-rmo 3071  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-int 4877  df-iun 4923  df-iin 4924  df-br 5071  df-opab 5133  df-mpt 5154  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-se 5536  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-pred 6191  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-isom 6427  df-riota 7212  df-ov 7258  df-oprab 7259  df-mpo 7260  df-of 7511  df-om 7688  df-1st 7804  df-2nd 7805  df-supp 7949  df-tpos 8013  df-frecs 8068  df-wrecs 8099  df-recs 8173  df-rdg 8212  df-1o 8267  df-2o 8268  df-oadd 8271  df-er 8456  df-map 8575  df-ixp 8644  df-en 8692  df-dom 8693  df-sdom 8694  df-fin 8695  df-fsupp 9059  df-sup 9131  df-inf 9132  df-oi 9199  df-dju 9590  df-card 9628  df-pnf 10942  df-mnf 10943  df-xr 10944  df-ltxr 10945  df-le 10946  df-sub 11137  df-neg 11138  df-div 11563  df-nn 11904  df-2 11966  df-3 11967  df-n0 12164  df-z 12250  df-uz 12512  df-rp 12660  df-fz 13169  df-fzo 13312  df-fl 13440  df-mod 13518  df-seq 13650  df-exp 13711  df-hash 13973  df-cj 14738  df-re 14739  df-im 14740  df-sqrt 14874  df-abs 14875  df-dvds 15892  df-gcd 16130  df-prm 16305  df-sets 16793  df-slot 16811  df-ndx 16823  df-base 16841  df-ress 16868  df-plusg 16901  df-0g 17069  df-gsum 17070  df-mre 17212  df-mrc 17213  df-acs 17215  df-mgm 18241  df-sgrp 18290  df-mnd 18301  df-mhm 18345  df-submnd 18346  df-grp 18495  df-minusg 18496  df-sbg 18497  df-mulg 18616  df-subg 18667  df-ghm 18747  df-gim 18790  df-cntz 18838  df-oppg 18865  df-lsm 19156  df-pj1 19157  df-cmn 19303  df-abl 19304  df-dprd 19513

This theorem is referenced by:  ablfac1eu  19591