Theorem psgndif 21721

Description: Embedding of permutation signs restricted to a set without a single element into a ring. (Contributed by AV, 31-Jan-2019.)

Hypotheses

Ref	Expression
psgndif.p	⊢ 𝑃 = (Base‘(SymGrp‘𝑁))
psgndif.s	⊢ 𝑆 = (pmSgn‘𝑁)
psgndif.z	⊢ 𝑍 = (pmSgn‘(𝑁 ∖ {𝐾}))

Assertion

Ref	Expression
psgndif	⊢ ((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) → (𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾} → (𝑍‘(𝑄 ↾ (𝑁 ∖ {𝐾}))) = (𝑆‘𝑄)))

Distinct variable groups:   𝐾,𝑞   𝑃,𝑞   𝑄,𝑞

Allowed substitution hints:   𝑆(𝑞)   𝑁(𝑞)   𝑍(𝑞)

Proof of Theorem psgndif

Dummy variables 𝑟 𝑠 𝑤 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		psgndif.p	. . . . . . . . . 10 ⊢ 𝑃 = (Base‘(SymGrp‘𝑁))
2		eqid 2769	. . . . . . . . . 10 ⊢ ran (pmTrsp‘(𝑁 ∖ {𝐾})) = ran (pmTrsp‘(𝑁 ∖ {𝐾}))
3		eqid 2769	. . . . . . . . . 10 ⊢ (SymGrp‘(𝑁 ∖ {𝐾})) = (SymGrp‘(𝑁 ∖ {𝐾}))
4		eqid 2769	. . . . . . . . . 10 ⊢ (SymGrp‘𝑁) = (SymGrp‘𝑁)
5		eqid 2769	. . . . . . . . . 10 ⊢ ran (pmTrsp‘𝑁) = ran (pmTrsp‘𝑁)
6	1, 2, 3, 4, 5	psgnfix2 21718	. . . . . . . . 9 ⊢ ((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) → (𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾} → ∃𝑟 ∈ Word ran (pmTrsp‘𝑁)𝑄 = ((SymGrp‘𝑁) Σg 𝑟)))
7	6	imp 411	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) → ∃𝑟 ∈ Word ran (pmTrsp‘𝑁)𝑄 = ((SymGrp‘𝑁) Σg 𝑟))
8	7	ad2antrr 738	. . . . . . 7 ⊢ (((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) ∧ ((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑠 = (-1↑(♯‘𝑤)))) → ∃𝑟 ∈ Word ran (pmTrsp‘𝑁)𝑄 = ((SymGrp‘𝑁) Σg 𝑟))
9	1, 2, 3, 4, 5	psgndiflemA 21720	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) → ((𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾})) ∧ (𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) → (𝑄 = ((SymGrp‘𝑁) Σg 𝑟) → (-1↑(♯‘𝑤)) = (-1↑(♯‘𝑟)))))
10	9	imp 411	. . . . . . . . . . 11 ⊢ ((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ (𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾})) ∧ (𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁))) → (𝑄 = ((SymGrp‘𝑁) Σg 𝑟) → (-1↑(♯‘𝑤)) = (-1↑(♯‘𝑟))))
11	10	3anassrs 1379	. . . . . . . . . 10 ⊢ ((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) ∧ (𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤)) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) → (𝑄 = ((SymGrp‘𝑁) Σg 𝑟) → (-1↑(♯‘𝑤)) = (-1↑(♯‘𝑟))))
12	11	adantlrr 733	. . . . . . . . 9 ⊢ ((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) ∧ ((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑠 = (-1↑(♯‘𝑤)))) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) → (𝑄 = ((SymGrp‘𝑁) Σg 𝑟) → (-1↑(♯‘𝑤)) = (-1↑(♯‘𝑟))))
13		eqeq1 2773	. . . . . . . . . . 11 ⊢ (𝑠 = (-1↑(♯‘𝑤)) → (𝑠 = (-1↑(♯‘𝑟)) ↔ (-1↑(♯‘𝑤)) = (-1↑(♯‘𝑟))))
14	13	ad2antll 741	. . . . . . . . . 10 ⊢ (((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) ∧ ((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑠 = (-1↑(♯‘𝑤)))) → (𝑠 = (-1↑(♯‘𝑟)) ↔ (-1↑(♯‘𝑤)) = (-1↑(♯‘𝑟))))
15	14	adantr 485	. . . . . . . . 9 ⊢ ((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) ∧ ((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑠 = (-1↑(♯‘𝑤)))) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) → (𝑠 = (-1↑(♯‘𝑟)) ↔ (-1↑(♯‘𝑤)) = (-1↑(♯‘𝑟))))
16	12, 15	sylibrd 262	. . . . . . . 8 ⊢ ((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) ∧ ((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑠 = (-1↑(♯‘𝑤)))) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) → (𝑄 = ((SymGrp‘𝑁) Σg 𝑟) → 𝑠 = (-1↑(♯‘𝑟))))
17	16	ralrimiva 3163	. . . . . . 7 ⊢ (((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) ∧ ((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑠 = (-1↑(♯‘𝑤)))) → ∀𝑟 ∈ Word ran (pmTrsp‘𝑁)(𝑄 = ((SymGrp‘𝑁) Σg 𝑟) → 𝑠 = (-1↑(♯‘𝑟))))
18	8, 17	r19.29imd 3136	. . . . . 6 ⊢ (((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) ∧ ((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑠 = (-1↑(♯‘𝑤)))) → ∃𝑟 ∈ Word ran (pmTrsp‘𝑁)(𝑄 = ((SymGrp‘𝑁) Σg 𝑟) ∧ 𝑠 = (-1↑(♯‘𝑟))))
19	18	rexlimdva2 3174	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) → (∃𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑠 = (-1↑(♯‘𝑤))) → ∃𝑟 ∈ Word ran (pmTrsp‘𝑁)(𝑄 = ((SymGrp‘𝑁) Σg 𝑟) ∧ 𝑠 = (-1↑(♯‘𝑟)))))
20	1, 2, 3	psgnfix1 21717	. . . . . . . . 9 ⊢ ((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) → (𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾} → ∃𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))(𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤)))
21	20	imp 411	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) → ∃𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))(𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤))
22	21	ad2antrr 738	. . . . . . 7 ⊢ (((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ (𝑄 = ((SymGrp‘𝑁) Σg 𝑟) ∧ 𝑠 = (-1↑(♯‘𝑟)))) → ∃𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))(𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤))
23		simp-4l 794	. . . . . . . . . . . . 13 ⊢ (((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ 𝑄 = ((SymGrp‘𝑁) Σg 𝑟)) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) ∧ (𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤)) → ((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}))
24		simpr 489	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ 𝑄 = ((SymGrp‘𝑁) Σg 𝑟)) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) → 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾})))
25	24	adantr 485	. . . . . . . . . . . . . 14 ⊢ (((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ 𝑄 = ((SymGrp‘𝑁) Σg 𝑟)) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) ∧ (𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤)) → 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾})))
26		simpr 489	. . . . . . . . . . . . . 14 ⊢ (((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ 𝑄 = ((SymGrp‘𝑁) Σg 𝑟)) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) ∧ (𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤)) → (𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤))
27		simp-4r 795	. . . . . . . . . . . . . 14 ⊢ (((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ 𝑄 = ((SymGrp‘𝑁) Σg 𝑟)) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) ∧ (𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤)) → 𝑟 ∈ Word ran (pmTrsp‘𝑁))
28	25, 26, 27	3jca 1144	. . . . . . . . . . . . 13 ⊢ (((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ 𝑄 = ((SymGrp‘𝑁) Σg 𝑟)) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) ∧ (𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤)) → (𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾})) ∧ (𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)))
29		simpr 489	. . . . . . . . . . . . . 14 ⊢ (((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ 𝑄 = ((SymGrp‘𝑁) Σg 𝑟)) → 𝑄 = ((SymGrp‘𝑁) Σg 𝑟))
30	29	ad2antrr 738	. . . . . . . . . . . . 13 ⊢ (((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ 𝑄 = ((SymGrp‘𝑁) Σg 𝑟)) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) ∧ (𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤)) → 𝑄 = ((SymGrp‘𝑁) Σg 𝑟))
31	23, 28, 30, 9	syl3c 67	. . . . . . . . . . . 12 ⊢ (((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ 𝑄 = ((SymGrp‘𝑁) Σg 𝑟)) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) ∧ (𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤)) → (-1↑(♯‘𝑤)) = (-1↑(♯‘𝑟)))
32	31	eqcomd 2775	. . . . . . . . . . 11 ⊢ (((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ 𝑄 = ((SymGrp‘𝑁) Σg 𝑟)) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) ∧ (𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤)) → (-1↑(♯‘𝑟)) = (-1↑(♯‘𝑤)))
33	32	ex 417	. . . . . . . . . 10 ⊢ ((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ 𝑄 = ((SymGrp‘𝑁) Σg 𝑟)) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) → ((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) → (-1↑(♯‘𝑟)) = (-1↑(♯‘𝑤))))
34	33	adantlrr 733	. . . . . . . . 9 ⊢ ((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ (𝑄 = ((SymGrp‘𝑁) Σg 𝑟) ∧ 𝑠 = (-1↑(♯‘𝑟)))) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) → ((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) → (-1↑(♯‘𝑟)) = (-1↑(♯‘𝑤))))
35		eqeq1 2773	. . . . . . . . . . 11 ⊢ (𝑠 = (-1↑(♯‘𝑟)) → (𝑠 = (-1↑(♯‘𝑤)) ↔ (-1↑(♯‘𝑟)) = (-1↑(♯‘𝑤))))
36	35	ad2antll 741	. . . . . . . . . 10 ⊢ (((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ (𝑄 = ((SymGrp‘𝑁) Σg 𝑟) ∧ 𝑠 = (-1↑(♯‘𝑟)))) → (𝑠 = (-1↑(♯‘𝑤)) ↔ (-1↑(♯‘𝑟)) = (-1↑(♯‘𝑤))))
37	36	adantr 485	. . . . . . . . 9 ⊢ ((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ (𝑄 = ((SymGrp‘𝑁) Σg 𝑟) ∧ 𝑠 = (-1↑(♯‘𝑟)))) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) → (𝑠 = (-1↑(♯‘𝑤)) ↔ (-1↑(♯‘𝑟)) = (-1↑(♯‘𝑤))))
38	34, 37	sylibrd 262	. . . . . . . 8 ⊢ ((((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ (𝑄 = ((SymGrp‘𝑁) Σg 𝑟) ∧ 𝑠 = (-1↑(♯‘𝑟)))) ∧ 𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))) → ((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) → 𝑠 = (-1↑(♯‘𝑤))))
39	38	ralrimiva 3163	. . . . . . 7 ⊢ (((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ (𝑄 = ((SymGrp‘𝑁) Σg 𝑟) ∧ 𝑠 = (-1↑(♯‘𝑟)))) → ∀𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) → 𝑠 = (-1↑(♯‘𝑤))))
40	22, 39	r19.29imd 3136	. . . . . 6 ⊢ (((((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) ∧ 𝑟 ∈ Word ran (pmTrsp‘𝑁)) ∧ (𝑄 = ((SymGrp‘𝑁) Σg 𝑟) ∧ 𝑠 = (-1↑(♯‘𝑟)))) → ∃𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑠 = (-1↑(♯‘𝑤))))
41	40	rexlimdva2 3174	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) → (∃𝑟 ∈ Word ran (pmTrsp‘𝑁)(𝑄 = ((SymGrp‘𝑁) Σg 𝑟) ∧ 𝑠 = (-1↑(♯‘𝑟))) → ∃𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑠 = (-1↑(♯‘𝑤)))))
42	19, 41	impbid 215	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) → (∃𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑠 = (-1↑(♯‘𝑤))) ↔ ∃𝑟 ∈ Word ran (pmTrsp‘𝑁)(𝑄 = ((SymGrp‘𝑁) Σg 𝑟) ∧ 𝑠 = (-1↑(♯‘𝑟)))))
43	42	iotabidv 6521	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) → (℩𝑠∃𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑠 = (-1↑(♯‘𝑤)))) = (℩𝑠∃𝑟 ∈ Word ran (pmTrsp‘𝑁)(𝑄 = ((SymGrp‘𝑁) Σg 𝑟) ∧ 𝑠 = (-1↑(♯‘𝑟)))))
44		diffi 9159	. . . . 5 ⊢ (𝑁 ∈ Fin → (𝑁 ∖ {𝐾}) ∈ Fin)
45	44	ad2antrr 738	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) → (𝑁 ∖ {𝐾}) ∈ Fin)
46		eqid 2769	. . . . . 6 ⊢ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾} = {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}
47		eqid 2769	. . . . . 6 ⊢ (Base‘(SymGrp‘(𝑁 ∖ {𝐾}))) = (Base‘(SymGrp‘(𝑁 ∖ {𝐾})))
48		eqid 2769	. . . . . 6 ⊢ (𝑁 ∖ {𝐾}) = (𝑁 ∖ {𝐾})
49	1, 46, 47, 48	symgfixelsi 19505	. . . . 5 ⊢ ((𝐾 ∈ 𝑁 ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) → (𝑄 ↾ (𝑁 ∖ {𝐾})) ∈ (Base‘(SymGrp‘(𝑁 ∖ {𝐾}))))
50	49	adantll 726	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) → (𝑄 ↾ (𝑁 ∖ {𝐾})) ∈ (Base‘(SymGrp‘(𝑁 ∖ {𝐾}))))
51		psgndif.z	. . . . 5 ⊢ 𝑍 = (pmSgn‘(𝑁 ∖ {𝐾}))
52	3, 47, 2, 51	psgnvalfi 19584	. . . 4 ⊢ (((𝑁 ∖ {𝐾}) ∈ Fin ∧ (𝑄 ↾ (𝑁 ∖ {𝐾})) ∈ (Base‘(SymGrp‘(𝑁 ∖ {𝐾})))) → (𝑍‘(𝑄 ↾ (𝑁 ∖ {𝐾}))) = (℩𝑠∃𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑠 = (-1↑(♯‘𝑤)))))
53	45, 50, 52	syl2anc 595	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) → (𝑍‘(𝑄 ↾ (𝑁 ∖ {𝐾}))) = (℩𝑠∃𝑤 ∈ Word ran (pmTrsp‘(𝑁 ∖ {𝐾}))((𝑄 ↾ (𝑁 ∖ {𝐾})) = ((SymGrp‘(𝑁 ∖ {𝐾})) Σg 𝑤) ∧ 𝑠 = (-1↑(♯‘𝑤)))))
54		simpl 487	. . . 4 ⊢ ((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) → 𝑁 ∈ Fin)
55		elrabi 3655	. . . 4 ⊢ (𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾} → 𝑄 ∈ 𝑃)
56		psgndif.s	. . . . 5 ⊢ 𝑆 = (pmSgn‘𝑁)
57	4, 1, 5, 56	psgnvalfi 19584	. . . 4 ⊢ ((𝑁 ∈ Fin ∧ 𝑄 ∈ 𝑃) → (𝑆‘𝑄) = (℩𝑠∃𝑟 ∈ Word ran (pmTrsp‘𝑁)(𝑄 = ((SymGrp‘𝑁) Σg 𝑟) ∧ 𝑠 = (-1↑(♯‘𝑟)))))
58	54, 55, 57	syl2an 607	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) → (𝑆‘𝑄) = (℩𝑠∃𝑟 ∈ Word ran (pmTrsp‘𝑁)(𝑄 = ((SymGrp‘𝑁) Σg 𝑟) ∧ 𝑠 = (-1↑(♯‘𝑟)))))
59	43, 53, 58	3eqtr4d 2814	. 2 ⊢ (((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) ∧ 𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾}) → (𝑍‘(𝑄 ↾ (𝑁 ∖ {𝐾}))) = (𝑆‘𝑄))
60	59	ex 417	1 ⊢ ((𝑁 ∈ Fin ∧ 𝐾 ∈ 𝑁) → (𝑄 ∈ {𝑞 ∈ 𝑃 ∣ (𝑞‘𝐾) = 𝐾} → (𝑍‘(𝑄 ↾ (𝑁 ∖ {𝐾}))) = (𝑆‘𝑄)))

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 400   ∧ w3a 1101   = wceq 1567   ∈ wcel 2149  ∃wrex 3095  {crab 3423   ∖ cdif 3910  {csn 4594  ran crn 5663   ↾ cres 5664  ℩cio 6491  ‘cfv 6537  (class class class)co 7411  Fincfn 8943  1c1 11101  -cneg 11442  ↑cexp 14097  ♯chash 14366  Word cword 14550  Basecbs 17269   Σ_g cgsu 17493  SymGrpcsymg 19439  pmTrspcpmtr 19511  pmSgncpsgn 19559

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5242  ax-sep 5261  ax-nul 5271  ax-pow 5337  ax-pr 5405  ax-un 7733  ax-cnex 11156  ax-resscn 11157  ax-1cn 11158  ax-icn 11159  ax-addcl 11160  ax-addrcl 11161  ax-mulcl 11162  ax-mulrcl 11163  ax-mulcom 11164  ax-addass 11165  ax-mulass 11166  ax-distr 11167  ax-i2m1 11168  ax-1ne0 11169  ax-1rid 11170  ax-rnegex 11171  ax-rrecex 11172  ax-cnre 11173  ax-pre-lttri 11174  ax-pre-lttrn 11175  ax-pre-ltadd 11176  ax-pre-mulgt0 11177

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-xor 1539  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-nel 3071  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-tp 4599  df-op 4601  df-ot 4603  df-uni 4877  df-int 4917  df-iun 4962  df-iin 4963  df-br 5114  df-opab 5178  df-mpt 5197  df-tr 5223  df-id 5557  df-eprel 5562  df-po 5570  df-so 5571  df-fr 5615  df-se 5616  df-we 5617  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-isom 6546  df-riota 7368  df-ov 7414  df-oprab 7415  df-mpo 7416  df-om 7863  df-1st 7986  df-2nd 7987  df-tpos 8222  df-frecs 8278  df-wrecs 8309  df-recs 8358  df-rdg 8397  df-1o 8453  df-2o 8454  df-er 8694  df-map 8826  df-en 8944  df-dom 8945  df-sdom 8946  df-fin 8947  df-card 9925  df-pnf 11245  df-mnf 11246  df-xr 11247  df-ltxr 11248  df-le 11249  df-sub 11443  df-neg 11444  df-div 11872  df-nn 12234  df-2 12303  df-3 12304  df-4 12305  df-5 12306  df-6 12307  df-7 12308  df-8 12309  df-9 12310  df-n0 12505  df-xnn0 12578  df-z 12592  df-uz 12863  df-rp 13017  df-fz 13536  df-fzo 13683  df-seq 14038  df-exp 14098  df-hash 14367  df-word 14551  df-lsw 14600  df-concat 14608  df-s1 14634  df-substr 14679  df-pfx 14709  df-splice 14787  df-reverse 14796  df-s2 14885  df-struct 17207  df-sets 17224  df-slot 17242  df-ndx 17254  df-base 17270  df-ress 17291  df-plusg 17323  df-tset 17329  df-0g 17494  df-gsum 17495  df-mre 17638  df-mrc 17639  df-acs 17641  df-mgm 18698  df-sgrp 18777  df-mnd 18793  df-mhm 18841  df-submnd 18842  df-efmnd 18928  df-grp 19003  df-minusg 19004  df-subg 19189  df-ghm 19284  df-gim 19329  df-oppg 19416  df-symg 19440  df-pmtr 19512  df-psgn 19561

This theorem is referenced by:  copsgndif  21722