Theorem hashecclwwlkn1 30714

Description: The size of every equivalence class of the equivalence relation over the set of closed walks (defined as words) with a fixed length which is a prime number is 1 or equals this length. (Contributed by Alexander van der Vekens, 17-Jun-2018.) (Revised by AV, 1-May-2021.)

Hypotheses

Ref	Expression
erclwwlkn.w	⊢ 𝑊 = (𝑁 ClWWalksN 𝐺)
erclwwlkn.r	⊢ ∼ = {⟨𝑡, 𝑢⟩ ∣ (𝑡 ∈ 𝑊 ∧ 𝑢 ∈ 𝑊 ∧ ∃𝑛 ∈ (0...𝑁)𝑡 = (𝑢 cyclShift 𝑛))}

Assertion

Ref	Expression
hashecclwwlkn1	⊢ ((𝑁 ∈ ℙ ∧ 𝑈 ∈ (𝑊 / ∼ )) → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁))

Distinct variable groups:   𝑡,𝑊,𝑢   𝑛,𝑁,𝑢,𝑡   𝑛,𝑊   𝑛,𝐺,𝑢   𝑈,𝑛,𝑢

Allowed substitution hints:   ∼ (𝑢, 𝑡, 𝑛)   𝑈(𝑡)   𝐺(𝑡)

Proof of Theorem hashecclwwlkn1

