| Step | Hyp | Ref
| Expression |
| 1 | | vdwapfval 16996 |
. . . . . . 7
⊢ (𝐾 ∈ ℕ0
→ (AP‘𝐾) =
(𝑎 ∈ ℕ, 𝑑 ∈ ℕ ↦ ran
(𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝑎 + (𝑚 · 𝑑))))) |
| 2 | 1 | 3ad2ant1 1133 |
. . . . . 6
⊢ ((𝐾 ∈ ℕ0
∧ 𝐴 ∈ ℕ
∧ 𝐷 ∈ ℕ)
→ (AP‘𝐾) =
(𝑎 ∈ ℕ, 𝑑 ∈ ℕ ↦ ran
(𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝑎 + (𝑚 · 𝑑))))) |
| 3 | 2 | oveqd 7427 |
. . . . 5
⊢ ((𝐾 ∈ ℕ0
∧ 𝐴 ∈ ℕ
∧ 𝐷 ∈ ℕ)
→ (𝐴(AP‘𝐾)𝐷) = (𝐴(𝑎 ∈ ℕ, 𝑑 ∈ ℕ ↦ ran (𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝑎 + (𝑚 · 𝑑))))𝐷)) |
| 4 | | oveq2 7418 |
. . . . . . . . . 10
⊢ (𝑑 = 𝐷 → (𝑚 · 𝑑) = (𝑚 · 𝐷)) |
| 5 | | oveq12 7419 |
. . . . . . . . . 10
⊢ ((𝑎 = 𝐴 ∧ (𝑚 · 𝑑) = (𝑚 · 𝐷)) → (𝑎 + (𝑚 · 𝑑)) = (𝐴 + (𝑚 · 𝐷))) |
| 6 | 4, 5 | sylan2 593 |
. . . . . . . . 9
⊢ ((𝑎 = 𝐴 ∧ 𝑑 = 𝐷) → (𝑎 + (𝑚 · 𝑑)) = (𝐴 + (𝑚 · 𝐷))) |
| 7 | 6 | mpteq2dv 5220 |
. . . . . . . 8
⊢ ((𝑎 = 𝐴 ∧ 𝑑 = 𝐷) → (𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝑎 + (𝑚 · 𝑑))) = (𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝐴 + (𝑚 · 𝐷)))) |
| 8 | 7 | rneqd 5923 |
. . . . . . 7
⊢ ((𝑎 = 𝐴 ∧ 𝑑 = 𝐷) → ran (𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝑎 + (𝑚 · 𝑑))) = ran (𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝐴 + (𝑚 · 𝐷)))) |
| 9 | | eqid 2736 |
. . . . . . 7
⊢ (𝑎 ∈ ℕ, 𝑑 ∈ ℕ ↦ ran
(𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝑎 + (𝑚 · 𝑑)))) = (𝑎 ∈ ℕ, 𝑑 ∈ ℕ ↦ ran (𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝑎 + (𝑚 · 𝑑)))) |
| 10 | | ovex 7443 |
. . . . . . . . 9
⊢
(0...(𝐾 − 1))
∈ V |
| 11 | 10 | mptex 7220 |
. . . . . . . 8
⊢ (𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝐴 + (𝑚 · 𝐷))) ∈ V |
| 12 | 11 | rnex 7911 |
. . . . . . 7
⊢ ran
(𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝐴 + (𝑚 · 𝐷))) ∈ V |
| 13 | 8, 9, 12 | ovmpoa 7567 |
. . . . . 6
⊢ ((𝐴 ∈ ℕ ∧ 𝐷 ∈ ℕ) → (𝐴(𝑎 ∈ ℕ, 𝑑 ∈ ℕ ↦ ran (𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝑎 + (𝑚 · 𝑑))))𝐷) = ran (𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝐴 + (𝑚 · 𝐷)))) |
| 14 | 13 | 3adant1 1130 |
. . . . 5
⊢ ((𝐾 ∈ ℕ0
∧ 𝐴 ∈ ℕ
∧ 𝐷 ∈ ℕ)
→ (𝐴(𝑎 ∈ ℕ, 𝑑 ∈ ℕ ↦ ran
(𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝑎 + (𝑚 · 𝑑))))𝐷) = ran (𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝐴 + (𝑚 · 𝐷)))) |
| 15 | 3, 14 | eqtrd 2771 |
. . . 4
⊢ ((𝐾 ∈ ℕ0
∧ 𝐴 ∈ ℕ
∧ 𝐷 ∈ ℕ)
→ (𝐴(AP‘𝐾)𝐷) = ran (𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝐴 + (𝑚 · 𝐷)))) |
| 16 | | eqid 2736 |
. . . . 5
⊢ (𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝐴 + (𝑚 · 𝐷))) = (𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝐴 + (𝑚 · 𝐷))) |
| 17 | 16 | rnmpt 5942 |
. . . 4
⊢ ran
(𝑚 ∈ (0...(𝐾 − 1)) ↦ (𝐴 + (𝑚 · 𝐷))) = {𝑥 ∣ ∃𝑚 ∈ (0...(𝐾 − 1))𝑥 = (𝐴 + (𝑚 · 𝐷))} |
| 18 | 15, 17 | eqtrdi 2787 |
. . 3
⊢ ((𝐾 ∈ ℕ0
∧ 𝐴 ∈ ℕ
∧ 𝐷 ∈ ℕ)
→ (𝐴(AP‘𝐾)𝐷) = {𝑥 ∣ ∃𝑚 ∈ (0...(𝐾 − 1))𝑥 = (𝐴 + (𝑚 · 𝐷))}) |
| 19 | 18 | eleq2d 2821 |
. 2
⊢ ((𝐾 ∈ ℕ0
∧ 𝐴 ∈ ℕ
∧ 𝐷 ∈ ℕ)
→ (𝑋 ∈ (𝐴(AP‘𝐾)𝐷) ↔ 𝑋 ∈ {𝑥 ∣ ∃𝑚 ∈ (0...(𝐾 − 1))𝑥 = (𝐴 + (𝑚 · 𝐷))})) |
| 20 | | id 22 |
. . . . 5
⊢ (𝑋 = (𝐴 + (𝑚 · 𝐷)) → 𝑋 = (𝐴 + (𝑚 · 𝐷))) |
| 21 | | ovex 7443 |
. . . . 5
⊢ (𝐴 + (𝑚 · 𝐷)) ∈ V |
| 22 | 20, 21 | eqeltrdi 2843 |
. . . 4
⊢ (𝑋 = (𝐴 + (𝑚 · 𝐷)) → 𝑋 ∈ V) |
| 23 | 22 | rexlimivw 3138 |
. . 3
⊢
(∃𝑚 ∈
(0...(𝐾 − 1))𝑋 = (𝐴 + (𝑚 · 𝐷)) → 𝑋 ∈ V) |
| 24 | | eqeq1 2740 |
. . . 4
⊢ (𝑥 = 𝑋 → (𝑥 = (𝐴 + (𝑚 · 𝐷)) ↔ 𝑋 = (𝐴 + (𝑚 · 𝐷)))) |
| 25 | 24 | rexbidv 3165 |
. . 3
⊢ (𝑥 = 𝑋 → (∃𝑚 ∈ (0...(𝐾 − 1))𝑥 = (𝐴 + (𝑚 · 𝐷)) ↔ ∃𝑚 ∈ (0...(𝐾 − 1))𝑋 = (𝐴 + (𝑚 · 𝐷)))) |
| 26 | 23, 25 | elab3 3670 |
. 2
⊢ (𝑋 ∈ {𝑥 ∣ ∃𝑚 ∈ (0...(𝐾 − 1))𝑥 = (𝐴 + (𝑚 · 𝐷))} ↔ ∃𝑚 ∈ (0...(𝐾 − 1))𝑋 = (𝐴 + (𝑚 · 𝐷))) |
| 27 | 19, 26 | bitrdi 287 |
1
⊢ ((𝐾 ∈ ℕ0
∧ 𝐴 ∈ ℕ
∧ 𝐷 ∈ ℕ)
→ (𝑋 ∈ (𝐴(AP‘𝐾)𝐷) ↔ ∃𝑚 ∈ (0...(𝐾 − 1))𝑋 = (𝐴 + (𝑚 · 𝐷)))) |