modqmulnn - Intuitionistic Logic Explorer

	Intuitionistic Logic Explorer		< Previous Next > Nearby theorems
Mirrors > Home > ILE Home > Th. List > modqmulnn		GIF version

Theorem modqmulnn 9898

Description: Move a positive integer in and out of a floor in the first argument of a modulo operation. (Contributed by Jim Kingdon, 18-Oct-2021.)

**Assertion**
Ref	Expression
modqmulnn	⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → ((𝑁 · (⌊‘𝐴)) mod (𝑁 · 𝑀)) ≤ ((⌊‘(𝑁 · 𝐴)) mod (𝑁 · 𝑀)))

**Proof of Theorem modqmulnn**
Step	Hyp	Ref	Expression
1		nnq 9217	. . . . . 6 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℚ)
2	1	3ad2ant1 967	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → 𝑁 ∈ ℚ)
3		flqcl 9829	. . . . . . 7 ⊢ (𝐴 ∈ ℚ → (⌊‘𝐴) ∈ ℤ)
4		zq 9210	. . . . . . 7 ⊢ ((⌊‘𝐴) ∈ ℤ → (⌊‘𝐴) ∈ ℚ)
5	3, 4	syl 14	. . . . . 6 ⊢ (𝐴 ∈ ℚ → (⌊‘𝐴) ∈ ℚ)
6	5	3ad2ant2 968	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (⌊‘𝐴) ∈ ℚ)
7		qmulcl 9221	. . . . 5 ⊢ ((𝑁 ∈ ℚ ∧ (⌊‘𝐴) ∈ ℚ) → (𝑁 · (⌊‘𝐴)) ∈ ℚ)
8	2, 6, 7	syl2anc 404	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (𝑁 · (⌊‘𝐴)) ∈ ℚ)
9		qre 9209	. . . 4 ⊢ ((𝑁 · (⌊‘𝐴)) ∈ ℚ → (𝑁 · (⌊‘𝐴)) ∈ ℝ)
10	8, 9	syl 14	. . 3 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (𝑁 · (⌊‘𝐴)) ∈ ℝ)
11		simp2 947	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → 𝐴 ∈ ℚ)
12		qmulcl 9221	. . . . . 6 ⊢ ((𝑁 ∈ ℚ ∧ 𝐴 ∈ ℚ) → (𝑁 · 𝐴) ∈ ℚ)
13	2, 11, 12	syl2anc 404	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (𝑁 · 𝐴) ∈ ℚ)
14	13	flqcld 9833	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (⌊‘(𝑁 · 𝐴)) ∈ ℤ)
15	14	zred 8967	. . 3 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (⌊‘(𝑁 · 𝐴)) ∈ ℝ)
16		nnmulcl 8541	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝑀 ∈ ℕ) → (𝑁 · 𝑀) ∈ ℕ)
17		nnq 9217	. . . . . . 7 ⊢ ((𝑁 · 𝑀) ∈ ℕ → (𝑁 · 𝑀) ∈ ℚ)
18	16, 17	syl 14	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝑀 ∈ ℕ) → (𝑁 · 𝑀) ∈ ℚ)
19	18	3adant2 965	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (𝑁 · 𝑀) ∈ ℚ)
20		qre 9209	. . . . 5 ⊢ ((𝑁 · 𝑀) ∈ ℚ → (𝑁 · 𝑀) ∈ ℝ)
21	19, 20	syl 14	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (𝑁 · 𝑀) ∈ ℝ)
22		simp1 946	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → 𝑁 ∈ ℕ)
23	22	nncnd 8534	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → 𝑁 ∈ ℂ)
24		simp3 948	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → 𝑀 ∈ ℕ)
25	24	nncnd 8534	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → 𝑀 ∈ ℂ)
26	22	nnap0d 8566	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → 𝑁 # 0)
27	24	nnap0d 8566	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → 𝑀 # 0)
28	23, 25, 26, 27	mulap0d 8224	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (𝑁 · 𝑀) # 0)
29		0z 8859	. . . . . . . . . 10 ⊢ 0 ∈ ℤ
30		zq 9210	. . . . . . . . . 10 ⊢ (0 ∈ ℤ → 0 ∈ ℚ)
31	29, 30	ax-mp 7	. . . . . . . . 9 ⊢ 0 ∈ ℚ
32		qapne 9223	. . . . . . . . 9 ⊢ (((𝑁 · 𝑀) ∈ ℚ ∧ 0 ∈ ℚ) → ((𝑁 · 𝑀) # 0 ↔ (𝑁 · 𝑀) ≠ 0))
33	19, 31, 32	sylancl 405	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → ((𝑁 · 𝑀) # 0 ↔ (𝑁 · 𝑀) ≠ 0))
34	28, 33	mpbid 146	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (𝑁 · 𝑀) ≠ 0)
35		qdivcl 9227	. . . . . . 7 ⊢ (((𝑁 · (⌊‘𝐴)) ∈ ℚ ∧ (𝑁 · 𝑀) ∈ ℚ ∧ (𝑁 · 𝑀) ≠ 0) → ((𝑁 · (⌊‘𝐴)) / (𝑁 · 𝑀)) ∈ ℚ)
36	8, 19, 34, 35	syl3anc 1181	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → ((𝑁 · (⌊‘𝐴)) / (𝑁 · 𝑀)) ∈ ℚ)
37	36	flqcld 9833	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (⌊‘((𝑁 · (⌊‘𝐴)) / (𝑁 · 𝑀))) ∈ ℤ)
38	37	zred 8967	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (⌊‘((𝑁 · (⌊‘𝐴)) / (𝑁 · 𝑀))) ∈ ℝ)
39	21, 38	remulcld 7615	. . 3 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → ((𝑁 · 𝑀) · (⌊‘((𝑁 · (⌊‘𝐴)) / (𝑁 · 𝑀)))) ∈ ℝ)
40		nnnn0 8778	. . . . 5 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℕ₀)
41		flqmulnn0 9855	. . . . 5 ⊢ ((𝑁 ∈ ℕ₀ ∧ 𝐴 ∈ ℚ) → (𝑁 · (⌊‘𝐴)) ≤ (⌊‘(𝑁 · 𝐴)))
42	40, 41	sylan 278	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ) → (𝑁 · (⌊‘𝐴)) ≤ (⌊‘(𝑁 · 𝐴)))
43	22, 11, 42	syl2anc 404	. . 3 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (𝑁 · (⌊‘𝐴)) ≤ (⌊‘(𝑁 · 𝐴)))
44	10, 15, 39, 43	lesub1dd 8135	. 2 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → ((𝑁 · (⌊‘𝐴)) − ((𝑁 · 𝑀) · (⌊‘((𝑁 · (⌊‘𝐴)) / (𝑁 · 𝑀))))) ≤ ((⌊‘(𝑁 · 𝐴)) − ((𝑁 · 𝑀) · (⌊‘((𝑁 · (⌊‘𝐴)) / (𝑁 · 𝑀))))))
45	22	nnred 8533	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → 𝑁 ∈ ℝ)
46	24	nnred 8533	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → 𝑀 ∈ ℝ)
47	22	nngt0d 8564	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → 0 < 𝑁)
48	24	nngt0d 8564	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → 0 < 𝑀)
49	45, 46, 47, 48	mulgt0d 7703	. . 3 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → 0 < (𝑁 · 𝑀))
50		modqval 9880	. . 3 ⊢ (((𝑁 · (⌊‘𝐴)) ∈ ℚ ∧ (𝑁 · 𝑀) ∈ ℚ ∧ 0 < (𝑁 · 𝑀)) → ((𝑁 · (⌊‘𝐴)) mod (𝑁 · 𝑀)) = ((𝑁 · (⌊‘𝐴)) − ((𝑁 · 𝑀) · (⌊‘((𝑁 · (⌊‘𝐴)) / (𝑁 · 𝑀))))))
51	8, 19, 49, 50	syl3anc 1181	. 2 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → ((𝑁 · (⌊‘𝐴)) mod (𝑁 · 𝑀)) = ((𝑁 · (⌊‘𝐴)) − ((𝑁 · 𝑀) · (⌊‘((𝑁 · (⌊‘𝐴)) / (𝑁 · 𝑀))))))
52		zq 9210	. . . . 5 ⊢ ((⌊‘(𝑁 · 𝐴)) ∈ ℤ → (⌊‘(𝑁 · 𝐴)) ∈ ℚ)
53	14, 52	syl 14	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (⌊‘(𝑁 · 𝐴)) ∈ ℚ)
54		modqval 9880	. . . 4 ⊢ (((⌊‘(𝑁 · 𝐴)) ∈ ℚ ∧ (𝑁 · 𝑀) ∈ ℚ ∧ 0 < (𝑁 · 𝑀)) → ((⌊‘(𝑁 · 𝐴)) mod (𝑁 · 𝑀)) = ((⌊‘(𝑁 · 𝐴)) − ((𝑁 · 𝑀) · (⌊‘((⌊‘(𝑁 · 𝐴)) / (𝑁 · 𝑀))))))
55	53, 19, 49, 54	syl3anc 1181	. . 3 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → ((⌊‘(𝑁 · 𝐴)) mod (𝑁 · 𝑀)) = ((⌊‘(𝑁 · 𝐴)) − ((𝑁 · 𝑀) · (⌊‘((⌊‘(𝑁 · 𝐴)) / (𝑁 · 𝑀))))))
56	16	3adant2 965	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (𝑁 · 𝑀) ∈ ℕ)
57		flqdiv 9877	. . . . . . 7 ⊢ (((𝑁 · 𝐴) ∈ ℚ ∧ (𝑁 · 𝑀) ∈ ℕ) → (⌊‘((⌊‘(𝑁 · 𝐴)) / (𝑁 · 𝑀))) = (⌊‘((𝑁 · 𝐴) / (𝑁 · 𝑀))))
58	13, 56, 57	syl2anc 404	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (⌊‘((⌊‘(𝑁 · 𝐴)) / (𝑁 · 𝑀))) = (⌊‘((𝑁 · 𝐴) / (𝑁 · 𝑀))))
59		flqdiv 9877	. . . . . . . 8 ⊢ ((𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (⌊‘((⌊‘𝐴) / 𝑀)) = (⌊‘(𝐴 / 𝑀)))
60	59	3adant1 964	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (⌊‘((⌊‘𝐴) / 𝑀)) = (⌊‘(𝐴 / 𝑀)))
61	3	zcnd 8968	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℚ → (⌊‘𝐴) ∈ ℂ)
62	11, 61	syl 14	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (⌊‘𝐴) ∈ ℂ)
63	62, 25, 23, 27, 26	divcanap5d 8381	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → ((𝑁 · (⌊‘𝐴)) / (𝑁 · 𝑀)) = ((⌊‘𝐴) / 𝑀))
64	63	fveq2d 5344	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (⌊‘((𝑁 · (⌊‘𝐴)) / (𝑁 · 𝑀))) = (⌊‘((⌊‘𝐴) / 𝑀)))
65		qcn 9218	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℚ → 𝐴 ∈ ℂ)
66	11, 65	syl 14	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → 𝐴 ∈ ℂ)
67	66, 25, 23, 27, 26	divcanap5d 8381	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → ((𝑁 · 𝐴) / (𝑁 · 𝑀)) = (𝐴 / 𝑀))
68	67	fveq2d 5344	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (⌊‘((𝑁 · 𝐴) / (𝑁 · 𝑀))) = (⌊‘(𝐴 / 𝑀)))
69	60, 64, 68	3eqtr4rd 2138	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (⌊‘((𝑁 · 𝐴) / (𝑁 · 𝑀))) = (⌊‘((𝑁 · (⌊‘𝐴)) / (𝑁 · 𝑀))))
70	58, 69	eqtrd 2127	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → (⌊‘((⌊‘(𝑁 · 𝐴)) / (𝑁 · 𝑀))) = (⌊‘((𝑁 · (⌊‘𝐴)) / (𝑁 · 𝑀))))
71	70	oveq2d 5706	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → ((𝑁 · 𝑀) · (⌊‘((⌊‘(𝑁 · 𝐴)) / (𝑁 · 𝑀)))) = ((𝑁 · 𝑀) · (⌊‘((𝑁 · (⌊‘𝐴)) / (𝑁 · 𝑀)))))
72	71	oveq2d 5706	. . 3 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → ((⌊‘(𝑁 · 𝐴)) − ((𝑁 · 𝑀) · (⌊‘((⌊‘(𝑁 · 𝐴)) / (𝑁 · 𝑀))))) = ((⌊‘(𝑁 · 𝐴)) − ((𝑁 · 𝑀) · (⌊‘((𝑁 · (⌊‘𝐴)) / (𝑁 · 𝑀))))))
73	55, 72	eqtrd 2127	. 2 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → ((⌊‘(𝑁 · 𝐴)) mod (𝑁 · 𝑀)) = ((⌊‘(𝑁 · 𝐴)) − ((𝑁 · 𝑀) · (⌊‘((𝑁 · (⌊‘𝐴)) / (𝑁 · 𝑀))))))
74	44, 51, 73	3brtr4d 3897	1 ⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ ℚ ∧ 𝑀 ∈ ℕ) → ((𝑁 · (⌊‘𝐴)) mod (𝑁 · 𝑀)) ≤ ((⌊‘(𝑁 · 𝐴)) mod (𝑁 · 𝑀)))

