MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  numclwwlk5 Structured version   Visualization version   GIF version

Theorem numclwwlk5 31019
Description: Statement 13 in [Huneke] p. 2: "Let p be a prime divisor of k-1; then f(p) = 1 (mod p) [for each vertex v]". (Contributed by Alexander van der Vekens, 7-Oct-2018.) (Revised by AV, 2-Jun-2021.) (Revised by AV, 7-Mar-2022.)
Hypothesis
Ref Expression
numclwwlk3.v 𝑉 = (Vtx‘𝐺)
Assertion
Ref Expression
numclwwlk5 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((♯‘(𝑋(ClWWalksNOn‘𝐺)𝑃)) mod 𝑃) = 1)

Proof of Theorem numclwwlk5
StepHypRef Expression
1 simpl1 1210 . . . . . 6 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 2 ∈ ℙ ∧ 2 ∥ (𝐾 − 1))) → 𝐺 RegUSGraph 𝐾)
2 simpr1 1213 . . . . . 6 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 2 ∈ ℙ ∧ 2 ∥ (𝐾 − 1))) → 𝑋 ∈ 𝑉)
3 numclwwlk3.v . . . . . . . . . . . . 13 𝑉 = (Vtx‘𝐺)
43finrusgrfusgr 30176 . . . . . . . . . . . 12 ((𝐺 RegUSGraph 𝐾 ∧ 𝑉 ∈ Fin) → 𝐺 ∈ FinUSGraph)
543adant2 1149 . . . . . . . . . . 11 ((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) → 𝐺 ∈ FinUSGraph)
65adantl 487 . . . . . . . . . 10 ((𝑋 ∈ 𝑉 ∧ (𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin)) → 𝐺 ∈ FinUSGraph)
7 simpr1 1213 . . . . . . . . . 10 ((𝑋 ∈ 𝑉 ∧ (𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin)) → 𝐺 RegUSGraph 𝐾)
8 ne0i 4290 . . . . . . . . . . 11 (𝑋 ∈ 𝑉 → 𝑉 ≠ ∅)
98adantr 486 . . . . . . . . . 10 ((𝑋 ∈ 𝑉 ∧ (𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin)) → 𝑉 ≠ ∅)
103frusgrnn0 30182 . . . . . . . . . 10 ((𝐺 ∈ FinUSGraph ∧ 𝐺 RegUSGraph 𝐾 ∧ 𝑉 ≠ ∅) → 𝐾 ∈ ℕ0)
116, 7, 9, 10syl3anc 1399 . . . . . . . . 9 ((𝑋 ∈ 𝑉 ∧ (𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin)) → 𝐾 ∈ ℕ0)
1211ex 418 . . . . . . . 8 (𝑋 ∈ 𝑉 → ((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) → 𝐾 ∈ ℕ0))
13123ad2ant1 1151 . . . . . . 7 ((𝑋 ∈ 𝑉 ∧ 2 ∈ ℙ ∧ 2 ∥ (𝐾 − 1)) → ((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) → 𝐾 ∈ ℕ0))
1413impcom 413 . . . . . 6 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 2 ∈ ℙ ∧ 2 ∥ (𝐾 − 1))) → 𝐾 ∈ ℕ0)
151, 2, 143jca 1146 . . . . 5 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 2 ∈ ℙ ∧ 2 ∥ (𝐾 − 1))) → (𝐺 RegUSGraph 𝐾 ∧ 𝑋 ∈ 𝑉 ∧ 𝐾 ∈ ℕ0))
16 simpr3 1215 . . . . 5 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 2 ∈ ℙ ∧ 2 ∥ (𝐾 − 1))) → 2 ∥ (𝐾 − 1))
173numclwwlk5lem 31018 . . . . 5 ((𝐺 RegUSGraph 𝐾 ∧ 𝑋 ∈ 𝑉 ∧ 𝐾 ∈ ℕ0) → (2 ∥ (𝐾 − 1) → ((♯‘(𝑋(ClWWalksNOn‘𝐺)2)) mod 2) = 1))
1815, 16, 17sylc 66 . . . 4 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 2 ∈ ℙ ∧ 2 ∥ (𝐾 − 1))) → ((♯‘(𝑋(ClWWalksNOn‘𝐺)2)) mod 2) = 1)
1918a1i 11 . . 3 (𝑃 = 2 → (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 2 ∈ ℙ ∧ 2 ∥ (𝐾 − 1))) → ((♯‘(𝑋(ClWWalksNOn‘𝐺)2)) mod 2) = 1))
20 eleq1 2852 . . . . 5 (𝑃 = 2 → (𝑃 ∈ ℙ ↔ 2 ∈ ℙ))
21 breq1 5109 . . . . 5 (𝑃 = 2 → (𝑃 ∥ (𝐾 − 1) ↔ 2 ∥ (𝐾 − 1)))
2220, 213anbi23d 1468 . . . 4 (𝑃 = 2 → ((𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)) ↔ (𝑋 ∈ 𝑉 ∧ 2 ∈ ℙ ∧ 2 ∥ (𝐾 − 1))))
2322anbi2d 642 . . 3 (𝑃 = 2 → (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) ↔ ((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 2 ∈ ℙ ∧ 2 ∥ (𝐾 − 1)))))
24 oveq2 7451 . . . . . 6 (𝑃 = 2 → (𝑋(ClWWalksNOn‘𝐺)𝑃) = (𝑋(ClWWalksNOn‘𝐺)2))
2524fveq2d 6912 . . . . 5 (𝑃 = 2 → (♯‘(𝑋(ClWWalksNOn‘𝐺)𝑃)) = (♯‘(𝑋(ClWWalksNOn‘𝐺)2)))
26 id 23 . . . . 5 (𝑃 = 2 → 𝑃 = 2)
2725, 26oveq12d 7461 . . . 4 (𝑃 = 2 → ((♯‘(𝑋(ClWWalksNOn‘𝐺)𝑃)) mod 𝑃) = ((♯‘(𝑋(ClWWalksNOn‘𝐺)2)) mod 2))
2827eqeq1d 2765 . . 3 (𝑃 = 2 → (((♯‘(𝑋(ClWWalksNOn‘𝐺)𝑃)) mod 𝑃) = 1 ↔ ((♯‘(𝑋(ClWWalksNOn‘𝐺)2)) mod 2) = 1))
2919, 23, 283imtr4d 297 . 2 (𝑃 = 2 → (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((♯‘(𝑋(ClWWalksNOn‘𝐺)𝑃)) mod 𝑃) = 1))
30 3simpa 1166 . . . . . . . 8 ((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) → (𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ))
3130adantr 486 . . . . . . 7 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ))
3231adantl 487 . . . . . 6 ((𝑃 ≠ 2 ∧ ((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)))) → (𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ))
33 simprl3 1239 . . . . . 6 ((𝑃 ≠ 2 ∧ ((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)))) → 𝑉 ∈ Fin)
34 simprr1 1240 . . . . . 6 ((𝑃 ≠ 2 ∧ ((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)))) → 𝑋 ∈ 𝑉)
35 eldifsn 4748 . . . . . . . . . . 11 (𝑃 ∈ (ℙ ∖ {2}) ↔ (𝑃 ∈ ℙ ∧ 𝑃 ≠ 2))
36 oddprmge3 16905 . . . . . . . . . . 11 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ (ℤ≥‘3))
3735, 36sylbir 238 . . . . . . . . . 10 ((𝑃 ∈ ℙ ∧ 𝑃 ≠ 2) → 𝑃 ∈ (ℤ≥‘3))
3837ex 418 . . . . . . . . 9 (𝑃 ∈ ℙ → (𝑃 ≠ 2 → 𝑃 ∈ (ℤ≥‘3)))
39383ad2ant2 1152 . . . . . . . 8 ((𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)) → (𝑃 ≠ 2 → 𝑃 ∈ (ℤ≥‘3)))
4039adantl 487 . . . . . . 7 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (𝑃 ≠ 2 → 𝑃 ∈ (ℤ≥‘3)))
4140impcom 413 . . . . . 6 ((𝑃 ≠ 2 ∧ ((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)))) → 𝑃 ∈ (ℤ≥‘3))
423numclwwlk3 31016 . . . . . 6 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ) ∧ (𝑉 ∈ Fin ∧ 𝑋 ∈ 𝑉 ∧ 𝑃 ∈ (ℤ≥‘3))) → (♯‘(𝑋(ClWWalksNOn‘𝐺)𝑃)) = (((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) + (𝐾↑(𝑃 − 2))))
4332, 33, 34, 41, 42syl13anc 1400 . . . . 5 ((𝑃 ≠ 2 ∧ ((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)))) → (♯‘(𝑋(ClWWalksNOn‘𝐺)𝑃)) = (((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) + (𝐾↑(𝑃 − 2))))
4443oveq1d 7458 . . . 4 ((𝑃 ≠ 2 ∧ ((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)))) → ((♯‘(𝑋(ClWWalksNOn‘𝐺)𝑃)) mod 𝑃) = ((((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) + (𝐾↑(𝑃 − 2))) mod 𝑃))
45123ad2ant1 1151 . . . . . . . . . . 11 ((𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)) → ((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) → 𝐾 ∈ ℕ0))
4645impcom 413 . . . . . . . . . 10 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → 𝐾 ∈ ℕ0)
4746nn0zd 12745 . . . . . . . . 9 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → 𝐾 ∈ ℤ)
48 peano2zm 12766 . . . . . . . . 9 (𝐾 ∈ ℤ → (𝐾 − 1) ∈ ℤ)
49 zre 12724 . . . . . . . . 9 ((𝐾 − 1) ∈ ℤ → (𝐾 − 1) ∈ ℝ)
5047, 48, 493syl 19 . . . . . . . 8 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (𝐾 − 1) ∈ ℝ)
51 simpl3 1212 . . . . . . . . . 10 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → 𝑉 ∈ Fin)
523clwwlknonfin 30715 . . . . . . . . . 10 (𝑉 ∈ Fin → (𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)) ∈ Fin)
53 hashcl 14527 . . . . . . . . . 10 ((𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)) ∈ Fin → (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2))) ∈ ℕ0)
5451, 52, 533syl 19 . . . . . . . . 9 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2))) ∈ ℕ0)
5554nn0red 12695 . . . . . . . 8 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2))) ∈ ℝ)
5650, 55remulcld 11366 . . . . . . 7 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) ∈ ℝ)
5746nn0red 12695 . . . . . . . 8 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → 𝐾 ∈ ℝ)
58 prmm2nn0 16903 . . . . . . . . . 10 (𝑃 ∈ ℙ → (𝑃 − 2) ∈ ℕ0)
59583ad2ant2 1152 . . . . . . . . 9 ((𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)) → (𝑃 − 2) ∈ ℕ0)
6059adantl 487 . . . . . . . 8 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (𝑃 − 2) ∈ ℕ0)
6157, 60reexpcld 14333 . . . . . . 7 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (𝐾↑(𝑃 − 2)) ∈ ℝ)
62 prmnn 16878 . . . . . . . . . 10 (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
6362nnrpd 13189 . . . . . . . . 9 (𝑃 ∈ ℙ → 𝑃 ∈ ℝ+)
64633ad2ant2 1152 . . . . . . . 8 ((𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)) → 𝑃 ∈ ℝ+)
6564adantl 487 . . . . . . 7 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → 𝑃 ∈ ℝ+)
6656, 61, 653jca 1146 . . . . . 6 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) ∈ ℝ ∧ (𝐾↑(𝑃 − 2)) ∈ ℝ ∧ 𝑃 ∈ ℝ+))
6766adantl 487 . . . . 5 ((𝑃 ≠ 2 ∧ ((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)))) → (((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) ∈ ℝ ∧ (𝐾↑(𝑃 − 2)) ∈ ℝ ∧ 𝑃 ∈ ℝ+))
68 modaddabs 14078 . . . . . 6 ((((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) ∈ ℝ ∧ (𝐾↑(𝑃 − 2)) ∈ ℝ ∧ 𝑃 ∈ ℝ+) → (((((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) mod 𝑃) + ((𝐾↑(𝑃 − 2)) mod 𝑃)) mod 𝑃) = ((((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) + (𝐾↑(𝑃 − 2))) mod 𝑃))
6968eqcomd 2769 . . . . 5 ((((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) ∈ ℝ ∧ (𝐾↑(𝑃 − 2)) ∈ ℝ ∧ 𝑃 ∈ ℝ+) → ((((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) + (𝐾↑(𝑃 − 2))) mod 𝑃) = (((((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) mod 𝑃) + ((𝐾↑(𝑃 − 2)) mod 𝑃)) mod 𝑃))
7067, 69syl 18 . . . 4 ((𝑃 ≠ 2 ∧ ((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)))) → ((((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) + (𝐾↑(𝑃 − 2))) mod 𝑃) = (((((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) mod 𝑃) + ((𝐾↑(𝑃 − 2)) mod 𝑃)) mod 𝑃))
71623ad2ant2 1152 . . . . . . . . . . 11 ((𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)) → 𝑃 ∈ ℕ)
7271adantl 487 . . . . . . . . . 10 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → 𝑃 ∈ ℕ)
73 nn0z 12744 . . . . . . . . . . 11 (𝐾 ∈ ℕ0 → 𝐾 ∈ ℤ)
7446, 73, 483syl 19 . . . . . . . . . 10 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (𝐾 − 1) ∈ ℤ)
7554nn0zd 12745 . . . . . . . . . 10 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2))) ∈ ℤ)
7672, 74, 753jca 1146 . . . . . . . . 9 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (𝑃 ∈ ℕ ∧ (𝐾 − 1) ∈ ℤ ∧ (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2))) ∈ ℤ))
77 simpr3 1215 . . . . . . . . 9 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → 𝑃 ∥ (𝐾 − 1))
78 mulmoddvds 16529 . . . . . . . . 9 ((𝑃 ∈ ℕ ∧ (𝐾 − 1) ∈ ℤ ∧ (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2))) ∈ ℤ) → (𝑃 ∥ (𝐾 − 1) → (((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) mod 𝑃) = 0))
7976, 77, 78sylc 66 . . . . . . . 8 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) mod 𝑃) = 0)
80 simpr2 1214 . . . . . . . . . 10 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → 𝑃 ∈ ℙ)
8180, 47jca 521 . . . . . . . . 9 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (𝑃 ∈ ℙ ∧ 𝐾 ∈ ℤ))
82 powm2modprm 17010 . . . . . . . . 9 ((𝑃 ∈ ℙ ∧ 𝐾 ∈ ℤ) → (𝑃 ∥ (𝐾 − 1) → ((𝐾↑(𝑃 − 2)) mod 𝑃) = 1))
8381, 77, 82sylc 66 . . . . . . . 8 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((𝐾↑(𝑃 − 2)) mod 𝑃) = 1)
8479, 83oveq12d 7461 . . . . . . 7 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) mod 𝑃) + ((𝐾↑(𝑃 − 2)) mod 𝑃)) = (0 + 1))
8584oveq1d 7458 . . . . . 6 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (((((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) mod 𝑃) + ((𝐾↑(𝑃 − 2)) mod 𝑃)) mod 𝑃) = ((0 + 1) mod 𝑃))
86 0p1e1 12490 . . . . . . . . . 10 (0 + 1) = 1
8786oveq1i 7453 . . . . . . . . 9 ((0 + 1) mod 𝑃) = (1 mod 𝑃)
8862nnred 12377 . . . . . . . . . 10 (𝑃 ∈ ℙ → 𝑃 ∈ ℝ)
89 prmgt1 16902 . . . . . . . . . 10 (𝑃 ∈ ℙ → 1 < 𝑃)
90 1mod 14070 . . . . . . . . . 10 ((𝑃 ∈ ℝ ∧ 1 < 𝑃) → (1 mod 𝑃) = 1)
9188, 89, 90syl2anc 596 . . . . . . . . 9 (𝑃 ∈ ℙ → (1 mod 𝑃) = 1)
9287, 91eqtrid 2810 . . . . . . . 8 (𝑃 ∈ ℙ → ((0 + 1) mod 𝑃) = 1)
93923ad2ant2 1152 . . . . . . 7 ((𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)) → ((0 + 1) mod 𝑃) = 1)
9493adantl 487 . . . . . 6 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((0 + 1) mod 𝑃) = 1)
9585, 94eqtrd 2798 . . . . 5 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (((((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) mod 𝑃) + ((𝐾↑(𝑃 − 2)) mod 𝑃)) mod 𝑃) = 1)
9695adantl 487 . . . 4 ((𝑃 ≠ 2 ∧ ((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)))) → (((((𝐾 − 1) · (♯‘(𝑋(ClWWalksNOn‘𝐺)(𝑃 − 2)))) mod 𝑃) + ((𝐾↑(𝑃 − 2)) mod 𝑃)) mod 𝑃) = 1)
9744, 70, 963eqtrd 2802 . . 3 ((𝑃 ≠ 2 ∧ ((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1)))) → ((♯‘(𝑋(ClWWalksNOn‘𝐺)𝑃)) mod 𝑃) = 1)
9897ex 418 . 2 (𝑃 ≠ 2 → (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((♯‘(𝑋(ClWWalksNOn‘𝐺)𝑃)) mod 𝑃) = 1))
9929, 98pm2.61ine 3042 1 (((𝐺 RegUSGraph 𝐾 ∧ 𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑋 ∈ 𝑉 ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((♯‘(𝑋(ClWWalksNOn‘𝐺)𝑃)) mod 𝑃) = 1)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2147   ≠ wne 2959   ∖ cdif 4048  ∅c0 4281  {csn 4588   class class class wbr 5106  ‘cfv 6558  (class class class)co 7443  Fincfn 9001  ℝcr 11226  0cc0 11227  1c1 11228   + caddc 11230   · cmul 11232   < clt 11370   − cmin 11568  ℕcn 12362  2c2 12424  3c3 12425  ℕ0cn0 12633  ℤcz 12720  ℤ≥cuz 12992  ℝ+crp 13147   mod cmo 14036  ↑cexp 14231  ♯chash 14501   ∥ cdvds 16451  ℙcprime 16875  Vtxcvtx 29604  FinUSGraphcfusgr 29927   RegUSGraph crusgr 30167  ClWWalksNOncclwwlknon 30708   FriendGraph cfrgr 30889
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 5235  ax-sep 5252  ax-nul 5263  ax-pow 5331  ax-pr 5395  ax-un 7775  ax-inf2 9669  ax-cnex 11283  ax-resscn 11284  ax-1cn 11285  ax-icn 11286  ax-addcl 11287  ax-addrcl 11288  ax-mulcl 11289  ax-mulrcl 11290  ax-mulcom 11291  ax-addass 11292  ax-mulass 11293  ax-distr 11294  ax-i2m1 11295  ax-1ne0 11296  ax-1rid 11297  ax-rnegex 11298  ax-rrecex 11299  ax-cnre 11300  ax-pre-lttri 11301  ax-pre-lttrn 11302  ax-pre-ltadd 11303  ax-pre-mulgt0 11304  ax-pre-sup 11305
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 5171  df-mpt 5190  df-tr 5216  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 6322  df-ord 6383  df-on 6384  df-lim 6385  df-suc 6386  df-iota 6512  df-fun 6560  df-fn 6561  df-f 6562  df-f1 6563  df-fo 6564  df-f1o 6565  df-fv 6566  df-isom 6567  df-riota 7400  df-ov 7446  df-oprab 7447  df-mpo 7448  df-om 7902  df-1st 8025  df-2nd 8026  df-frecs 8327  df-wrecs 8358  df-recs 8407  df-rdg 8446  df-1o 8504  df-2o 8505  df-oadd 8508  df-er 8745  df-map 8877  df-pm 8878  df-en 9002  df-dom 9003  df-sdom 9004  df-fin 9005  df-sup 9461  df-inf 9462  df-oi 9531  df-dju 10009  df-card 10047  df-pnf 11372  df-mnf 11373  df-xr 11374  df-ltxr 11375  df-le 11376  df-sub 11570  df-neg 11571  df-div 12001  df-nn 12363  df-2 12432  df-3 12433  df-n0 12634  df-xnn0 12707  df-z 12721  df-uz 12993  df-rp 13148  df-xadd 13269  df-fz 13667  df-fzo 13816  df-fl 13959  df-mod 14037  df-seq 14172  df-exp 14232  df-hash 14502  df-word 14686  df-lsw 14735  df-concat 14743  df-s1 14770  df-substr 14817  df-pfx 14849  df-s2 15027  df-cj 15295  df-re 15296  df-im 15297  df-sqrt 15431  df-abs 15432  df-clim 15684  df-sum 15883  df-dvds 16452  df-gcd 16694  df-prm 16876  df-phi 16972  df-vtx 29606  df-iedg 29607  df-edg 29656  df-uhgr 29666  df-ushgr 29667  df-upgr 29690  df-umgr 29691  df-uspgr 29761  df-usgr 29762  df-fusgr 29928  df-nbgr 29944  df-vtxdg 30077  df-rgr 30168  df-rusgr 30169  df-wwlks 30449  df-wwlksn 30450  df-wwlksnon 30451  df-clwwlk 30603  df-clwwlkn 30646  df-clwwlknon 30709  df-frgr 30890
This theorem is used by:  numclwwlk6  31021
  Copyright terms: Public domain W3C validator