Dummy variables 𝑥 𝑦 𝑚 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		erclwwlkn.w	. . . . 5 ⊢ 𝑊 = (𝑁 ClWWalksN 𝐺)
2		erclwwlkn.r	. . . . 5 ⊢ ∼ = {⟨𝑡, 𝑢⟩ ∣ (𝑡 ∈ 𝑊 ∧ 𝑢 ∈ 𝑊 ∧ ∃𝑛 ∈ (0...𝑁)𝑡 = (𝑢 cyclShift 𝑛))}
3	1, 2	eclclwwlkn1 30712	. . . 4 ⊢ (𝑈 ∈ (𝑊 / ∼ ) → (𝑈 ∈ (𝑊 / ∼ ) ↔ ∃𝑥 ∈ 𝑊 𝑈 = {𝑦 ∈ 𝑊 ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)}))
4		rabeq 3430	. . . . . . . . . 10 ⊢ (𝑊 = (𝑁 ClWWalksN 𝐺) → {𝑦 ∈ 𝑊 ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)} = {𝑦 ∈ (𝑁 ClWWalksN 𝐺) ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)})
5	1, 4	mp1i 14	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℙ ∧ 𝑥 ∈ 𝑊) → {𝑦 ∈ 𝑊 ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)} = {𝑦 ∈ (𝑁 ClWWalksN 𝐺) ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)})
6		prmnn 16890	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℙ → 𝑁 ∈ ℕ)
7	6	nnnn0d 12705	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℙ → 𝑁 ∈ ℕ0)
8	1	eleq2i 2856	. . . . . . . . . . 11 ⊢ (𝑥 ∈ 𝑊 ↔ 𝑥 ∈ (𝑁 ClWWalksN 𝐺))
9	8	biimpi 219	. . . . . . . . . 10 ⊢ (𝑥 ∈ 𝑊 → 𝑥 ∈ (𝑁 ClWWalksN 𝐺))
10		clwwlknscsh 30699	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ0 ∧ 𝑥 ∈ (𝑁 ClWWalksN 𝐺)) → {𝑦 ∈ (𝑁 ClWWalksN 𝐺) ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)} = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)})
11	7, 9, 10	syl2an 608	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℙ ∧ 𝑥 ∈ 𝑊) → {𝑦 ∈ (𝑁 ClWWalksN 𝐺) ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)} = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)})
12	5, 11	eqtrd 2798	. . . . . . . 8 ⊢ ((𝑁 ∈ ℙ ∧ 𝑥 ∈ 𝑊) → {𝑦 ∈ 𝑊 ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)} = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)})
13	12	eqeq2d 2774	. . . . . . 7 ⊢ ((𝑁 ∈ ℙ ∧ 𝑥 ∈ 𝑊) → (𝑈 = {𝑦 ∈ 𝑊 ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)} ↔ 𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)}))
14		simpll 779	. . . . . . . . . . . . . . . 16 ⊢ (((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) = 𝑁) ∧ 𝑁 ∈ ℕ) → 𝑥 ∈ Word (Vtx‘𝐺))
15		elnnne0 12658	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑁 ∈ ℕ ↔ (𝑁 ∈ ℕ0 ∧ 𝑁 ≠ 0))
16		eqeq1 2767	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑁 = (♯‘𝑥) → (𝑁 = 0 ↔ (♯‘𝑥) = 0))
17	16	eqcoms 2771	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((♯‘𝑥) = 𝑁 → (𝑁 = 0 ↔ (♯‘𝑥) = 0))
18		hasheq0 14546	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 ∈ Word (Vtx‘𝐺) → ((♯‘𝑥) = 0 ↔ 𝑥 = ∅))
19	17, 18	sylan9bbr 520	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) = 𝑁) → (𝑁 = 0 ↔ 𝑥 = ∅))
20	19	necon3bid 3003	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) = 𝑁) → (𝑁 ≠ 0 ↔ 𝑥 ≠ ∅))
21	20	biimpcd 252	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑁 ≠ 0 → ((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) = 𝑁) → 𝑥 ≠ ∅))
22	15, 21	simplbiim 514	. . . . . . . . . . . . . . . . 17 ⊢ (𝑁 ∈ ℕ → ((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) = 𝑁) → 𝑥 ≠ ∅))
23	22	impcom 413	. . . . . . . . . . . . . . . 16 ⊢ (((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) = 𝑁) ∧ 𝑁 ∈ ℕ) → 𝑥 ≠ ∅)
24		simplr 781	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) = 𝑁) ∧ 𝑁 ∈ ℕ) → (♯‘𝑥) = 𝑁)
25	24	eqcomd 2769	. . . . . . . . . . . . . . . 16 ⊢ (((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) = 𝑁) ∧ 𝑁 ∈ ℕ) → 𝑁 = (♯‘𝑥))
26	14, 23, 25	3jca 1146	. . . . . . . . . . . . . . 15 ⊢ (((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) = 𝑁) ∧ 𝑁 ∈ ℕ) → (𝑥 ∈ Word (Vtx‘𝐺) ∧ 𝑥 ≠ ∅ ∧ 𝑁 = (♯‘𝑥)))
27	26	ex 418	. . . . . . . . . . . . . 14 ⊢ ((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) = 𝑁) → (𝑁 ∈ ℕ → (𝑥 ∈ Word (Vtx‘𝐺) ∧ 𝑥 ≠ ∅ ∧ 𝑁 = (♯‘𝑥))))
28		eqid 2763	. . . . . . . . . . . . . . 15 ⊢ (Vtx‘𝐺) = (Vtx‘𝐺)
29	28	clwwlknbp 30672	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ (𝑁 ClWWalksN 𝐺) → (𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) = 𝑁))
30	27, 29	syl11 34	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℕ → (𝑥 ∈ (𝑁 ClWWalksN 𝐺) → (𝑥 ∈ Word (Vtx‘𝐺) ∧ 𝑥 ≠ ∅ ∧ 𝑁 = (♯‘𝑥))))
31	8, 30	biimtrid 245	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℕ → (𝑥 ∈ 𝑊 → (𝑥 ∈ Word (Vtx‘𝐺) ∧ 𝑥 ≠ ∅ ∧ 𝑁 = (♯‘𝑥))))
32	6, 31	syl 18	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℙ → (𝑥 ∈ 𝑊 → (𝑥 ∈ Word (Vtx‘𝐺) ∧ 𝑥 ≠ ∅ ∧ 𝑁 = (♯‘𝑥))))
33	32	imp 412	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℙ ∧ 𝑥 ∈ 𝑊) → (𝑥 ∈ Word (Vtx‘𝐺) ∧ 𝑥 ≠ ∅ ∧ 𝑁 = (♯‘𝑥)))
34		scshwfzeqfzo 15017	. . . . . . . . . 10 ⊢ ((𝑥 ∈ Word (Vtx‘𝐺) ∧ 𝑥 ≠ ∅ ∧ 𝑁 = (♯‘𝑥)) → {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)} = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^𝑁)𝑦 = (𝑥 cyclShift 𝑛)})
35	33, 34	syl 18	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℙ ∧ 𝑥 ∈ 𝑊) → {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)} = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^𝑁)𝑦 = (𝑥 cyclShift 𝑛)})
36	35	eqeq2d 2774	. . . . . . . 8 ⊢ ((𝑁 ∈ ℙ ∧ 𝑥 ∈ 𝑊) → (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)} ↔ 𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^𝑁)𝑦 = (𝑥 cyclShift 𝑛)}))
37		oveq2 7457	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑛 = 𝑚 → (𝑥 cyclShift 𝑛) = (𝑥 cyclShift 𝑚))
38	37	eqeq2d 2774	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 = 𝑚 → (𝑦 = (𝑥 cyclShift 𝑛) ↔ 𝑦 = (𝑥 cyclShift 𝑚)))
39	38	cbvrexvw 3245	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛) ↔ ∃𝑚 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑚))
40		eqeq1 2767	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑦 = 𝑢 → (𝑦 = (𝑥 cyclShift 𝑚) ↔ 𝑢 = (𝑥 cyclShift 𝑚)))
41		eqcom 2770	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑢 = (𝑥 cyclShift 𝑚) ↔ (𝑥 cyclShift 𝑚) = 𝑢)
42	40, 41	bitrdi 290	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑦 = 𝑢 → (𝑦 = (𝑥 cyclShift 𝑚) ↔ (𝑥 cyclShift 𝑚) = 𝑢))
43	42	rexbidv 3190	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑦 = 𝑢 → (∃𝑚 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑚) ↔ ∃𝑚 ∈ (0..^(♯‘𝑥))(𝑥 cyclShift 𝑚) = 𝑢))
44	39, 43	bitrid 286	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 = 𝑢 → (∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛) ↔ ∃𝑚 ∈ (0..^(♯‘𝑥))(𝑥 cyclShift 𝑚) = 𝑢))
45	44	cbvrabv 3426	. . . . . . . . . . . . . . . . . . 19 ⊢ {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)} = {𝑢 ∈ Word (Vtx‘𝐺) ∣ ∃𝑚 ∈ (0..^(♯‘𝑥))(𝑥 cyclShift 𝑚) = 𝑢}
46	45	cshwshash 17323	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) ∈ ℙ) → ((♯‘{𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}) = (♯‘𝑥) ∨ (♯‘{𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}) = 1))
47	46	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) ∈ ℙ) ∧ 𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}) → ((♯‘{𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}) = (♯‘𝑥) ∨ (♯‘{𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}) = 1))
48	47	orcomd 885	. . . . . . . . . . . . . . . 16 ⊢ (((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) ∈ ℙ) ∧ 𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}) → ((♯‘{𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}) = 1 ∨ (♯‘{𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}) = (♯‘𝑥)))
49		fveqeq2 6923	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ↔ (♯‘{𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}) = 1))
50		fveqeq2 6923	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = (♯‘𝑥) ↔ (♯‘{𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}) = (♯‘𝑥)))
51	49, 50	orbi12d 932	. . . . . . . . . . . . . . . . 17 ⊢ (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)} → (((♯‘𝑈) = 1 ∨ (♯‘𝑈) = (♯‘𝑥)) ↔ ((♯‘{𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}) = 1 ∨ (♯‘{𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}) = (♯‘𝑥))))
52	51	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ (((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) ∈ ℙ) ∧ 𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}) → (((♯‘𝑈) = 1 ∨ (♯‘𝑈) = (♯‘𝑥)) ↔ ((♯‘{𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}) = 1 ∨ (♯‘{𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}) = (♯‘𝑥))))
53	48, 52	mpbird 260	. . . . . . . . . . . . . . 15 ⊢ (((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) ∈ ℙ) ∧ 𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}) → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = (♯‘𝑥)))
54	53	ex 418	. . . . . . . . . . . . . 14 ⊢ ((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) ∈ ℙ) → (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = (♯‘𝑥))))
55	54	ex 418	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ Word (Vtx‘𝐺) → ((♯‘𝑥) ∈ ℙ → (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = (♯‘𝑥)))))
56	55	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) = 𝑁) → ((♯‘𝑥) ∈ ℙ → (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = (♯‘𝑥)))))
57		eleq1 2852	. . . . . . . . . . . . . . 15 ⊢ (𝑁 = (♯‘𝑥) → (𝑁 ∈ ℙ ↔ (♯‘𝑥) ∈ ℙ))
58		oveq2 7457	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑁 = (♯‘𝑥) → (0..^𝑁) = (0..^(♯‘𝑥)))
59	58	rexeqdv 3324	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑁 = (♯‘𝑥) → (∃𝑛 ∈ (0..^𝑁)𝑦 = (𝑥 cyclShift 𝑛) ↔ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)))
60	59	rabbidv 3423	. . . . . . . . . . . . . . . . 17 ⊢ (𝑁 = (♯‘𝑥) → {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^𝑁)𝑦 = (𝑥 cyclShift 𝑛)} = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)})
61	60	eqeq2d 2774	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 = (♯‘𝑥) → (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^𝑁)𝑦 = (𝑥 cyclShift 𝑛)} ↔ 𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)}))
62		eqeq2 2775	. . . . . . . . . . . . . . . . 17 ⊢ (𝑁 = (♯‘𝑥) → ((♯‘𝑈) = 𝑁 ↔ (♯‘𝑈) = (♯‘𝑥)))
63	62	orbi2d 929	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 = (♯‘𝑥) → (((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁) ↔ ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = (♯‘𝑥))))
64	61, 63	imbi12d 347	. . . . . . . . . . . . . . 15 ⊢ (𝑁 = (♯‘𝑥) → ((𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^𝑁)𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁)) ↔ (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = (♯‘𝑥)))))
65	57, 64	imbi12d 347	. . . . . . . . . . . . . 14 ⊢ (𝑁 = (♯‘𝑥) → ((𝑁 ∈ ℙ → (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^𝑁)𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁))) ↔ ((♯‘𝑥) ∈ ℙ → (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = (♯‘𝑥))))))
66	65	eqcoms 2771	. . . . . . . . . . . . 13 ⊢ ((♯‘𝑥) = 𝑁 → ((𝑁 ∈ ℙ → (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^𝑁)𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁))) ↔ ((♯‘𝑥) ∈ ℙ → (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = (♯‘𝑥))))))
67	66	adantl 487	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) = 𝑁) → ((𝑁 ∈ ℙ → (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^𝑁)𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁))) ↔ ((♯‘𝑥) ∈ ℙ → (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^(♯‘𝑥))𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = (♯‘𝑥))))))
68	56, 67	mpbird 260	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ Word (Vtx‘𝐺) ∧ (♯‘𝑥) = 𝑁) → (𝑁 ∈ ℙ → (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^𝑁)𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁))))
69	29, 68	syl 18	. . . . . . . . . 10 ⊢ (𝑥 ∈ (𝑁 ClWWalksN 𝐺) → (𝑁 ∈ ℙ → (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^𝑁)𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁))))
70	69, 1	eleq2s 2882	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝑊 → (𝑁 ∈ ℙ → (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^𝑁)𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁))))
71	70	impcom 413	. . . . . . . 8 ⊢ ((𝑁 ∈ ℙ ∧ 𝑥 ∈ 𝑊) → (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0..^𝑁)𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁)))
72	36, 71	sylbid 243	. . . . . . 7 ⊢ ((𝑁 ∈ ℙ ∧ 𝑥 ∈ 𝑊) → (𝑈 = {𝑦 ∈ Word (Vtx‘𝐺) ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁)))
73	13, 72	sylbid 243	. . . . . 6 ⊢ ((𝑁 ∈ ℙ ∧ 𝑥 ∈ 𝑊) → (𝑈 = {𝑦 ∈ 𝑊 ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁)))
74	73	rexlimdva 3167	. . . . 5 ⊢ (𝑁 ∈ ℙ → (∃𝑥 ∈ 𝑊 𝑈 = {𝑦 ∈ 𝑊 ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)} → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁)))
75	74	com12 33	. . . 4 ⊢ (∃𝑥 ∈ 𝑊 𝑈 = {𝑦 ∈ 𝑊 ∣ ∃𝑛 ∈ (0...𝑁)𝑦 = (𝑥 cyclShift 𝑛)} → (𝑁 ∈ ℙ → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁)))
76	3, 75	biimtrdi 256	. . 3 ⊢ (𝑈 ∈ (𝑊 / ∼ ) → (𝑈 ∈ (𝑊 / ∼ ) → (𝑁 ∈ ℙ → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁))))
77	76	pm2.43i 53	. 2 ⊢ (𝑈 ∈ (𝑊 / ∼ ) → (𝑁 ∈ ℙ → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁)))
78	77	impcom 413	1 ⊢ ((𝑁 ∈ ℙ ∧ 𝑈 ∈ (𝑊 / ∼ )) → ((♯‘𝑈) = 1 ∨ (♯‘𝑈) = 𝑁))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861   ∧ w3a 1103   = wceq 1570   ∈ wcel 2147   ≠ wne 2959  ∃wrex 3090  {crab 3416  ∅c0 4281  {copab 5171  ‘cfv 6564  (class class class)co 7449   / cqs 8752  0cc0 11237  1c1 11238  ℕcn 12373  ℕ₀cn0 12644  ...cfz 13677  ..^cfzo 13826  ♯chash 14513  Word cword 14697   cyclShift ccsh 14979  ℙcprime 16887  Vtxcvtx 29620   ClWWalksN cclwwlkn 30661

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 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5236  ax-sep 5253  ax-nul 5264  ax-pow 5332  ax-pr 5396  ax-un 7781  ax-inf2 9677  ax-cnex 11293  ax-resscn 11294  ax-1cn 11295  ax-icn 11296  ax-addcl 11297  ax-addrcl 11298  ax-mulcl 11299  ax-mulrcl 11300  ax-mulcom 11301  ax-addass 11302  ax-mulass 11303  ax-distr 11304  ax-i2m1 11305  ax-1ne0 11306  ax-1rid 11307  ax-rnegex 11308  ax-rrecex 11309  ax-cnre 11310  ax-pre-lttri 11311  ax-pre-lttrn 11312  ax-pre-ltadd 11313  ax-pre-mulgt0 11314  ax-pre-sup 11315

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 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3066  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-op 4839  df-uni 4871  df-int 4911  df-iun 4956  df-disj 5074  df-br 5107  df-opab 5172  df-mpt 5191  df-tr 5217  df-id 5551  df-eprel 5556  df-po 5564  df-so 5565  df-fr 5609  df-se 5610  df-we 5611  df-xp 5662  df-rel 5663  df-cnv 5664  df-co 5665  df-dm 5666  df-rn 5667  df-res 5668  df-ima 5669  df-pred 6328  df-ord 6389  df-on 6390  df-lim 6391  df-suc 6392  df-iota 6518  df-fun 6566  df-fn 6567  df-f 6568  df-f1 6569  df-fo 6570  df-f1o 6571  df-fv 6572  df-isom 6573  df-riota 7406  df-ov 7452  df-oprab 7453  df-mpo 7454  df-om 7910  df-1st 8033  df-2nd 8034  df-frecs 8335  df-wrecs 8366  df-recs 8415  df-rdg 8454  df-1o 8512  df-2o 8513  df-oadd 8516  df-er 8753  df-ec 8755  df-qs 8759  df-map 8885  df-en 9010  df-dom 9011  df-sdom 9012  df-fin 9013  df-sup 9469  df-inf 9470  df-oi 9539  df-dju 10017  df-card 10055  df-pnf 11382  df-mnf 11383  df-xr 11384  df-ltxr 11385  df-le 11386  df-sub 11580  df-neg 11581  df-div 12012  df-nn 12374  df-2 12443  df-3 12444  df-n0 12645  df-xnn0 12718  df-z 12732  df-uz 13004  df-rp 13159  df-ico 13520  df-fz 13678  df-fzo 13827  df-fl 13970  df-mod 14048  df-seq 14183  df-exp 14243  df-hash 14514  df-word 14698  df-lsw 14747  df-concat 14755  df-substr 14829  df-pfx 14861  df-reps 14960  df-csh 14980  df-cj 15307  df-re 15308  df-im 15309  df-sqrt 15443  df-abs 15444  df-clim 15696  df-sum 15895  df-dvds 16464  df-gcd 16706  df-prm 16888  df-phi 16984  df-clwwlk 30619  df-clwwlkn 30662

This theorem is used by: (None)