Colors of variables: wff set class

Syntax hints: → wi 4 ∧ wa 103 ↔ wb 104 ∧ w3a 927 = wceq 1296 ∈ wcel 1445 ≠ wne 2262 class class class wbr 3867 ‘cfv 5049 (class class class)co 5690 ℂcc 7445 ℝcr 7446 0cc0 7447 · cmul 7452 < clt 7619 ≤ cle 7620 − cmin 7750 # cap 8155 / cdiv 8236 ℕcn 8520 ℕ₀cn0 8771 ℤcz 8848 ℚcq 9203 ⌊cfl 9824 mod cmo 9878

This theorem was proved from axioms: ax-1 5 ax-2 6 ax-mp 7 ax-ia1 105 ax-ia2 106 ax-ia3 107 ax-in1 582 ax-in2 583 ax-io 668 ax-5 1388 ax-7 1389 ax-gen 1390 ax-ie1 1434 ax-ie2 1435 ax-8 1447 ax-10 1448 ax-11 1449 ax-i12 1450 ax-bndl 1451 ax-4 1452 ax-13 1456 ax-14 1457 ax-17 1471 ax-i9 1475 ax-ial 1479 ax-i5r 1480 ax-ext 2077 ax-sep 3978 ax-pow 4030 ax-pr 4060 ax-un 4284 ax-setind 4381 ax-cnex 7533 ax-resscn 7534 ax-1cn 7535 ax-1re 7536 ax-icn 7537 ax-addcl 7538 ax-addrcl 7539 ax-mulcl 7540 ax-mulrcl 7541 ax-addcom 7542 ax-mulcom 7543 ax-addass 7544 ax-mulass 7545 ax-distr 7546 ax-i2m1 7547 ax-0lt1 7548 ax-1rid 7549 ax-0id 7550 ax-rnegex 7551 ax-precex 7552 ax-cnre 7553 ax-pre-ltirr 7554 ax-pre-ltwlin 7555 ax-pre-lttrn 7556 ax-pre-apti 7557 ax-pre-ltadd 7558 ax-pre-mulgt0 7559 ax-pre-mulext 7560 ax-arch 7561

