Theorem modcyc 13821

Description: The modulo operation is periodic. (Contributed by NM, 10-Nov-2008.)

Assertion

Ref	Expression
modcyc	⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+ ∧ 𝑁 ∈ ℤ) → ((𝐴 + (𝑁 · 𝐵)) mod 𝐵) = (𝐴 mod 𝐵))

Proof of Theorem modcyc

Step	Hyp	Ref	Expression
1		zre 12512	. . . . . . . 8 ⊢ (𝑁 ∈ ℤ → 𝑁 ∈ ℝ)
2		rpre 12932	. . . . . . . 8 ⊢ (𝐵 ∈ ℝ+ → 𝐵 ∈ ℝ)
3		remulcl 11145	. . . . . . . 8 ⊢ ((𝑁 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝑁 · 𝐵) ∈ ℝ)
4	1, 2, 3	syl2an 596	. . . . . . 7 ⊢ ((𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (𝑁 · 𝐵) ∈ ℝ)
5		readdcl 11143	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ (𝑁 · 𝐵) ∈ ℝ) → (𝐴 + (𝑁 · 𝐵)) ∈ ℝ)
6	4, 5	sylan2 593	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ (𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+)) → (𝐴 + (𝑁 · 𝐵)) ∈ ℝ)
7	6	3impb 1115	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (𝐴 + (𝑁 · 𝐵)) ∈ ℝ)
8		simp3 1138	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → 𝐵 ∈ ℝ+)
9		modval 13786	. . . . 5 ⊢ (((𝐴 + (𝑁 · 𝐵)) ∈ ℝ ∧ 𝐵 ∈ ℝ+) → ((𝐴 + (𝑁 · 𝐵)) mod 𝐵) = ((𝐴 + (𝑁 · 𝐵)) − (𝐵 · (⌊‘((𝐴 + (𝑁 · 𝐵)) / 𝐵)))))
10	7, 8, 9	syl2anc 584	. . . 4 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → ((𝐴 + (𝑁 · 𝐵)) mod 𝐵) = ((𝐴 + (𝑁 · 𝐵)) − (𝐵 · (⌊‘((𝐴 + (𝑁 · 𝐵)) / 𝐵)))))
11		recn 11150	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ → 𝐴 ∈ ℂ)
12	11	3ad2ant1 1133	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → 𝐴 ∈ ℂ)
13	4	recnd 11192	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (𝑁 · 𝐵) ∈ ℂ)
14	13	3adant1 1130	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (𝑁 · 𝐵) ∈ ℂ)
15		rpcnne0 12942	. . . . . . . . . . . 12 ⊢ (𝐵 ∈ ℝ+ → (𝐵 ∈ ℂ ∧ 𝐵 ≠ 0))
16	15	3ad2ant3 1135	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (𝐵 ∈ ℂ ∧ 𝐵 ≠ 0))
17		divdir 11847	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ (𝑁 · 𝐵) ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐵 ≠ 0)) → ((𝐴 + (𝑁 · 𝐵)) / 𝐵) = ((𝐴 / 𝐵) + ((𝑁 · 𝐵) / 𝐵)))
18	12, 14, 16, 17	syl3anc 1371	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → ((𝐴 + (𝑁 · 𝐵)) / 𝐵) = ((𝐴 / 𝐵) + ((𝑁 · 𝐵) / 𝐵)))
19		zcn 12513	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℤ → 𝑁 ∈ ℂ)
20		divcan4 11849	. . . . . . . . . . . . . 14 ⊢ ((𝑁 ∈ ℂ ∧ 𝐵 ∈ ℂ ∧ 𝐵 ≠ 0) → ((𝑁 · 𝐵) / 𝐵) = 𝑁)
21	20	3expb 1120	. . . . . . . . . . . . 13 ⊢ ((𝑁 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐵 ≠ 0)) → ((𝑁 · 𝐵) / 𝐵) = 𝑁)
22	19, 15, 21	syl2an 596	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → ((𝑁 · 𝐵) / 𝐵) = 𝑁)
23	22	3adant1 1130	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → ((𝑁 · 𝐵) / 𝐵) = 𝑁)
24	23	oveq2d 7378	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → ((𝐴 / 𝐵) + ((𝑁 · 𝐵) / 𝐵)) = ((𝐴 / 𝐵) + 𝑁))
25	18, 24	eqtrd 2771	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → ((𝐴 + (𝑁 · 𝐵)) / 𝐵) = ((𝐴 / 𝐵) + 𝑁))
26	25	fveq2d 6851	. . . . . . . 8 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (⌊‘((𝐴 + (𝑁 · 𝐵)) / 𝐵)) = (⌊‘((𝐴 / 𝐵) + 𝑁)))
27		rerpdivcl 12954	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+) → (𝐴 / 𝐵) ∈ ℝ)
28	27	3adant2 1131	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (𝐴 / 𝐵) ∈ ℝ)
29		simp2 1137	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → 𝑁 ∈ ℤ)
30		fladdz 13740	. . . . . . . . 9 ⊢ (((𝐴 / 𝐵) ∈ ℝ ∧ 𝑁 ∈ ℤ) → (⌊‘((𝐴 / 𝐵) + 𝑁)) = ((⌊‘(𝐴 / 𝐵)) + 𝑁))
31	28, 29, 30	syl2anc 584	. . . . . . . 8 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (⌊‘((𝐴 / 𝐵) + 𝑁)) = ((⌊‘(𝐴 / 𝐵)) + 𝑁))
32	26, 31	eqtrd 2771	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (⌊‘((𝐴 + (𝑁 · 𝐵)) / 𝐵)) = ((⌊‘(𝐴 / 𝐵)) + 𝑁))
33	32	oveq2d 7378	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (𝐵 · (⌊‘((𝐴 + (𝑁 · 𝐵)) / 𝐵))) = (𝐵 · ((⌊‘(𝐴 / 𝐵)) + 𝑁)))
34		rpcn 12934	. . . . . . . 8 ⊢ (𝐵 ∈ ℝ+ → 𝐵 ∈ ℂ)
35	34	3ad2ant3 1135	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → 𝐵 ∈ ℂ)
36		reflcl 13711	. . . . . . . . . 10 ⊢ ((𝐴 / 𝐵) ∈ ℝ → (⌊‘(𝐴 / 𝐵)) ∈ ℝ)
37	36	recnd 11192	. . . . . . . . 9 ⊢ ((𝐴 / 𝐵) ∈ ℝ → (⌊‘(𝐴 / 𝐵)) ∈ ℂ)
38	27, 37	syl 17	. . . . . . . 8 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+) → (⌊‘(𝐴 / 𝐵)) ∈ ℂ)
39	38	3adant2 1131	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (⌊‘(𝐴 / 𝐵)) ∈ ℂ)
40	19	3ad2ant2 1134	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → 𝑁 ∈ ℂ)
41	35, 39, 40	adddid 11188	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (𝐵 · ((⌊‘(𝐴 / 𝐵)) + 𝑁)) = ((𝐵 · (⌊‘(𝐴 / 𝐵))) + (𝐵 · 𝑁)))
42		mulcom 11146	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝑁 · 𝐵) = (𝐵 · 𝑁))
43	19, 34, 42	syl2an 596	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (𝑁 · 𝐵) = (𝐵 · 𝑁))
44	43	3adant1 1130	. . . . . . . 8 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (𝑁 · 𝐵) = (𝐵 · 𝑁))
45	44	eqcomd 2737	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (𝐵 · 𝑁) = (𝑁 · 𝐵))
46	45	oveq2d 7378	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → ((𝐵 · (⌊‘(𝐴 / 𝐵))) + (𝐵 · 𝑁)) = ((𝐵 · (⌊‘(𝐴 / 𝐵))) + (𝑁 · 𝐵)))
47	33, 41, 46	3eqtrd 2775	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (𝐵 · (⌊‘((𝐴 + (𝑁 · 𝐵)) / 𝐵))) = ((𝐵 · (⌊‘(𝐴 / 𝐵))) + (𝑁 · 𝐵)))
48	47	oveq2d 7378	. . . 4 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → ((𝐴 + (𝑁 · 𝐵)) − (𝐵 · (⌊‘((𝐴 + (𝑁 · 𝐵)) / 𝐵)))) = ((𝐴 + (𝑁 · 𝐵)) − ((𝐵 · (⌊‘(𝐴 / 𝐵))) + (𝑁 · 𝐵))))
49	34	adantl 482	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+) → 𝐵 ∈ ℂ)
50	49, 38	mulcld 11184	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+) → (𝐵 · (⌊‘(𝐴 / 𝐵))) ∈ ℂ)
51	50	3adant2 1131	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (𝐵 · (⌊‘(𝐴 / 𝐵))) ∈ ℂ)
52	12, 51, 14	pnpcan2d 11559	. . . 4 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → ((𝐴 + (𝑁 · 𝐵)) − ((𝐵 · (⌊‘(𝐴 / 𝐵))) + (𝑁 · 𝐵))) = (𝐴 − (𝐵 · (⌊‘(𝐴 / 𝐵)))))
53	10, 48, 52	3eqtrd 2775	. . 3 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → ((𝐴 + (𝑁 · 𝐵)) mod 𝐵) = (𝐴 − (𝐵 · (⌊‘(𝐴 / 𝐵)))))
54		modval 13786	. . . 4 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+) → (𝐴 mod 𝐵) = (𝐴 − (𝐵 · (⌊‘(𝐴 / 𝐵)))))
55	54	3adant2 1131	. . 3 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → (𝐴 mod 𝐵) = (𝐴 − (𝐵 · (⌊‘(𝐴 / 𝐵)))))
56	53, 55	eqtr4d 2774	. 2 ⊢ ((𝐴 ∈ ℝ ∧ 𝑁 ∈ ℤ ∧ 𝐵 ∈ ℝ+) → ((𝐴 + (𝑁 · 𝐵)) mod 𝐵) = (𝐴 mod 𝐵))
57	56	3com23 1126	1 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+ ∧ 𝑁 ∈ ℤ) → ((𝐴 + (𝑁 · 𝐵)) mod 𝐵) = (𝐴 mod 𝐵))

