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

Theorem numclwwlk7 28097
Description: Statement 14 in [Huneke] p. 2: "The total number of closed walks of length p [in a friendship graph] is (k(k-1)+1)f(p)=1 (mod p)", since the number of vertices in a friendship graph is (k(k-1)+1), see frrusgrord0 28046 or frrusgrord 28047, and p divides (k-1), i.e. (k-1) mod p = 0 => k(k-1) mod p = 0 => k(k-1)+1 mod p = 1. Since the null graph is a friendship graph, see frgr0 27971, as well as k-regular (for any k), see 0vtxrgr 27285, but has no closed walk, see 0clwlk0 27838, this theorem would be false for a null graph: ((♯‘(𝑃 ClWWalksN 𝐺)) mod 𝑃) = 0 ≠ 1, so this case must be excluded (by assuming 𝑉 ≠ ∅). (Contributed by Alexander van der Vekens, 1-Sep-2018.) (Revised by AV, 3-Jun-2021.)
Hypothesis
Ref Expression
numclwwlk6.v 𝑉 = (Vtx‘𝐺)
Assertion
Ref Expression
numclwwlk7 (((𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ) ∧ (𝑉 ≠ ∅ ∧ 𝑉 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((♯‘(𝑃 ClWWalksN 𝐺)) mod 𝑃) = 1)

Proof of Theorem numclwwlk7
StepHypRef Expression
1 simpll 763 . . . 4 (((𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ) ∧ (𝑉 ≠ ∅ ∧ 𝑉 ∈ Fin)) → 𝐺 RegUSGraph 𝐾)
2 simplr 765 . . . 4 (((𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ) ∧ (𝑉 ≠ ∅ ∧ 𝑉 ∈ Fin)) → 𝐺 ∈ FriendGraph )
3 simprr 769 . . . 4 (((𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ) ∧ (𝑉 ≠ ∅ ∧ 𝑉 ∈ Fin)) → 𝑉 ∈ Fin)
41, 2, 33jca 1120 . . 3 (((𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ) ∧ (𝑉 ≠ ∅ ∧ 𝑉 ∈ Fin)) → (𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin))
5 numclwwlk6.v . . . 4 𝑉 = (Vtx‘𝐺)
65numclwwlk6 28096 . . 3 (((𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ∧ 𝑉 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((♯‘(𝑃 ClWWalksN 𝐺)) mod 𝑃) = ((♯‘𝑉) mod 𝑃))
74, 6stoic3 1768 . 2 (((𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ) ∧ (𝑉 ≠ ∅ ∧ 𝑉 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((♯‘(𝑃 ClWWalksN 𝐺)) mod 𝑃) = ((♯‘𝑉) mod 𝑃))
8 simp2 1129 . . . . 5 (((𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ) ∧ (𝑉 ≠ ∅ ∧ 𝑉 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (𝑉 ≠ ∅ ∧ 𝑉 ∈ Fin))
98ancomd 462 . . . 4 (((𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ) ∧ (𝑉 ≠ ∅ ∧ 𝑉 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (𝑉 ∈ Fin ∧ 𝑉 ≠ ∅))
10 simp1 1128 . . . . 5 (((𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ) ∧ (𝑉 ≠ ∅ ∧ 𝑉 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ))
1110ancomd 462 . . . 4 (((𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ) ∧ (𝑉 ≠ ∅ ∧ 𝑉 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (𝐺 ∈ FriendGraph ∧ 𝐺 RegUSGraph 𝐾))
125frrusgrord 28047 . . . 4 ((𝑉 ∈ Fin ∧ 𝑉 ≠ ∅) → ((𝐺 ∈ FriendGraph ∧ 𝐺 RegUSGraph 𝐾) → (♯‘𝑉) = ((𝐾 · (𝐾 − 1)) + 1)))
139, 11, 12sylc 65 . . 3 (((𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ) ∧ (𝑉 ≠ ∅ ∧ 𝑉 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (♯‘𝑉) = ((𝐾 · (𝐾 − 1)) + 1))
1413oveq1d 7160 . 2 (((𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ) ∧ (𝑉 ≠ ∅ ∧ 𝑉 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((♯‘𝑉) mod 𝑃) = (((𝐾 · (𝐾 − 1)) + 1) mod 𝑃))
155numclwwlk7lem 28095 . . 3 (((𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ) ∧ (𝑉 ≠ ∅ ∧ 𝑉 ∈ Fin)) → 𝐾 ∈ ℕ0)
16 nn0cn 11895 . . . . . . . . . 10 (𝐾 ∈ ℕ0𝐾 ∈ ℂ)
17 peano2cnm 10940 . . . . . . . . . . 11 (𝐾 ∈ ℂ → (𝐾 − 1) ∈ ℂ)
1816, 17syl 17 . . . . . . . . . 10 (𝐾 ∈ ℕ0 → (𝐾 − 1) ∈ ℂ)
1916, 18mulcomd 10650 . . . . . . . . 9 (𝐾 ∈ ℕ0 → (𝐾 · (𝐾 − 1)) = ((𝐾 − 1) · 𝐾))
2019oveq1d 7160 . . . . . . . 8 (𝐾 ∈ ℕ0 → ((𝐾 · (𝐾 − 1)) mod 𝑃) = (((𝐾 − 1) · 𝐾) mod 𝑃))
2120adantr 481 . . . . . . 7 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((𝐾 · (𝐾 − 1)) mod 𝑃) = (((𝐾 − 1) · 𝐾) mod 𝑃))
22 prmnn 16006 . . . . . . . . . 10 (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
2322ad2antrl 724 . . . . . . . . 9 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → 𝑃 ∈ ℕ)
24 nn0z 11993 . . . . . . . . . . 11 (𝐾 ∈ ℕ0𝐾 ∈ ℤ)
25 peano2zm 12013 . . . . . . . . . . 11 (𝐾 ∈ ℤ → (𝐾 − 1) ∈ ℤ)
2624, 25syl 17 . . . . . . . . . 10 (𝐾 ∈ ℕ0 → (𝐾 − 1) ∈ ℤ)
2726adantr 481 . . . . . . . . 9 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (𝐾 − 1) ∈ ℤ)
2824adantr 481 . . . . . . . . 9 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → 𝐾 ∈ ℤ)
2923, 27, 283jca 1120 . . . . . . . 8 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (𝑃 ∈ ℕ ∧ (𝐾 − 1) ∈ ℤ ∧ 𝐾 ∈ ℤ))
30 simprr 769 . . . . . . . 8 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → 𝑃 ∥ (𝐾 − 1))
31 mulmoddvds 15667 . . . . . . . 8 ((𝑃 ∈ ℕ ∧ (𝐾 − 1) ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑃 ∥ (𝐾 − 1) → (((𝐾 − 1) · 𝐾) mod 𝑃) = 0))
3229, 30, 31sylc 65 . . . . . . 7 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (((𝐾 − 1) · 𝐾) mod 𝑃) = 0)
3321, 32eqtrd 2853 . . . . . 6 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((𝐾 · (𝐾 − 1)) mod 𝑃) = 0)
3422nnred 11641 . . . . . . . . 9 (𝑃 ∈ ℙ → 𝑃 ∈ ℝ)
35 prmgt1 16029 . . . . . . . . 9 (𝑃 ∈ ℙ → 1 < 𝑃)
3634, 35jca 512 . . . . . . . 8 (𝑃 ∈ ℙ → (𝑃 ∈ ℝ ∧ 1 < 𝑃))
3736ad2antrl 724 . . . . . . 7 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (𝑃 ∈ ℝ ∧ 1 < 𝑃))
38 1mod 13259 . . . . . . 7 ((𝑃 ∈ ℝ ∧ 1 < 𝑃) → (1 mod 𝑃) = 1)
3937, 38syl 17 . . . . . 6 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (1 mod 𝑃) = 1)
4033, 39oveq12d 7163 . . . . 5 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (((𝐾 · (𝐾 − 1)) mod 𝑃) + (1 mod 𝑃)) = (0 + 1))
4140oveq1d 7160 . . . 4 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((((𝐾 · (𝐾 − 1)) mod 𝑃) + (1 mod 𝑃)) mod 𝑃) = ((0 + 1) mod 𝑃))
42 nn0re 11894 . . . . . . 7 (𝐾 ∈ ℕ0𝐾 ∈ ℝ)
43 peano2rem 10941 . . . . . . . 8 (𝐾 ∈ ℝ → (𝐾 − 1) ∈ ℝ)
4442, 43syl 17 . . . . . . 7 (𝐾 ∈ ℕ0 → (𝐾 − 1) ∈ ℝ)
4542, 44remulcld 10659 . . . . . 6 (𝐾 ∈ ℕ0 → (𝐾 · (𝐾 − 1)) ∈ ℝ)
4645adantr 481 . . . . 5 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (𝐾 · (𝐾 − 1)) ∈ ℝ)
47 1red 10630 . . . . 5 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → 1 ∈ ℝ)
4822nnrpd 12417 . . . . . 6 (𝑃 ∈ ℙ → 𝑃 ∈ ℝ+)
4948ad2antrl 724 . . . . 5 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → 𝑃 ∈ ℝ+)
50 modaddabs 13265 . . . . 5 (((𝐾 · (𝐾 − 1)) ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝑃 ∈ ℝ+) → ((((𝐾 · (𝐾 − 1)) mod 𝑃) + (1 mod 𝑃)) mod 𝑃) = (((𝐾 · (𝐾 − 1)) + 1) mod 𝑃))
5146, 47, 49, 50syl3anc 1363 . . . 4 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((((𝐾 · (𝐾 − 1)) mod 𝑃) + (1 mod 𝑃)) mod 𝑃) = (((𝐾 · (𝐾 − 1)) + 1) mod 𝑃))
52 0p1e1 11747 . . . . . 6 (0 + 1) = 1
5352oveq1i 7155 . . . . 5 ((0 + 1) mod 𝑃) = (1 mod 𝑃)
5434, 35, 38syl2anc 584 . . . . . 6 (𝑃 ∈ ℙ → (1 mod 𝑃) = 1)
5554ad2antrl 724 . . . . 5 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (1 mod 𝑃) = 1)
5653, 55syl5eq 2865 . . . 4 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((0 + 1) mod 𝑃) = 1)
5741, 51, 563eqtr3d 2861 . . 3 ((𝐾 ∈ ℕ0 ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (((𝐾 · (𝐾 − 1)) + 1) mod 𝑃) = 1)
5815, 57stoic3 1768 . 2 (((𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ) ∧ (𝑉 ≠ ∅ ∧ 𝑉 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → (((𝐾 · (𝐾 − 1)) + 1) mod 𝑃) = 1)
597, 14, 583eqtrd 2857 1 (((𝐺 RegUSGraph 𝐾𝐺 ∈ FriendGraph ) ∧ (𝑉 ≠ ∅ ∧ 𝑉 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ 𝑃 ∥ (𝐾 − 1))) → ((♯‘(𝑃 ClWWalksN 𝐺)) mod 𝑃) = 1)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 396  w3a 1079   = wceq 1528  wcel 2105  wne 3013  c0 4288   class class class wbr 5057  cfv 6348  (class class class)co 7145  Fincfn 8497  cc 10523  cr 10524  0cc0 10525  1c1 10526   + caddc 10528   · cmul 10530   < clt 10663  cmin 10858  cn 11626  0cn0 11885  cz 11969  +crp 12377   mod cmo 13225  chash 13678  cdvds 15595  cprime 16003  Vtxcvtx 26708   RegUSGraph crusgr 27265   ClWWalksN cclwwlkn 27729   FriendGraph cfrgr 27964
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1787  ax-4 1801  ax-5 1902  ax-6 1961  ax-7 2006  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2151  ax-12 2167  ax-ext 2790  ax-rep 5181  ax-sep 5194  ax-nul 5201  ax-pow 5257  ax-pr 5320  ax-un 7450  ax-inf2 9092  ax-ac2 9873  ax-cnex 10581  ax-resscn 10582  ax-1cn 10583  ax-icn 10584  ax-addcl 10585  ax-addrcl 10586  ax-mulcl 10587  ax-mulrcl 10588  ax-mulcom 10589  ax-addass 10590  ax-mulass 10591  ax-distr 10592  ax-i2m1 10593  ax-1ne0 10594  ax-1rid 10595  ax-rnegex 10596  ax-rrecex 10597  ax-cnre 10598  ax-pre-lttri 10599  ax-pre-lttrn 10600  ax-pre-ltadd 10601  ax-pre-mulgt0 10602  ax-pre-sup 10603
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 842  df-ifp 1055  df-3or 1080  df-3an 1081  df-tru 1531  df-fal 1541  df-ex 1772  df-nf 1776  df-sb 2061  df-mo 2615  df-eu 2647  df-clab 2797  df-cleq 2811  df-clel 2890  df-nfc 2960  df-ne 3014  df-nel 3121  df-ral 3140  df-rex 3141  df-reu 3142  df-rmo 3143  df-rab 3144  df-v 3494  df-sbc 3770  df-csb 3881  df-dif 3936  df-un 3938  df-in 3940  df-ss 3949  df-pss 3951  df-nul 4289  df-if 4464  df-pw 4537  df-sn 4558  df-pr 4560  df-tp 4562  df-op 4564  df-uni 4831  df-int 4868  df-iun 4912  df-disj 5023  df-br 5058  df-opab 5120  df-mpt 5138  df-tr 5164  df-id 5453  df-eprel 5458  df-po 5467  df-so 5468  df-fr 5507  df-se 5508  df-we 5509  df-xp 5554  df-rel 5555  df-cnv 5556  df-co 5557  df-dm 5558  df-rn 5559  df-res 5560  df-ima 5561  df-pred 6141  df-ord 6187  df-on 6188  df-lim 6189  df-suc 6190  df-iota 6307  df-fun 6350  df-fn 6351  df-f 6352  df-f1 6353  df-fo 6354  df-f1o 6355  df-fv 6356  df-isom 6357  df-riota 7103  df-ov 7148  df-oprab 7149  df-mpo 7150  df-om 7570  df-1st 7678  df-2nd 7679  df-wrecs 7936  df-recs 7997  df-rdg 8035  df-1o 8091  df-2o 8092  df-oadd 8095  df-er 8278  df-map 8397  df-pm 8398  df-en 8498  df-dom 8499  df-sdom 8500  df-fin 8501  df-sup 8894  df-inf 8895  df-oi 8962  df-dju 9318  df-card 9356  df-ac 9530  df-pnf 10665  df-mnf 10666  df-xr 10667  df-ltxr 10668  df-le 10669  df-sub 10860  df-neg 10861  df-div 11286  df-nn 11627  df-2 11688  df-3 11689  df-n0 11886  df-xnn0 11956  df-z 11970  df-uz 12232  df-rp 12378  df-xadd 12496  df-fz 12881  df-fzo 13022  df-fl 13150  df-mod 13226  df-seq 13358  df-exp 13418  df-hash 13679  df-word 13850  df-lsw 13903  df-concat 13911  df-s1 13938  df-substr 13991  df-pfx 14021  df-s2 14198  df-s3 14199  df-cj 14446  df-re 14447  df-im 14448  df-sqrt 14582  df-abs 14583  df-clim 14833  df-sum 15031  df-dvds 15596  df-gcd 15832  df-prm 16004  df-phi 16091  df-vtx 26710  df-iedg 26711  df-edg 26760  df-uhgr 26770  df-ushgr 26771  df-upgr 26794  df-umgr 26795  df-uspgr 26862  df-usgr 26863  df-fusgr 27026  df-nbgr 27042  df-vtxdg 27175  df-rgr 27266  df-rusgr 27267  df-wlks 27308  df-wlkson 27309  df-trls 27401  df-trlson 27402  df-pths 27424  df-spths 27425  df-pthson 27426  df-spthson 27427  df-wwlks 27535  df-wwlksn 27536  df-wwlksnon 27537  df-wspthsn 27538  df-wspthsnon 27539  df-clwwlk 27687  df-clwwlkn 27730  df-clwwlknon 27794  df-frgr 27965
This theorem is referenced by:  frgrreggt1  28099
  Copyright terms: Public domain W3C validator