Proof of Theorem rlimeq
| Step | Hyp | Ref
| Expression |
| 1 | | rlimss 15462 |
. . 3
⊢ ((𝑥 ∈ 𝐴 ↦ 𝐵) ⇝𝑟 𝐸 → dom (𝑥 ∈ 𝐴 ↦ 𝐵) ⊆ ℝ) |
| 2 | | eqid 2740 |
. . . . 5
⊢ (𝑥 ∈ 𝐴 ↦ 𝐵) = (𝑥 ∈ 𝐴 ↦ 𝐵) |
| 3 | | rlimeq.1 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ ℂ) |
| 4 | 2, 3 | dmmptd 6637 |
. . . 4
⊢ (𝜑 → dom (𝑥 ∈ 𝐴 ↦ 𝐵) = 𝐴) |
| 5 | 4 | sseq1d 3953 |
. . 3
⊢ (𝜑 → (dom (𝑥 ∈ 𝐴 ↦ 𝐵) ⊆ ℝ ↔ 𝐴 ⊆ ℝ)) |
| 6 | 1, 5 | imbitrid 245 |
. 2
⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ 𝐵) ⇝𝑟 𝐸 → 𝐴 ⊆ ℝ)) |
| 7 | | rlimss 15462 |
. . 3
⊢ ((𝑥 ∈ 𝐴 ↦ 𝐶) ⇝𝑟 𝐸 → dom (𝑥 ∈ 𝐴 ↦ 𝐶) ⊆ ℝ) |
| 8 | | eqid 2740 |
. . . . 5
⊢ (𝑥 ∈ 𝐴 ↦ 𝐶) = (𝑥 ∈ 𝐴 ↦ 𝐶) |
| 9 | | rlimeq.2 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐶 ∈ ℂ) |
| 10 | 8, 9 | dmmptd 6637 |
. . . 4
⊢ (𝜑 → dom (𝑥 ∈ 𝐴 ↦ 𝐶) = 𝐴) |
| 11 | 10 | sseq1d 3953 |
. . 3
⊢ (𝜑 → (dom (𝑥 ∈ 𝐴 ↦ 𝐶) ⊆ ℝ ↔ 𝐴 ⊆ ℝ)) |
| 12 | 7, 11 | imbitrid 245 |
. 2
⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ 𝐶) ⇝𝑟 𝐸 → 𝐴 ⊆ ℝ)) |
| 13 | | elin 3906 |
. . . . . . . . . . . . . 14
⊢ (𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞)) ↔ (𝑥 ∈ 𝐴 ∧ 𝑥 ∈ (𝐷[,)+∞))) |
| 14 | 13 | bilani 505 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞))) → (𝑥 ∈ 𝐴 ∧ 𝑥 ∈ (𝐷[,)+∞))) |
| 15 | 14 | simpld 495 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞))) → 𝑥 ∈ 𝐴) |
| 16 | 14 | simprd 496 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞))) → 𝑥 ∈ (𝐷[,)+∞)) |
| 17 | | rlimeq.3 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → 𝐷 ∈ ℝ) |
| 18 | | elicopnf 13396 |
. . . . . . . . . . . . . . . 16
⊢ (𝐷 ∈ ℝ → (𝑥 ∈ (𝐷[,)+∞) ↔ (𝑥 ∈ ℝ ∧ 𝐷 ≤ 𝑥))) |
| 19 | 17, 18 | syl 17 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → (𝑥 ∈ (𝐷[,)+∞) ↔ (𝑥 ∈ ℝ ∧ 𝐷 ≤ 𝑥))) |
| 20 | 19 | biimpa 477 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐷[,)+∞)) → (𝑥 ∈ ℝ ∧ 𝐷 ≤ 𝑥)) |
| 21 | 16, 20 | syldan 597 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞))) → (𝑥 ∈ ℝ ∧ 𝐷 ≤ 𝑥)) |
| 22 | 21 | simprd 496 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞))) → 𝐷 ≤ 𝑥) |
| 23 | 15, 22 | jca 516 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞))) → (𝑥 ∈ 𝐴 ∧ 𝐷 ≤ 𝑥)) |
| 24 | | rlimeq.4 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑥 ∈ 𝐴 ∧ 𝐷 ≤ 𝑥)) → 𝐵 = 𝐶) |
| 25 | 23, 24 | syldan 597 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞))) → 𝐵 = 𝐶) |
| 26 | 25 | mpteq2dva 5172 |
. . . . . . . . 9
⊢ (𝜑 → (𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞)) ↦ 𝐵) = (𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞)) ↦ 𝐶)) |
| 27 | | inss1 4172 |
. . . . . . . . . 10
⊢ (𝐴 ∩ (𝐷[,)+∞)) ⊆ 𝐴 |
| 28 | | resmpt 5996 |
. . . . . . . . . 10
⊢ ((𝐴 ∩ (𝐷[,)+∞)) ⊆ 𝐴 → ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐴 ∩ (𝐷[,)+∞))) = (𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞)) ↦ 𝐵)) |
| 29 | 27, 28 | ax-mp 5 |
. . . . . . . . 9
⊢ ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐴 ∩ (𝐷[,)+∞))) = (𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞)) ↦ 𝐵) |
| 30 | | resmpt 5996 |
. . . . . . . . . 10
⊢ ((𝐴 ∩ (𝐷[,)+∞)) ⊆ 𝐴 → ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐴 ∩ (𝐷[,)+∞))) = (𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞)) ↦ 𝐶)) |
| 31 | 27, 30 | ax-mp 5 |
. . . . . . . . 9
⊢ ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐴 ∩ (𝐷[,)+∞))) = (𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞)) ↦ 𝐶) |
| 32 | 26, 29, 31 | 3eqtr4g 2800 |
. . . . . . . 8
⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐴 ∩ (𝐷[,)+∞))) = ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐴 ∩ (𝐷[,)+∞)))) |
| 33 | | resres 5951 |
. . . . . . . 8
⊢ (((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝐴) ↾ (𝐷[,)+∞)) = ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐴 ∩ (𝐷[,)+∞))) |
| 34 | | resres 5951 |
. . . . . . . 8
⊢ (((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ 𝐴) ↾ (𝐷[,)+∞)) = ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐴 ∩ (𝐷[,)+∞))) |
| 35 | 32, 33, 34 | 3eqtr4g 2800 |
. . . . . . 7
⊢ (𝜑 → (((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝐴) ↾ (𝐷[,)+∞)) = (((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ 𝐴) ↾ (𝐷[,)+∞))) |
| 36 | | ssid 3944 |
. . . . . . . 8
⊢ 𝐴 ⊆ 𝐴 |
| 37 | | resmpt 5996 |
. . . . . . . 8
⊢ (𝐴 ⊆ 𝐴 → ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝐴) = (𝑥 ∈ 𝐴 ↦ 𝐵)) |
| 38 | | reseq1 5932 |
. . . . . . . 8
⊢ (((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝐴) = (𝑥 ∈ 𝐴 ↦ 𝐵) → (((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝐴) ↾ (𝐷[,)+∞)) = ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐷[,)+∞))) |
| 39 | 36, 37, 38 | mp2b 10 |
. . . . . . 7
⊢ (((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝐴) ↾ (𝐷[,)+∞)) = ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐷[,)+∞)) |
| 40 | | resmpt 5996 |
. . . . . . . 8
⊢ (𝐴 ⊆ 𝐴 → ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ 𝐴) = (𝑥 ∈ 𝐴 ↦ 𝐶)) |
| 41 | | reseq1 5932 |
. . . . . . . 8
⊢ (((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ 𝐴) = (𝑥 ∈ 𝐴 ↦ 𝐶) → (((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ 𝐴) ↾ (𝐷[,)+∞)) = ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐷[,)+∞))) |
| 42 | 36, 40, 41 | mp2b 10 |
. . . . . . 7
⊢ (((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ 𝐴) ↾ (𝐷[,)+∞)) = ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐷[,)+∞)) |
| 43 | 35, 39, 42 | 3eqtr3g 2798 |
. . . . . 6
⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐷[,)+∞)) = ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐷[,)+∞))) |
| 44 | 43 | breq1d 5089 |
. . . . 5
⊢ (𝜑 → (((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐷[,)+∞)) ⇝𝑟
𝐸 ↔ ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐷[,)+∞)) ⇝𝑟
𝐸)) |
| 45 | 44 | adantr 481 |
. . . 4
⊢ ((𝜑 ∧ 𝐴 ⊆ ℝ) → (((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐷[,)+∞)) ⇝𝑟
𝐸 ↔ ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐷[,)+∞)) ⇝𝑟
𝐸)) |
| 46 | 3 | fmpttd 7063 |
. . . . . 6
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐵):𝐴⟶ℂ) |
| 47 | 46 | adantr 481 |
. . . . 5
⊢ ((𝜑 ∧ 𝐴 ⊆ ℝ) → (𝑥 ∈ 𝐴 ↦ 𝐵):𝐴⟶ℂ) |
| 48 | | simpr 485 |
. . . . 5
⊢ ((𝜑 ∧ 𝐴 ⊆ ℝ) → 𝐴 ⊆ ℝ) |
| 49 | 17 | adantr 481 |
. . . . 5
⊢ ((𝜑 ∧ 𝐴 ⊆ ℝ) → 𝐷 ∈ ℝ) |
| 50 | 47, 48, 49 | rlimresb 15525 |
. . . 4
⊢ ((𝜑 ∧ 𝐴 ⊆ ℝ) → ((𝑥 ∈ 𝐴 ↦ 𝐵) ⇝𝑟 𝐸 ↔ ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐷[,)+∞)) ⇝𝑟
𝐸)) |
| 51 | 9 | fmpttd 7063 |
. . . . . 6
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐶):𝐴⟶ℂ) |
| 52 | 51 | adantr 481 |
. . . . 5
⊢ ((𝜑 ∧ 𝐴 ⊆ ℝ) → (𝑥 ∈ 𝐴 ↦ 𝐶):𝐴⟶ℂ) |
| 53 | 52, 48, 49 | rlimresb 15525 |
. . . 4
⊢ ((𝜑 ∧ 𝐴 ⊆ ℝ) → ((𝑥 ∈ 𝐴 ↦ 𝐶) ⇝𝑟 𝐸 ↔ ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐷[,)+∞)) ⇝𝑟
𝐸)) |
| 54 | 45, 50, 53 | 3bitr4d 312 |
. . 3
⊢ ((𝜑 ∧ 𝐴 ⊆ ℝ) → ((𝑥 ∈ 𝐴 ↦ 𝐵) ⇝𝑟 𝐸 ↔ (𝑥 ∈ 𝐴 ↦ 𝐶) ⇝𝑟 𝐸)) |
| 55 | 54 | ex 413 |
. 2
⊢ (𝜑 → (𝐴 ⊆ ℝ → ((𝑥 ∈ 𝐴 ↦ 𝐵) ⇝𝑟 𝐸 ↔ (𝑥 ∈ 𝐴 ↦ 𝐶) ⇝𝑟 𝐸))) |
| 56 | 6, 12, 55 | pm5.21ndd 380 |
1
⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ 𝐵) ⇝𝑟 𝐸 ↔ (𝑥 ∈ 𝐴 ↦ 𝐶) ⇝𝑟 𝐸)) |