Proof of Theorem lo1eq
Step | Hyp | Ref
| Expression |
1 | | lo1dm 15228 |
. . 3
⊢ ((𝑥 ∈ 𝐴 ↦ 𝐵) ∈ ≤𝑂(1) → dom (𝑥 ∈ 𝐴 ↦ 𝐵) ⊆ ℝ) |
2 | | eqid 2738 |
. . . . 5
⊢ (𝑥 ∈ 𝐴 ↦ 𝐵) = (𝑥 ∈ 𝐴 ↦ 𝐵) |
3 | | lo1eq.1 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ ℝ) |
4 | 2, 3 | dmmptd 6578 |
. . . 4
⊢ (𝜑 → dom (𝑥 ∈ 𝐴 ↦ 𝐵) = 𝐴) |
5 | 4 | sseq1d 3952 |
. . 3
⊢ (𝜑 → (dom (𝑥 ∈ 𝐴 ↦ 𝐵) ⊆ ℝ ↔ 𝐴 ⊆ ℝ)) |
6 | 1, 5 | syl5ib 243 |
. 2
⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ 𝐵) ∈ ≤𝑂(1) → 𝐴 ⊆
ℝ)) |
7 | | lo1dm 15228 |
. . 3
⊢ ((𝑥 ∈ 𝐴 ↦ 𝐶) ∈ ≤𝑂(1) → dom (𝑥 ∈ 𝐴 ↦ 𝐶) ⊆ ℝ) |
8 | | eqid 2738 |
. . . . 5
⊢ (𝑥 ∈ 𝐴 ↦ 𝐶) = (𝑥 ∈ 𝐴 ↦ 𝐶) |
9 | | lo1eq.2 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐶 ∈ ℝ) |
10 | 8, 9 | dmmptd 6578 |
. . . 4
⊢ (𝜑 → dom (𝑥 ∈ 𝐴 ↦ 𝐶) = 𝐴) |
11 | 10 | sseq1d 3952 |
. . 3
⊢ (𝜑 → (dom (𝑥 ∈ 𝐴 ↦ 𝐶) ⊆ ℝ ↔ 𝐴 ⊆ ℝ)) |
12 | 7, 11 | syl5ib 243 |
. 2
⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ 𝐶) ∈ ≤𝑂(1) → 𝐴 ⊆
ℝ)) |
13 | | simpr 485 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞))) → 𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞))) |
14 | | elin 3903 |
. . . . . . . . . . . . . 14
⊢ (𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞)) ↔ (𝑥 ∈ 𝐴 ∧ 𝑥 ∈ (𝐷[,)+∞))) |
15 | 13, 14 | sylib 217 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞))) → (𝑥 ∈ 𝐴 ∧ 𝑥 ∈ (𝐷[,)+∞))) |
16 | 15 | simpld 495 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞))) → 𝑥 ∈ 𝐴) |
17 | 15 | simprd 496 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞))) → 𝑥 ∈ (𝐷[,)+∞)) |
18 | | lo1eq.3 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → 𝐷 ∈ ℝ) |
19 | | elicopnf 13177 |
. . . . . . . . . . . . . . . 16
⊢ (𝐷 ∈ ℝ → (𝑥 ∈ (𝐷[,)+∞) ↔ (𝑥 ∈ ℝ ∧ 𝐷 ≤ 𝑥))) |
20 | 18, 19 | syl 17 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → (𝑥 ∈ (𝐷[,)+∞) ↔ (𝑥 ∈ ℝ ∧ 𝐷 ≤ 𝑥))) |
21 | 20 | biimpa 477 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐷[,)+∞)) → (𝑥 ∈ ℝ ∧ 𝐷 ≤ 𝑥)) |
22 | 17, 21 | syldan 591 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞))) → (𝑥 ∈ ℝ ∧ 𝐷 ≤ 𝑥)) |
23 | 22 | simprd 496 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞))) → 𝐷 ≤ 𝑥) |
24 | 16, 23 | jca 512 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞))) → (𝑥 ∈ 𝐴 ∧ 𝐷 ≤ 𝑥)) |
25 | | lo1eq.4 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑥 ∈ 𝐴 ∧ 𝐷 ≤ 𝑥)) → 𝐵 = 𝐶) |
26 | 24, 25 | syldan 591 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞))) → 𝐵 = 𝐶) |
27 | 26 | mpteq2dva 5174 |
. . . . . . . . 9
⊢ (𝜑 → (𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞)) ↦ 𝐵) = (𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞)) ↦ 𝐶)) |
28 | | inss1 4162 |
. . . . . . . . . 10
⊢ (𝐴 ∩ (𝐷[,)+∞)) ⊆ 𝐴 |
29 | | resmpt 5945 |
. . . . . . . . . 10
⊢ ((𝐴 ∩ (𝐷[,)+∞)) ⊆ 𝐴 → ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐴 ∩ (𝐷[,)+∞))) = (𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞)) ↦ 𝐵)) |
30 | 28, 29 | ax-mp 5 |
. . . . . . . . 9
⊢ ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐴 ∩ (𝐷[,)+∞))) = (𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞)) ↦ 𝐵) |
31 | | resmpt 5945 |
. . . . . . . . . 10
⊢ ((𝐴 ∩ (𝐷[,)+∞)) ⊆ 𝐴 → ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐴 ∩ (𝐷[,)+∞))) = (𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞)) ↦ 𝐶)) |
32 | 28, 31 | ax-mp 5 |
. . . . . . . . 9
⊢ ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐴 ∩ (𝐷[,)+∞))) = (𝑥 ∈ (𝐴 ∩ (𝐷[,)+∞)) ↦ 𝐶) |
33 | 27, 30, 32 | 3eqtr4g 2803 |
. . . . . . . 8
⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐴 ∩ (𝐷[,)+∞))) = ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐴 ∩ (𝐷[,)+∞)))) |
34 | | resres 5904 |
. . . . . . . 8
⊢ (((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝐴) ↾ (𝐷[,)+∞)) = ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐴 ∩ (𝐷[,)+∞))) |
35 | | resres 5904 |
. . . . . . . 8
⊢ (((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ 𝐴) ↾ (𝐷[,)+∞)) = ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐴 ∩ (𝐷[,)+∞))) |
36 | 33, 34, 35 | 3eqtr4g 2803 |
. . . . . . 7
⊢ (𝜑 → (((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝐴) ↾ (𝐷[,)+∞)) = (((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ 𝐴) ↾ (𝐷[,)+∞))) |
37 | | ssid 3943 |
. . . . . . . 8
⊢ 𝐴 ⊆ 𝐴 |
38 | | resmpt 5945 |
. . . . . . . 8
⊢ (𝐴 ⊆ 𝐴 → ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝐴) = (𝑥 ∈ 𝐴 ↦ 𝐵)) |
39 | | reseq1 5885 |
. . . . . . . 8
⊢ (((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝐴) = (𝑥 ∈ 𝐴 ↦ 𝐵) → (((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝐴) ↾ (𝐷[,)+∞)) = ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐷[,)+∞))) |
40 | 37, 38, 39 | mp2b 10 |
. . . . . . 7
⊢ (((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝐴) ↾ (𝐷[,)+∞)) = ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐷[,)+∞)) |
41 | | resmpt 5945 |
. . . . . . . 8
⊢ (𝐴 ⊆ 𝐴 → ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ 𝐴) = (𝑥 ∈ 𝐴 ↦ 𝐶)) |
42 | | reseq1 5885 |
. . . . . . . 8
⊢ (((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ 𝐴) = (𝑥 ∈ 𝐴 ↦ 𝐶) → (((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ 𝐴) ↾ (𝐷[,)+∞)) = ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐷[,)+∞))) |
43 | 37, 41, 42 | mp2b 10 |
. . . . . . 7
⊢ (((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ 𝐴) ↾ (𝐷[,)+∞)) = ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐷[,)+∞)) |
44 | 36, 40, 43 | 3eqtr3g 2801 |
. . . . . 6
⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐷[,)+∞)) = ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐷[,)+∞))) |
45 | 44 | eleq1d 2823 |
. . . . 5
⊢ (𝜑 → (((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐷[,)+∞)) ∈ ≤𝑂(1) ↔
((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐷[,)+∞)) ∈
≤𝑂(1))) |
46 | 45 | adantr 481 |
. . . 4
⊢ ((𝜑 ∧ 𝐴 ⊆ ℝ) → (((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐷[,)+∞)) ∈ ≤𝑂(1) ↔
((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐷[,)+∞)) ∈
≤𝑂(1))) |
47 | 3 | fmpttd 6989 |
. . . . . 6
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐵):𝐴⟶ℝ) |
48 | 47 | adantr 481 |
. . . . 5
⊢ ((𝜑 ∧ 𝐴 ⊆ ℝ) → (𝑥 ∈ 𝐴 ↦ 𝐵):𝐴⟶ℝ) |
49 | | simpr 485 |
. . . . 5
⊢ ((𝜑 ∧ 𝐴 ⊆ ℝ) → 𝐴 ⊆ ℝ) |
50 | 18 | adantr 481 |
. . . . 5
⊢ ((𝜑 ∧ 𝐴 ⊆ ℝ) → 𝐷 ∈ ℝ) |
51 | 48, 49, 50 | lo1resb 15273 |
. . . 4
⊢ ((𝜑 ∧ 𝐴 ⊆ ℝ) → ((𝑥 ∈ 𝐴 ↦ 𝐵) ∈ ≤𝑂(1) ↔ ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ (𝐷[,)+∞)) ∈
≤𝑂(1))) |
52 | 9 | fmpttd 6989 |
. . . . . 6
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐶):𝐴⟶ℝ) |
53 | 52 | adantr 481 |
. . . . 5
⊢ ((𝜑 ∧ 𝐴 ⊆ ℝ) → (𝑥 ∈ 𝐴 ↦ 𝐶):𝐴⟶ℝ) |
54 | 53, 49, 50 | lo1resb 15273 |
. . . 4
⊢ ((𝜑 ∧ 𝐴 ⊆ ℝ) → ((𝑥 ∈ 𝐴 ↦ 𝐶) ∈ ≤𝑂(1) ↔ ((𝑥 ∈ 𝐴 ↦ 𝐶) ↾ (𝐷[,)+∞)) ∈
≤𝑂(1))) |
55 | 46, 51, 54 | 3bitr4d 311 |
. . 3
⊢ ((𝜑 ∧ 𝐴 ⊆ ℝ) → ((𝑥 ∈ 𝐴 ↦ 𝐵) ∈ ≤𝑂(1) ↔ (𝑥 ∈ 𝐴 ↦ 𝐶) ∈ ≤𝑂(1))) |
56 | 55 | ex 413 |
. 2
⊢ (𝜑 → (𝐴 ⊆ ℝ → ((𝑥 ∈ 𝐴 ↦ 𝐵) ∈ ≤𝑂(1) ↔ (𝑥 ∈ 𝐴 ↦ 𝐶) ∈
≤𝑂(1)))) |
57 | 6, 12, 56 | pm5.21ndd 381 |
1
⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ 𝐵) ∈ ≤𝑂(1) ↔ (𝑥 ∈ 𝐴 ↦ 𝐶) ∈ ≤𝑂(1))) |