Proof of Theorem infssfzcldc
| Step | Hyp | Ref
| Expression |
| 1 | | infssfzledc.a |
. . . . . 6
⊢ (𝜑 → 𝐴 ∈ 𝑆) |
| 2 | | infssfzledc.s |
. . . . . . . 8
⊢ 𝑆 = {𝑛 ∈ (𝑀...𝑁) ∣ 𝜓} |
| 3 | 2 | eleq2i 2301 |
. . . . . . 7
⊢ (𝐴 ∈ 𝑆 ↔ 𝐴 ∈ {𝑛 ∈ (𝑀...𝑁) ∣ 𝜓}) |
| 4 | | nfcv 2386 |
. . . . . . . 8
⊢
Ⅎ𝑛(𝑀...𝑁) |
| 5 | 4 | elrabsf 3084 |
. . . . . . 7
⊢ (𝐴 ∈ {𝑛 ∈ (𝑀...𝑁) ∣ 𝜓} ↔ (𝐴 ∈ (𝑀...𝑁) ∧ [𝐴 / 𝑛]𝜓)) |
| 6 | 3, 5 | bitri 184 |
. . . . . 6
⊢ (𝐴 ∈ 𝑆 ↔ (𝐴 ∈ (𝑀...𝑁) ∧ [𝐴 / 𝑛]𝜓)) |
| 7 | 1, 6 | sylib 122 |
. . . . 5
⊢ (𝜑 → (𝐴 ∈ (𝑀...𝑁) ∧ [𝐴 / 𝑛]𝜓)) |
| 8 | 7 | simpld 112 |
. . . 4
⊢ (𝜑 → 𝐴 ∈ (𝑀...𝑁)) |
| 9 | | elfzel1 10377 |
. . . 4
⊢ (𝐴 ∈ (𝑀...𝑁) → 𝑀 ∈ ℤ) |
| 10 | 8, 9 | syl 14 |
. . 3
⊢ (𝜑 → 𝑀 ∈ ℤ) |
| 11 | | eqid 2234 |
. . 3
⊢ {𝑛 ∈
(ℤ≥‘𝑀) ∣ (𝑛 ≤ 𝑁 ∧ 𝜓)} = {𝑛 ∈ (ℤ≥‘𝑀) ∣ (𝑛 ≤ 𝑁 ∧ 𝜓)} |
| 12 | | elfzuz 10374 |
. . . . . . . . 9
⊢ (𝑛 ∈ (𝑀...𝑁) → 𝑛 ∈ (ℤ≥‘𝑀)) |
| 13 | 12 | ad2antrl 490 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑛 ∈ (𝑀...𝑁) ∧ 𝜓)) → 𝑛 ∈ (ℤ≥‘𝑀)) |
| 14 | | elfzle2 10382 |
. . . . . . . . 9
⊢ (𝑛 ∈ (𝑀...𝑁) → 𝑛 ≤ 𝑁) |
| 15 | 14 | ad2antrl 490 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑛 ∈ (𝑀...𝑁) ∧ 𝜓)) → 𝑛 ≤ 𝑁) |
| 16 | | simprr 533 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑛 ∈ (𝑀...𝑁) ∧ 𝜓)) → 𝜓) |
| 17 | 13, 15, 16 | jca32 310 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑛 ∈ (𝑀...𝑁) ∧ 𝜓)) → (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 ≤ 𝑁 ∧ 𝜓))) |
| 18 | | simprl 531 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 ≤ 𝑁 ∧ 𝜓))) → 𝑛 ∈ (ℤ≥‘𝑀)) |
| 19 | | simprrl 541 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 ≤ 𝑁 ∧ 𝜓))) → 𝑛 ≤ 𝑁) |
| 20 | | eluzelz 9881 |
. . . . . . . . . . . 12
⊢ (𝑛 ∈
(ℤ≥‘𝑀) → 𝑛 ∈ ℤ) |
| 21 | 20 | adantr 276 |
. . . . . . . . . . 11
⊢ ((𝑛 ∈
(ℤ≥‘𝑀) ∧ (𝑛 ≤ 𝑁 ∧ 𝜓)) → 𝑛 ∈ ℤ) |
| 22 | | elfzel2 10376 |
. . . . . . . . . . . 12
⊢ (𝐴 ∈ (𝑀...𝑁) → 𝑁 ∈ ℤ) |
| 23 | 8, 22 | syl 14 |
. . . . . . . . . . 11
⊢ (𝜑 → 𝑁 ∈ ℤ) |
| 24 | | eluz 9885 |
. . . . . . . . . . 11
⊢ ((𝑛 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑁 ∈
(ℤ≥‘𝑛) ↔ 𝑛 ≤ 𝑁)) |
| 25 | 21, 23, 24 | syl2anr 290 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 ≤ 𝑁 ∧ 𝜓))) → (𝑁 ∈ (ℤ≥‘𝑛) ↔ 𝑛 ≤ 𝑁)) |
| 26 | 19, 25 | mpbird 167 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 ≤ 𝑁 ∧ 𝜓))) → 𝑁 ∈ (ℤ≥‘𝑛)) |
| 27 | | elfzuzb 10372 |
. . . . . . . . 9
⊢ (𝑛 ∈ (𝑀...𝑁) ↔ (𝑛 ∈ (ℤ≥‘𝑀) ∧ 𝑁 ∈ (ℤ≥‘𝑛))) |
| 28 | 18, 26, 27 | sylanbrc 417 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 ≤ 𝑁 ∧ 𝜓))) → 𝑛 ∈ (𝑀...𝑁)) |
| 29 | | simprrr 542 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 ≤ 𝑁 ∧ 𝜓))) → 𝜓) |
| 30 | 28, 29 | jca 306 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 ≤ 𝑁 ∧ 𝜓))) → (𝑛 ∈ (𝑀...𝑁) ∧ 𝜓)) |
| 31 | 17, 30 | impbida 600 |
. . . . . 6
⊢ (𝜑 → ((𝑛 ∈ (𝑀...𝑁) ∧ 𝜓) ↔ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 ≤ 𝑁 ∧ 𝜓)))) |
| 32 | 31 | rabbidva2 2799 |
. . . . 5
⊢ (𝜑 → {𝑛 ∈ (𝑀...𝑁) ∣ 𝜓} = {𝑛 ∈ (ℤ≥‘𝑀) ∣ (𝑛 ≤ 𝑁 ∧ 𝜓)}) |
| 33 | 2, 32 | eqtrid 2279 |
. . . 4
⊢ (𝜑 → 𝑆 = {𝑛 ∈ (ℤ≥‘𝑀) ∣ (𝑛 ≤ 𝑁 ∧ 𝜓)}) |
| 34 | 1, 33 | eleqtrd 2313 |
. . 3
⊢ (𝜑 → 𝐴 ∈ {𝑛 ∈ (ℤ≥‘𝑀) ∣ (𝑛 ≤ 𝑁 ∧ 𝜓)}) |
| 35 | | elfzelz 10378 |
. . . . 5
⊢ (𝑛 ∈ (𝑀...𝐴) → 𝑛 ∈ ℤ) |
| 36 | | zdcle 9671 |
. . . . 5
⊢ ((𝑛 ∈ ℤ ∧ 𝑁 ∈ ℤ) →
DECID 𝑛 ≤
𝑁) |
| 37 | 35, 23, 36 | syl2anr 290 |
. . . 4
⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀...𝐴)) → DECID 𝑛 ≤ 𝑁) |
| 38 | | infssfzledc.dc |
. . . 4
⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀...𝐴)) → DECID 𝜓) |
| 39 | 37, 38 | dcand 941 |
. . 3
⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀...𝐴)) → DECID (𝑛 ≤ 𝑁 ∧ 𝜓)) |
| 40 | 10, 11, 34, 39 | infssuzcldc 10617 |
. 2
⊢ (𝜑 → inf({𝑛 ∈ (ℤ≥‘𝑀) ∣ (𝑛 ≤ 𝑁 ∧ 𝜓)}, ℝ, < ) ∈ {𝑛 ∈
(ℤ≥‘𝑀) ∣ (𝑛 ≤ 𝑁 ∧ 𝜓)}) |
| 41 | 33 | infeq1d 7316 |
. 2
⊢ (𝜑 → inf(𝑆, ℝ, < ) = inf({𝑛 ∈ (ℤ≥‘𝑀) ∣ (𝑛 ≤ 𝑁 ∧ 𝜓)}, ℝ, < )) |
| 42 | 40, 41, 33 | 3eltr4d 2318 |
1
⊢ (𝜑 → inf(𝑆, ℝ, < ) ∈ 𝑆) |