This theorem depends on definitions: df-bi 116 df-3or 928 df-3an 929 df-tru 1299 df-fal 1302 df-nf 1402 df-sb 1700 df-eu 1958 df-mo 1959 df-clab 2082 df-cleq 2088 df-clel 2091 df-nfc 2224 df-ne 2263 df-nel 2358 df-ral 2375 df-rex 2376 df-reu 2377 df-rmo 2378 df-rab 2379 df-v 2635 df-sbc 2855 df-csb 2948 df-dif 3015 df-un 3017 df-in 3019 df-ss 3026 df-pw 3451 df-sn 3472 df-pr 3473 df-op 3475 df-uni 3676 df-int 3711 df-iun 3754 df-br 3868 df-opab 3922 df-mpt 3923 df-id 4144 df-po 4147 df-iso 4148 df-xp 4473 df-rel 4474 df-cnv 4475 df-co 4476 df-dm 4477 df-rn 4478 df-res 4479 df-ima 4480 df-iota 5014 df-fun 5051 df-fn 5052 df-f 5053 df-fv 5057 df-riota 5646 df-ov 5693 df-oprab 5694 df-mpt2 5695 df-1st 5949 df-2nd 5950 df-pnf 7621 df-mnf 7622 df-xr 7623 df-ltxr 7624 df-le 7625 df-sub 7752 df-neg 7753 df-reap 8149 df-ap 8156 df-div 8237 df-inn 8521 df-n0 8772 df-z 8849 df-q 9204 df-rp 9234 df-fl 9826 df-mod 9879

This theorem is referenced by: (None)

W3C validator