Proof of Theorem icopnfcnv
| Step | Hyp | Ref
| Expression |
| 1 | | icopnfhmeo.f |
. . 3
⊢ 𝐹 = (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))) |
| 2 | | 0re 10040 |
. . . . . . . 8
⊢ 0 ∈
ℝ |
| 3 | | 1re 10039 |
. . . . . . . . 9
⊢ 1 ∈
ℝ |
| 4 | 3 | rexri 10097 |
. . . . . . . 8
⊢ 1 ∈
ℝ* |
| 5 | | elico2 12237 |
. . . . . . . 8
⊢ ((0
∈ ℝ ∧ 1 ∈ ℝ*) → (𝑥 ∈ (0[,)1) ↔ (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥 ∧ 𝑥 < 1))) |
| 6 | 2, 4, 5 | mp2an 708 |
. . . . . . 7
⊢ (𝑥 ∈ (0[,)1) ↔ (𝑥 ∈ ℝ ∧ 0 ≤
𝑥 ∧ 𝑥 < 1)) |
| 7 | 6 | simp1bi 1076 |
. . . . . 6
⊢ (𝑥 ∈ (0[,)1) → 𝑥 ∈
ℝ) |
| 8 | 6 | simp3bi 1078 |
. . . . . . 7
⊢ (𝑥 ∈ (0[,)1) → 𝑥 < 1) |
| 9 | | difrp 11868 |
. . . . . . . 8
⊢ ((𝑥 ∈ ℝ ∧ 1 ∈
ℝ) → (𝑥 < 1
↔ (1 − 𝑥) ∈
ℝ+)) |
| 10 | 7, 3, 9 | sylancl 694 |
. . . . . . 7
⊢ (𝑥 ∈ (0[,)1) → (𝑥 < 1 ↔ (1 − 𝑥) ∈
ℝ+)) |
| 11 | 8, 10 | mpbid 222 |
. . . . . 6
⊢ (𝑥 ∈ (0[,)1) → (1
− 𝑥) ∈
ℝ+) |
| 12 | 7, 11 | rerpdivcld 11903 |
. . . . 5
⊢ (𝑥 ∈ (0[,)1) → (𝑥 / (1 − 𝑥)) ∈ ℝ) |
| 13 | 6 | simp2bi 1077 |
. . . . . 6
⊢ (𝑥 ∈ (0[,)1) → 0 ≤
𝑥) |
| 14 | 7, 11, 13 | divge0d 11912 |
. . . . 5
⊢ (𝑥 ∈ (0[,)1) → 0 ≤
(𝑥 / (1 − 𝑥))) |
| 15 | | elrege0 12278 |
. . . . 5
⊢ ((𝑥 / (1 − 𝑥)) ∈ (0[,)+∞) ↔ ((𝑥 / (1 − 𝑥)) ∈ ℝ ∧ 0 ≤ (𝑥 / (1 − 𝑥)))) |
| 16 | 12, 14, 15 | sylanbrc 698 |
. . . 4
⊢ (𝑥 ∈ (0[,)1) → (𝑥 / (1 − 𝑥)) ∈ (0[,)+∞)) |
| 17 | 16 | adantl 482 |
. . 3
⊢
((⊤ ∧ 𝑥
∈ (0[,)1)) → (𝑥 /
(1 − 𝑥)) ∈
(0[,)+∞)) |
| 18 | | elrege0 12278 |
. . . . . . 7
⊢ (𝑦 ∈ (0[,)+∞) ↔
(𝑦 ∈ ℝ ∧ 0
≤ 𝑦)) |
| 19 | 18 | simplbi 476 |
. . . . . 6
⊢ (𝑦 ∈ (0[,)+∞) →
𝑦 ∈
ℝ) |
| 20 | | readdcl 10019 |
. . . . . . . 8
⊢ ((1
∈ ℝ ∧ 𝑦
∈ ℝ) → (1 + 𝑦) ∈ ℝ) |
| 21 | 3, 19, 20 | sylancr 695 |
. . . . . . 7
⊢ (𝑦 ∈ (0[,)+∞) → (1
+ 𝑦) ∈
ℝ) |
| 22 | 2 | a1i 11 |
. . . . . . . 8
⊢ (𝑦 ∈ (0[,)+∞) → 0
∈ ℝ) |
| 23 | 18 | simprbi 480 |
. . . . . . . 8
⊢ (𝑦 ∈ (0[,)+∞) → 0
≤ 𝑦) |
| 24 | 19 | ltp1d 10954 |
. . . . . . . . 9
⊢ (𝑦 ∈ (0[,)+∞) →
𝑦 < (𝑦 + 1)) |
| 25 | | ax-1cn 9994 |
. . . . . . . . . 10
⊢ 1 ∈
ℂ |
| 26 | 19 | recnd 10068 |
. . . . . . . . . 10
⊢ (𝑦 ∈ (0[,)+∞) →
𝑦 ∈
ℂ) |
| 27 | | addcom 10222 |
. . . . . . . . . 10
⊢ ((1
∈ ℂ ∧ 𝑦
∈ ℂ) → (1 + 𝑦) = (𝑦 + 1)) |
| 28 | 25, 26, 27 | sylancr 695 |
. . . . . . . . 9
⊢ (𝑦 ∈ (0[,)+∞) → (1
+ 𝑦) = (𝑦 + 1)) |
| 29 | 24, 28 | breqtrrd 4681 |
. . . . . . . 8
⊢ (𝑦 ∈ (0[,)+∞) →
𝑦 < (1 + 𝑦)) |
| 30 | 22, 19, 21, 23, 29 | lelttrd 10195 |
. . . . . . 7
⊢ (𝑦 ∈ (0[,)+∞) → 0
< (1 + 𝑦)) |
| 31 | 21, 30 | elrpd 11869 |
. . . . . 6
⊢ (𝑦 ∈ (0[,)+∞) → (1
+ 𝑦) ∈
ℝ+) |
| 32 | 19, 31 | rerpdivcld 11903 |
. . . . 5
⊢ (𝑦 ∈ (0[,)+∞) →
(𝑦 / (1 + 𝑦)) ∈
ℝ) |
| 33 | | divge0 10892 |
. . . . . 6
⊢ (((𝑦 ∈ ℝ ∧ 0 ≤
𝑦) ∧ ((1 + 𝑦) ∈ ℝ ∧ 0 < (1
+ 𝑦))) → 0 ≤ (𝑦 / (1 + 𝑦))) |
| 34 | 19, 23, 21, 30, 33 | syl22anc 1327 |
. . . . 5
⊢ (𝑦 ∈ (0[,)+∞) → 0
≤ (𝑦 / (1 + 𝑦))) |
| 35 | 21 | recnd 10068 |
. . . . . . . 8
⊢ (𝑦 ∈ (0[,)+∞) → (1
+ 𝑦) ∈
ℂ) |
| 36 | 35 | mulid1d 10057 |
. . . . . . 7
⊢ (𝑦 ∈ (0[,)+∞) →
((1 + 𝑦) · 1) = (1 +
𝑦)) |
| 37 | 29, 36 | breqtrrd 4681 |
. . . . . 6
⊢ (𝑦 ∈ (0[,)+∞) →
𝑦 < ((1 + 𝑦) · 1)) |
| 38 | 3 | a1i 11 |
. . . . . . 7
⊢ (𝑦 ∈ (0[,)+∞) → 1
∈ ℝ) |
| 39 | | ltdivmul 10898 |
. . . . . . 7
⊢ ((𝑦 ∈ ℝ ∧ 1 ∈
ℝ ∧ ((1 + 𝑦)
∈ ℝ ∧ 0 < (1 + 𝑦))) → ((𝑦 / (1 + 𝑦)) < 1 ↔ 𝑦 < ((1 + 𝑦) · 1))) |
| 40 | 19, 38, 21, 30, 39 | syl112anc 1330 |
. . . . . 6
⊢ (𝑦 ∈ (0[,)+∞) →
((𝑦 / (1 + 𝑦)) < 1 ↔ 𝑦 < ((1 + 𝑦) · 1))) |
| 41 | 37, 40 | mpbird 247 |
. . . . 5
⊢ (𝑦 ∈ (0[,)+∞) →
(𝑦 / (1 + 𝑦)) < 1) |
| 42 | | elico2 12237 |
. . . . . 6
⊢ ((0
∈ ℝ ∧ 1 ∈ ℝ*) → ((𝑦 / (1 + 𝑦)) ∈ (0[,)1) ↔ ((𝑦 / (1 + 𝑦)) ∈ ℝ ∧ 0 ≤ (𝑦 / (1 + 𝑦)) ∧ (𝑦 / (1 + 𝑦)) < 1))) |
| 43 | 2, 4, 42 | mp2an 708 |
. . . . 5
⊢ ((𝑦 / (1 + 𝑦)) ∈ (0[,)1) ↔ ((𝑦 / (1 + 𝑦)) ∈ ℝ ∧ 0 ≤ (𝑦 / (1 + 𝑦)) ∧ (𝑦 / (1 + 𝑦)) < 1)) |
| 44 | 32, 34, 41, 43 | syl3anbrc 1246 |
. . . 4
⊢ (𝑦 ∈ (0[,)+∞) →
(𝑦 / (1 + 𝑦)) ∈
(0[,)1)) |
| 45 | 44 | adantl 482 |
. . 3
⊢
((⊤ ∧ 𝑦
∈ (0[,)+∞)) → (𝑦 / (1 + 𝑦)) ∈ (0[,)1)) |
| 46 | 26 | adantl 482 |
. . . . . . . . 9
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
𝑦 ∈
ℂ) |
| 47 | 7 | adantr 481 |
. . . . . . . . . . 11
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
𝑥 ∈
ℝ) |
| 48 | 47 | recnd 10068 |
. . . . . . . . . 10
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
𝑥 ∈
ℂ) |
| 49 | 48, 46 | mulcld 10060 |
. . . . . . . . 9
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(𝑥 · 𝑦) ∈
ℂ) |
| 50 | 46, 49, 48 | subadd2d 10411 |
. . . . . . . 8
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
((𝑦 − (𝑥 · 𝑦)) = 𝑥 ↔ (𝑥 + (𝑥 · 𝑦)) = 𝑦)) |
| 51 | | 1cnd 10056 |
. . . . . . . . . . 11
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) → 1
∈ ℂ) |
| 52 | 51, 48, 46 | subdird 10487 |
. . . . . . . . . 10
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
((1 − 𝑥) ·
𝑦) = ((1 · 𝑦) − (𝑥 · 𝑦))) |
| 53 | 46 | mulid2d 10058 |
. . . . . . . . . . 11
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(1 · 𝑦) = 𝑦) |
| 54 | 53 | oveq1d 6665 |
. . . . . . . . . 10
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
((1 · 𝑦) −
(𝑥 · 𝑦)) = (𝑦 − (𝑥 · 𝑦))) |
| 55 | 52, 54 | eqtrd 2656 |
. . . . . . . . 9
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
((1 − 𝑥) ·
𝑦) = (𝑦 − (𝑥 · 𝑦))) |
| 56 | 55 | eqeq1d 2624 |
. . . . . . . 8
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(((1 − 𝑥) ·
𝑦) = 𝑥 ↔ (𝑦 − (𝑥 · 𝑦)) = 𝑥)) |
| 57 | 48, 51, 46 | adddid 10064 |
. . . . . . . . . 10
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(𝑥 · (1 + 𝑦)) = ((𝑥 · 1) + (𝑥 · 𝑦))) |
| 58 | 48 | mulid1d 10057 |
. . . . . . . . . . 11
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(𝑥 · 1) = 𝑥) |
| 59 | 58 | oveq1d 6665 |
. . . . . . . . . 10
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
((𝑥 · 1) + (𝑥 · 𝑦)) = (𝑥 + (𝑥 · 𝑦))) |
| 60 | 57, 59 | eqtrd 2656 |
. . . . . . . . 9
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(𝑥 · (1 + 𝑦)) = (𝑥 + (𝑥 · 𝑦))) |
| 61 | 60 | eqeq1d 2624 |
. . . . . . . 8
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
((𝑥 · (1 + 𝑦)) = 𝑦 ↔ (𝑥 + (𝑥 · 𝑦)) = 𝑦)) |
| 62 | 50, 56, 61 | 3bitr4rd 301 |
. . . . . . 7
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
((𝑥 · (1 + 𝑦)) = 𝑦 ↔ ((1 − 𝑥) · 𝑦) = 𝑥)) |
| 63 | | eqcom 2629 |
. . . . . . 7
⊢ (𝑦 = (𝑥 · (1 + 𝑦)) ↔ (𝑥 · (1 + 𝑦)) = 𝑦) |
| 64 | | eqcom 2629 |
. . . . . . 7
⊢ (𝑥 = ((1 − 𝑥) · 𝑦) ↔ ((1 − 𝑥) · 𝑦) = 𝑥) |
| 65 | 62, 63, 64 | 3bitr4g 303 |
. . . . . 6
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(𝑦 = (𝑥 · (1 + 𝑦)) ↔ 𝑥 = ((1 − 𝑥) · 𝑦))) |
| 66 | 35 | adantl 482 |
. . . . . . 7
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(1 + 𝑦) ∈
ℂ) |
| 67 | 31 | adantl 482 |
. . . . . . . 8
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(1 + 𝑦) ∈
ℝ+) |
| 68 | 67 | rpne0d 11877 |
. . . . . . 7
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(1 + 𝑦) ≠
0) |
| 69 | 46, 48, 66, 68 | divmul3d 10835 |
. . . . . 6
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
((𝑦 / (1 + 𝑦)) = 𝑥 ↔ 𝑦 = (𝑥 · (1 + 𝑦)))) |
| 70 | 11 | adantr 481 |
. . . . . . . 8
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(1 − 𝑥) ∈
ℝ+) |
| 71 | 70 | rpcnd 11874 |
. . . . . . 7
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(1 − 𝑥) ∈
ℂ) |
| 72 | 70 | rpne0d 11877 |
. . . . . . 7
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(1 − 𝑥) ≠
0) |
| 73 | 48, 46, 71, 72 | divmul2d 10834 |
. . . . . 6
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
((𝑥 / (1 − 𝑥)) = 𝑦 ↔ 𝑥 = ((1 − 𝑥) · 𝑦))) |
| 74 | 65, 69, 73 | 3bitr4d 300 |
. . . . 5
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
((𝑦 / (1 + 𝑦)) = 𝑥 ↔ (𝑥 / (1 − 𝑥)) = 𝑦)) |
| 75 | | eqcom 2629 |
. . . . 5
⊢ (𝑥 = (𝑦 / (1 + 𝑦)) ↔ (𝑦 / (1 + 𝑦)) = 𝑥) |
| 76 | | eqcom 2629 |
. . . . 5
⊢ (𝑦 = (𝑥 / (1 − 𝑥)) ↔ (𝑥 / (1 − 𝑥)) = 𝑦) |
| 77 | 74, 75, 76 | 3bitr4g 303 |
. . . 4
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = (𝑥 / (1 − 𝑥)))) |
| 78 | 77 | adantl 482 |
. . 3
⊢
((⊤ ∧ (𝑥
∈ (0[,)1) ∧ 𝑦
∈ (0[,)+∞))) → (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = (𝑥 / (1 − 𝑥)))) |
| 79 | 1, 17, 45, 78 | f1ocnv2d 6886 |
. 2
⊢ (⊤
→ (𝐹:(0[,)1)–1-1-onto→(0[,)+∞) ∧ ◡𝐹 = (𝑦 ∈ (0[,)+∞) ↦ (𝑦 / (1 + 𝑦))))) |
| 80 | 79 | trud 1493 |
1
⊢ (𝐹:(0[,)1)–1-1-onto→(0[,)+∞) ∧ ◡𝐹 = (𝑦 ∈ (0[,)+∞) ↦ (𝑦 / (1 + 𝑦)))) |