Syntax hints:   → wi 4   ∧ wa 396   ∧ w3a 1087   = wceq 1541   ∈ wcel 2106   ≠ wne 2939  ‘cfv 6501  (class class class)co 7362  ℂcc 11058  ℝcr 11059  0cc0 11060   + caddc 11063   · cmul 11065   − cmin 11394   / cdiv 11821  ℤcz 12508  ℝ⁺crp 12924  ⌊cfl 13705   mod cmo 13784

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2702  ax-sep 5261  ax-nul 5268  ax-pow 5325  ax-pr 5389  ax-un 7677  ax-cnex 11116  ax-resscn 11117  ax-1cn 11118  ax-icn 11119  ax-addcl 11120  ax-addrcl 11121  ax-mulcl 11122  ax-mulrcl 11123  ax-mulcom 11124  ax-addass 11125  ax-mulass 11126  ax-distr 11127  ax-i2m1 11128  ax-1ne0 11129  ax-1rid 11130  ax-rnegex 11131  ax-rrecex 11132  ax-cnre 11133  ax-pre-lttri 11134  ax-pre-lttrn 11135  ax-pre-ltadd 11136  ax-pre-mulgt0 11137  ax-pre-sup 11138

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-nel 3046  df-ral 3061  df-rex 3070  df-rmo 3351  df-reu 3352  df-rab 3406  df-v 3448  df-sbc 3743  df-csb 3859  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3932  df-nul 4288  df-if 4492  df-pw 4567  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4871  df-iun 4961  df-br 5111  df-opab 5173  df-mpt 5194  df-tr 5228  df-id 5536  df-eprel 5542  df-po 5550  df-so 5551  df-fr 5593  df-we 5595  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-pred 6258  df-ord 6325  df-on 6326  df-lim 6327  df-suc 6328  df-iota 6453  df-fun 6503  df-fn 6504  df-f 6505  df-f1 6506  df-fo 6507  df-f1o 6508  df-fv 6509  df-riota 7318  df-ov 7365  df-oprab 7366  df-mpo 7367  df-om 7808  df-2nd 7927  df-frecs 8217  df-wrecs 8248  df-recs 8322  df-rdg 8361  df-er 8655  df-en 8891  df-dom 8892  df-sdom 8893  df-sup 9387  df-inf 9388  df-pnf 11200  df-mnf 11201  df-xr 11202  df-ltxr 11203  df-le 11204  df-sub 11396  df-neg 11397  df-div 11822  df-nn 12163  df-n0 12423  df-z 12509  df-uz 12773  df-rp 12925  df-fl 13707  df-mod 13785

This theorem is referenced by:  modcyc2  13822  muladdmodid  13826  negmod  13831  modsumfzodifsn  13859  modxai  16951  wilthlem1  26454  wilthlem2  26455  lgsdir2lem1  26710  lgsdir2lem5  26714  lgseisenlem1  26760  dirkerper  44457  sqwvfoura  44589  sqwvfourb  44590  fourierswlem  44591  fouriersw  44592  3exp4mod41  45928  m1modmmod  46727