Proof of Theorem iccpnfcnv
Step | Hyp | Ref
| Expression |
1 | | iccpnfhmeo.f |
. . 3
⊢ 𝐹 = (𝑥 ∈ (0[,]1) ↦ if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥)))) |
2 | | 0xr 10086 |
. . . . . . 7
⊢ 0 ∈
ℝ* |
3 | | pnfxr 10092 |
. . . . . . 7
⊢ +∞
∈ ℝ* |
4 | | 0lepnf 11966 |
. . . . . . 7
⊢ 0 ≤
+∞ |
5 | | ubicc2 12289 |
. . . . . . 7
⊢ ((0
∈ ℝ* ∧ +∞ ∈ ℝ* ∧ 0
≤ +∞) → +∞ ∈ (0[,]+∞)) |
6 | 2, 3, 4, 5 | mp3an 1424 |
. . . . . 6
⊢ +∞
∈ (0[,]+∞) |
7 | 6 | a1i 11 |
. . . . 5
⊢ ((𝑥 ∈ (0[,]1) ∧ 𝑥 = 1) → +∞ ∈
(0[,]+∞)) |
8 | | icossicc 12260 |
. . . . . 6
⊢
(0[,)+∞) ⊆ (0[,]+∞) |
9 | | 1re 10039 |
. . . . . . . . . . . . . . 15
⊢ 1 ∈
ℝ |
10 | 9 | rexri 10097 |
. . . . . . . . . . . . . 14
⊢ 1 ∈
ℝ* |
11 | | 0le1 10551 |
. . . . . . . . . . . . . 14
⊢ 0 ≤
1 |
12 | | snunico 12299 |
. . . . . . . . . . . . . 14
⊢ ((0
∈ ℝ* ∧ 1 ∈ ℝ* ∧ 0 ≤ 1)
→ ((0[,)1) ∪ {1}) = (0[,]1)) |
13 | 2, 10, 11, 12 | mp3an 1424 |
. . . . . . . . . . . . 13
⊢ ((0[,)1)
∪ {1}) = (0[,]1) |
14 | 13 | eleq2i 2693 |
. . . . . . . . . . . 12
⊢ (𝑥 ∈ ((0[,)1) ∪ {1})
↔ 𝑥 ∈
(0[,]1)) |
15 | | elun 3753 |
. . . . . . . . . . . 12
⊢ (𝑥 ∈ ((0[,)1) ∪ {1})
↔ (𝑥 ∈ (0[,)1)
∨ 𝑥 ∈
{1})) |
16 | 14, 15 | bitr3i 266 |
. . . . . . . . . . 11
⊢ (𝑥 ∈ (0[,]1) ↔ (𝑥 ∈ (0[,)1) ∨ 𝑥 ∈ {1})) |
17 | | pm2.53 388 |
. . . . . . . . . . 11
⊢ ((𝑥 ∈ (0[,)1) ∨ 𝑥 ∈ {1}) → (¬ 𝑥 ∈ (0[,)1) → 𝑥 ∈ {1})) |
18 | 16, 17 | sylbi 207 |
. . . . . . . . . 10
⊢ (𝑥 ∈ (0[,]1) → (¬
𝑥 ∈ (0[,)1) →
𝑥 ∈
{1})) |
19 | | elsni 4194 |
. . . . . . . . . 10
⊢ (𝑥 ∈ {1} → 𝑥 = 1) |
20 | 18, 19 | syl6 35 |
. . . . . . . . 9
⊢ (𝑥 ∈ (0[,]1) → (¬
𝑥 ∈ (0[,)1) →
𝑥 = 1)) |
21 | 20 | con1d 139 |
. . . . . . . 8
⊢ (𝑥 ∈ (0[,]1) → (¬
𝑥 = 1 → 𝑥 ∈
(0[,)1))) |
22 | 21 | imp 445 |
. . . . . . 7
⊢ ((𝑥 ∈ (0[,]1) ∧ ¬
𝑥 = 1) → 𝑥 ∈
(0[,)1)) |
23 | | eqid 2622 |
. . . . . . . . . . . 12
⊢ (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))) = (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))) |
24 | 23 | icopnfcnv 22741 |
. . . . . . . . . . 11
⊢ ((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)1)–1-1-onto→(0[,)+∞) ∧ ◡(𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))) = (𝑦 ∈ (0[,)+∞) ↦ (𝑦 / (1 + 𝑦)))) |
25 | 24 | simpli 474 |
. . . . . . . . . 10
⊢ (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)1)–1-1-onto→(0[,)+∞) |
26 | | f1of 6137 |
. . . . . . . . . 10
⊢ ((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)1)–1-1-onto→(0[,)+∞) → (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)1)⟶(0[,)+∞)) |
27 | 25, 26 | ax-mp 5 |
. . . . . . . . 9
⊢ (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)1)⟶(0[,)+∞) |
28 | 23 | fmpt 6381 |
. . . . . . . . 9
⊢
(∀𝑥 ∈
(0[,)1)(𝑥 / (1 −
𝑥)) ∈ (0[,)+∞)
↔ (𝑥 ∈ (0[,)1)
↦ (𝑥 / (1 −
𝑥))):(0[,)1)⟶(0[,)+∞)) |
29 | 27, 28 | mpbir 221 |
. . . . . . . 8
⊢
∀𝑥 ∈
(0[,)1)(𝑥 / (1 −
𝑥)) ∈
(0[,)+∞) |
30 | 29 | rspec 2931 |
. . . . . . 7
⊢ (𝑥 ∈ (0[,)1) → (𝑥 / (1 − 𝑥)) ∈ (0[,)+∞)) |
31 | 22, 30 | syl 17 |
. . . . . 6
⊢ ((𝑥 ∈ (0[,]1) ∧ ¬
𝑥 = 1) → (𝑥 / (1 − 𝑥)) ∈ (0[,)+∞)) |
32 | 8, 31 | sseldi 3601 |
. . . . 5
⊢ ((𝑥 ∈ (0[,]1) ∧ ¬
𝑥 = 1) → (𝑥 / (1 − 𝑥)) ∈ (0[,]+∞)) |
33 | 7, 32 | ifclda 4120 |
. . . 4
⊢ (𝑥 ∈ (0[,]1) → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∈ (0[,]+∞)) |
34 | 33 | adantl 482 |
. . 3
⊢
((⊤ ∧ 𝑥
∈ (0[,]1)) → if(𝑥
= 1, +∞, (𝑥 / (1
− 𝑥))) ∈
(0[,]+∞)) |
35 | | 1elunit 12291 |
. . . . . 6
⊢ 1 ∈
(0[,]1) |
36 | 35 | a1i 11 |
. . . . 5
⊢ ((𝑦 ∈ (0[,]+∞) ∧
𝑦 = +∞) → 1
∈ (0[,]1)) |
37 | | icossicc 12260 |
. . . . . 6
⊢ (0[,)1)
⊆ (0[,]1) |
38 | | snunico 12299 |
. . . . . . . . . . . . . 14
⊢ ((0
∈ ℝ* ∧ +∞ ∈ ℝ* ∧ 0
≤ +∞) → ((0[,)+∞) ∪ {+∞}) =
(0[,]+∞)) |
39 | 2, 3, 4, 38 | mp3an 1424 |
. . . . . . . . . . . . 13
⊢
((0[,)+∞) ∪ {+∞}) = (0[,]+∞) |
40 | 39 | eleq2i 2693 |
. . . . . . . . . . . 12
⊢ (𝑦 ∈ ((0[,)+∞) ∪
{+∞}) ↔ 𝑦 ∈
(0[,]+∞)) |
41 | | elun 3753 |
. . . . . . . . . . . 12
⊢ (𝑦 ∈ ((0[,)+∞) ∪
{+∞}) ↔ (𝑦
∈ (0[,)+∞) ∨ 𝑦 ∈ {+∞})) |
42 | 40, 41 | bitr3i 266 |
. . . . . . . . . . 11
⊢ (𝑦 ∈ (0[,]+∞) ↔
(𝑦 ∈ (0[,)+∞)
∨ 𝑦 ∈
{+∞})) |
43 | | pm2.53 388 |
. . . . . . . . . . 11
⊢ ((𝑦 ∈ (0[,)+∞) ∨
𝑦 ∈ {+∞}) →
(¬ 𝑦 ∈
(0[,)+∞) → 𝑦
∈ {+∞})) |
44 | 42, 43 | sylbi 207 |
. . . . . . . . . 10
⊢ (𝑦 ∈ (0[,]+∞) →
(¬ 𝑦 ∈
(0[,)+∞) → 𝑦
∈ {+∞})) |
45 | | elsni 4194 |
. . . . . . . . . 10
⊢ (𝑦 ∈ {+∞} → 𝑦 = +∞) |
46 | 44, 45 | syl6 35 |
. . . . . . . . 9
⊢ (𝑦 ∈ (0[,]+∞) →
(¬ 𝑦 ∈
(0[,)+∞) → 𝑦 =
+∞)) |
47 | 46 | con1d 139 |
. . . . . . . 8
⊢ (𝑦 ∈ (0[,]+∞) →
(¬ 𝑦 = +∞ →
𝑦 ∈
(0[,)+∞))) |
48 | 47 | imp 445 |
. . . . . . 7
⊢ ((𝑦 ∈ (0[,]+∞) ∧
¬ 𝑦 = +∞) →
𝑦 ∈
(0[,)+∞)) |
49 | | f1ocnv 6149 |
. . . . . . . . . 10
⊢ ((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)1)–1-1-onto→(0[,)+∞) → ◡(𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)+∞)–1-1-onto→(0[,)1)) |
50 | | f1of 6137 |
. . . . . . . . . 10
⊢ (◡(𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)+∞)–1-1-onto→(0[,)1) → ◡(𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)+∞)⟶(0[,)1)) |
51 | 25, 49, 50 | mp2b 10 |
. . . . . . . . 9
⊢ ◡(𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)+∞)⟶(0[,)1) |
52 | 24 | simpri 478 |
. . . . . . . . . 10
⊢ ◡(𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))) = (𝑦 ∈ (0[,)+∞) ↦ (𝑦 / (1 + 𝑦))) |
53 | 52 | fmpt 6381 |
. . . . . . . . 9
⊢
(∀𝑦 ∈
(0[,)+∞)(𝑦 / (1 +
𝑦)) ∈ (0[,)1) ↔
◡(𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)+∞)⟶(0[,)1)) |
54 | 51, 53 | mpbir 221 |
. . . . . . . 8
⊢
∀𝑦 ∈
(0[,)+∞)(𝑦 / (1 +
𝑦)) ∈
(0[,)1) |
55 | 54 | rspec 2931 |
. . . . . . 7
⊢ (𝑦 ∈ (0[,)+∞) →
(𝑦 / (1 + 𝑦)) ∈
(0[,)1)) |
56 | 48, 55 | syl 17 |
. . . . . 6
⊢ ((𝑦 ∈ (0[,]+∞) ∧
¬ 𝑦 = +∞) →
(𝑦 / (1 + 𝑦)) ∈
(0[,)1)) |
57 | 37, 56 | sseldi 3601 |
. . . . 5
⊢ ((𝑦 ∈ (0[,]+∞) ∧
¬ 𝑦 = +∞) →
(𝑦 / (1 + 𝑦)) ∈
(0[,]1)) |
58 | 36, 57 | ifclda 4120 |
. . . 4
⊢ (𝑦 ∈ (0[,]+∞) →
if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) ∈ (0[,]1)) |
59 | 58 | adantl 482 |
. . 3
⊢
((⊤ ∧ 𝑦
∈ (0[,]+∞)) → if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) ∈ (0[,]1)) |
60 | | eqeq2 2633 |
. . . . . 6
⊢ (1 =
if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) → (𝑥 = 1 ↔ 𝑥 = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))))) |
61 | 60 | bibi1d 333 |
. . . . 5
⊢ (1 =
if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) → ((𝑥 = 1 ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥)))) ↔ (𝑥 = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥)))))) |
62 | | eqeq2 2633 |
. . . . . 6
⊢ ((𝑦 / (1 + 𝑦)) = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) → (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑥 = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))))) |
63 | 62 | bibi1d 333 |
. . . . 5
⊢ ((𝑦 / (1 + 𝑦)) = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) → ((𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥)))) ↔ (𝑥 = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥)))))) |
64 | | simpr 477 |
. . . . . . 7
⊢ (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
𝑦 = +∞) → 𝑦 = +∞) |
65 | | iftrue 4092 |
. . . . . . . 8
⊢ (𝑥 = 1 → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) = +∞) |
66 | 65 | eqeq2d 2632 |
. . . . . . 7
⊢ (𝑥 = 1 → (𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ↔ 𝑦 = +∞)) |
67 | 64, 66 | syl5ibrcom 237 |
. . . . . 6
⊢ (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
𝑦 = +∞) → (𝑥 = 1 → 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))))) |
68 | | pnfnre 10081 |
. . . . . . . . 9
⊢ +∞
∉ ℝ |
69 | | neleq1 2902 |
. . . . . . . . . 10
⊢ (𝑦 = +∞ → (𝑦 ∉ ℝ ↔ +∞
∉ ℝ)) |
70 | 69 | adantl 482 |
. . . . . . . . 9
⊢ (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
𝑦 = +∞) → (𝑦 ∉ ℝ ↔ +∞
∉ ℝ)) |
71 | 68, 70 | mpbiri 248 |
. . . . . . . 8
⊢ (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
𝑦 = +∞) → 𝑦 ∉
ℝ) |
72 | | neleq1 2902 |
. . . . . . . 8
⊢ (𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) → (𝑦 ∉ ℝ ↔ if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∉ ℝ)) |
73 | 71, 72 | syl5ibcom 235 |
. . . . . . 7
⊢ (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
𝑦 = +∞) → (𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∉ ℝ)) |
74 | | df-nel 2898 |
. . . . . . . 8
⊢ (if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∉ ℝ ↔ ¬ if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∈ ℝ) |
75 | | iffalse 4095 |
. . . . . . . . . . . . 13
⊢ (¬
𝑥 = 1 → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) = (𝑥 / (1 − 𝑥))) |
76 | 75 | adantl 482 |
. . . . . . . . . . . 12
⊢ ((𝑥 ∈ (0[,]1) ∧ ¬
𝑥 = 1) → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) = (𝑥 / (1 − 𝑥))) |
77 | | rge0ssre 12280 |
. . . . . . . . . . . . 13
⊢
(0[,)+∞) ⊆ ℝ |
78 | 77, 31 | sseldi 3601 |
. . . . . . . . . . . 12
⊢ ((𝑥 ∈ (0[,]1) ∧ ¬
𝑥 = 1) → (𝑥 / (1 − 𝑥)) ∈ ℝ) |
79 | 76, 78 | eqeltrd 2701 |
. . . . . . . . . . 11
⊢ ((𝑥 ∈ (0[,]1) ∧ ¬
𝑥 = 1) → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∈ ℝ) |
80 | 79 | ex 450 |
. . . . . . . . . 10
⊢ (𝑥 ∈ (0[,]1) → (¬
𝑥 = 1 → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∈ ℝ)) |
81 | 80 | ad2antrr 762 |
. . . . . . . . 9
⊢ (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
𝑦 = +∞) → (¬
𝑥 = 1 → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∈ ℝ)) |
82 | 81 | con1d 139 |
. . . . . . . 8
⊢ (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
𝑦 = +∞) → (¬
if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∈ ℝ → 𝑥 = 1)) |
83 | 74, 82 | syl5bi 232 |
. . . . . . 7
⊢ (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
𝑦 = +∞) →
(if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∉ ℝ → 𝑥 = 1)) |
84 | 73, 83 | syld 47 |
. . . . . 6
⊢ (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
𝑦 = +∞) → (𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) → 𝑥 = 1)) |
85 | 67, 84 | impbid 202 |
. . . . 5
⊢ (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
𝑦 = +∞) → (𝑥 = 1 ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))))) |
86 | | eqeq2 2633 |
. . . . . . 7
⊢ (+∞
= if(𝑥 = 1, +∞,
(𝑥 / (1 − 𝑥))) → (𝑦 = +∞ ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))))) |
87 | 86 | bibi2d 332 |
. . . . . 6
⊢ (+∞
= if(𝑥 = 1, +∞,
(𝑥 / (1 − 𝑥))) → ((𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = +∞) ↔ (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥)))))) |
88 | | eqeq2 2633 |
. . . . . . 7
⊢ ((𝑥 / (1 − 𝑥)) = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) → (𝑦 = (𝑥 / (1 − 𝑥)) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))))) |
89 | 88 | bibi2d 332 |
. . . . . 6
⊢ ((𝑥 / (1 − 𝑥)) = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) → ((𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = (𝑥 / (1 − 𝑥))) ↔ (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥)))))) |
90 | | 0re 10040 |
. . . . . . . . . . . . . . 15
⊢ 0 ∈
ℝ |
91 | | elico2 12237 |
. . . . . . . . . . . . . . 15
⊢ ((0
∈ ℝ ∧ 1 ∈ ℝ*) → ((𝑦 / (1 + 𝑦)) ∈ (0[,)1) ↔ ((𝑦 / (1 + 𝑦)) ∈ ℝ ∧ 0 ≤ (𝑦 / (1 + 𝑦)) ∧ (𝑦 / (1 + 𝑦)) < 1))) |
92 | 90, 10, 91 | mp2an 708 |
. . . . . . . . . . . . . 14
⊢ ((𝑦 / (1 + 𝑦)) ∈ (0[,)1) ↔ ((𝑦 / (1 + 𝑦)) ∈ ℝ ∧ 0 ≤ (𝑦 / (1 + 𝑦)) ∧ (𝑦 / (1 + 𝑦)) < 1)) |
93 | 56, 92 | sylib 208 |
. . . . . . . . . . . . 13
⊢ ((𝑦 ∈ (0[,]+∞) ∧
¬ 𝑦 = +∞) →
((𝑦 / (1 + 𝑦)) ∈ ℝ ∧ 0 ≤
(𝑦 / (1 + 𝑦)) ∧ (𝑦 / (1 + 𝑦)) < 1)) |
94 | 93 | simp1d 1073 |
. . . . . . . . . . . 12
⊢ ((𝑦 ∈ (0[,]+∞) ∧
¬ 𝑦 = +∞) →
(𝑦 / (1 + 𝑦)) ∈
ℝ) |
95 | 93 | simp3d 1075 |
. . . . . . . . . . . 12
⊢ ((𝑦 ∈ (0[,]+∞) ∧
¬ 𝑦 = +∞) →
(𝑦 / (1 + 𝑦)) < 1) |
96 | 94, 95 | gtned 10172 |
. . . . . . . . . . 11
⊢ ((𝑦 ∈ (0[,]+∞) ∧
¬ 𝑦 = +∞) →
1 ≠ (𝑦 / (1 + 𝑦))) |
97 | 96 | adantll 750 |
. . . . . . . . . 10
⊢ (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
¬ 𝑦 = +∞) →
1 ≠ (𝑦 / (1 + 𝑦))) |
98 | 97 | neneqd 2799 |
. . . . . . . . 9
⊢ (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
¬ 𝑦 = +∞) →
¬ 1 = (𝑦 / (1 + 𝑦))) |
99 | | eqeq1 2626 |
. . . . . . . . . 10
⊢ (𝑥 = 1 → (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 1 = (𝑦 / (1 + 𝑦)))) |
100 | 99 | notbid 308 |
. . . . . . . . 9
⊢ (𝑥 = 1 → (¬ 𝑥 = (𝑦 / (1 + 𝑦)) ↔ ¬ 1 = (𝑦 / (1 + 𝑦)))) |
101 | 98, 100 | syl5ibrcom 237 |
. . . . . . . 8
⊢ (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
¬ 𝑦 = +∞) →
(𝑥 = 1 → ¬ 𝑥 = (𝑦 / (1 + 𝑦)))) |
102 | 101 | imp 445 |
. . . . . . 7
⊢ ((((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
¬ 𝑦 = +∞) ∧
𝑥 = 1) → ¬ 𝑥 = (𝑦 / (1 + 𝑦))) |
103 | | simplr 792 |
. . . . . . 7
⊢ ((((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
¬ 𝑦 = +∞) ∧
𝑥 = 1) → ¬ 𝑦 = +∞) |
104 | 102, 103 | 2falsed 366 |
. . . . . 6
⊢ ((((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
¬ 𝑦 = +∞) ∧
𝑥 = 1) → (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = +∞)) |
105 | | f1ocnvfvb 6535 |
. . . . . . . . . . . 12
⊢ (((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)1)–1-1-onto→(0[,)+∞) ∧ 𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) → (((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑥) = 𝑦 ↔ (◡(𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑦) = 𝑥)) |
106 | 25, 105 | mp3an1 1411 |
. . . . . . . . . . 11
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(((𝑥 ∈ (0[,)1) ↦
(𝑥 / (1 − 𝑥)))‘𝑥) = 𝑦 ↔ (◡(𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑦) = 𝑥)) |
107 | | simpl 473 |
. . . . . . . . . . . . 13
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
𝑥 ∈
(0[,)1)) |
108 | | ovex 6678 |
. . . . . . . . . . . . 13
⊢ (𝑥 / (1 − 𝑥)) ∈ V |
109 | 23 | fvmpt2 6291 |
. . . . . . . . . . . . 13
⊢ ((𝑥 ∈ (0[,)1) ∧ (𝑥 / (1 − 𝑥)) ∈ V) → ((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑥) = (𝑥 / (1 − 𝑥))) |
110 | 107, 108,
109 | sylancl 694 |
. . . . . . . . . . . 12
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
((𝑥 ∈ (0[,)1) ↦
(𝑥 / (1 − 𝑥)))‘𝑥) = (𝑥 / (1 − 𝑥))) |
111 | 110 | eqeq1d 2624 |
. . . . . . . . . . 11
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(((𝑥 ∈ (0[,)1) ↦
(𝑥 / (1 − 𝑥)))‘𝑥) = 𝑦 ↔ (𝑥 / (1 − 𝑥)) = 𝑦)) |
112 | | simpr 477 |
. . . . . . . . . . . . 13
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
𝑦 ∈
(0[,)+∞)) |
113 | | ovex 6678 |
. . . . . . . . . . . . 13
⊢ (𝑦 / (1 + 𝑦)) ∈ V |
114 | 52 | fvmpt2 6291 |
. . . . . . . . . . . . 13
⊢ ((𝑦 ∈ (0[,)+∞) ∧
(𝑦 / (1 + 𝑦)) ∈ V) → (◡(𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑦) = (𝑦 / (1 + 𝑦))) |
115 | 112, 113,
114 | sylancl 694 |
. . . . . . . . . . . 12
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(◡(𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑦) = (𝑦 / (1 + 𝑦))) |
116 | 115 | eqeq1d 2624 |
. . . . . . . . . . 11
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
((◡(𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑦) = 𝑥 ↔ (𝑦 / (1 + 𝑦)) = 𝑥)) |
117 | 106, 111,
116 | 3bitr3rd 299 |
. . . . . . . . . 10
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
((𝑦 / (1 + 𝑦)) = 𝑥 ↔ (𝑥 / (1 − 𝑥)) = 𝑦)) |
118 | | eqcom 2629 |
. . . . . . . . . 10
⊢ (𝑥 = (𝑦 / (1 + 𝑦)) ↔ (𝑦 / (1 + 𝑦)) = 𝑥) |
119 | | eqcom 2629 |
. . . . . . . . . 10
⊢ (𝑦 = (𝑥 / (1 − 𝑥)) ↔ (𝑥 / (1 − 𝑥)) = 𝑦) |
120 | 117, 118,
119 | 3bitr4g 303 |
. . . . . . . . 9
⊢ ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) →
(𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = (𝑥 / (1 − 𝑥)))) |
121 | 22, 48, 120 | syl2an 494 |
. . . . . . . 8
⊢ (((𝑥 ∈ (0[,]1) ∧ ¬
𝑥 = 1) ∧ (𝑦 ∈ (0[,]+∞) ∧
¬ 𝑦 = +∞)) →
(𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = (𝑥 / (1 − 𝑥)))) |
122 | 121 | an4s 869 |
. . . . . . 7
⊢ (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
(¬ 𝑥 = 1 ∧ ¬
𝑦 = +∞)) →
(𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = (𝑥 / (1 − 𝑥)))) |
123 | 122 | anass1rs 849 |
. . . . . 6
⊢ ((((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
¬ 𝑦 = +∞) ∧
¬ 𝑥 = 1) → (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = (𝑥 / (1 − 𝑥)))) |
124 | 87, 89, 104, 123 | ifbothda 4123 |
. . . . 5
⊢ (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧
¬ 𝑦 = +∞) →
(𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))))) |
125 | 61, 63, 85, 124 | ifbothda 4123 |
. . . 4
⊢ ((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) →
(𝑥 = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))))) |
126 | 125 | adantl 482 |
. . 3
⊢
((⊤ ∧ (𝑥
∈ (0[,]1) ∧ 𝑦
∈ (0[,]+∞))) → (𝑥 = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))))) |
127 | 1, 34, 59, 126 | f1ocnv2d 6886 |
. 2
⊢ (⊤
→ (𝐹:(0[,]1)–1-1-onto→(0[,]+∞) ∧ ◡𝐹 = (𝑦 ∈ (0[,]+∞) ↦ if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦)))))) |
128 | 127 | trud 1493 |
1
⊢ (𝐹:(0[,]1)–1-1-onto→(0[,]+∞) ∧ ◡𝐹 = (𝑦 ∈ (0[,]+∞) ↦ if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))))) |