MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  iccpnfcnv Structured version   Visualization version   GIF version

Theorem iccpnfcnv 22551
Description: Define a bijection from [0, 1] to [0, +∞]. (Contributed by Mario Carneiro, 9-Sep-2015.)
Hypothesis
Ref Expression
iccpnfhmeo.f 𝐹 = (𝑥 ∈ (0[,]1) ↦ if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))))
Assertion
Ref Expression
iccpnfcnv (𝐹:(0[,]1)–1-1-onto→(0[,]+∞) ∧ 𝐹 = (𝑦 ∈ (0[,]+∞) ↦ if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦)))))
Distinct variable groups:   𝑥,𝑦   𝑦,𝐹
Allowed substitution hint:   𝐹(𝑥)

Proof of Theorem iccpnfcnv
StepHypRef Expression
1 iccpnfhmeo.f . . 3 𝐹 = (𝑥 ∈ (0[,]1) ↦ if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))))
2 0xr 9965 . . . . . . 7 0 ∈ ℝ*
3 pnfxr 9971 . . . . . . 7 +∞ ∈ ℝ*
4 0lepnf 11842 . . . . . . 7 0 ≤ +∞
5 ubicc2 12160 . . . . . . 7 ((0 ∈ ℝ* ∧ +∞ ∈ ℝ* ∧ 0 ≤ +∞) → +∞ ∈ (0[,]+∞))
62, 3, 4, 5mp3an 1416 . . . . . 6 +∞ ∈ (0[,]+∞)
76a1i 11 . . . . 5 ((𝑥 ∈ (0[,]1) ∧ 𝑥 = 1) → +∞ ∈ (0[,]+∞))
8 icossicc 12131 . . . . . 6 (0[,)+∞) ⊆ (0[,]+∞)
9 1re 9918 . . . . . . . . . . . . . . 15 1 ∈ ℝ
109rexri 9976 . . . . . . . . . . . . . 14 1 ∈ ℝ*
11 0le1 10430 . . . . . . . . . . . . . 14 0 ≤ 1
12 snunico 12170 . . . . . . . . . . . . . 14 ((0 ∈ ℝ* ∧ 1 ∈ ℝ* ∧ 0 ≤ 1) → ((0[,)1) ∪ {1}) = (0[,]1))
132, 10, 11, 12mp3an 1416 . . . . . . . . . . . . 13 ((0[,)1) ∪ {1}) = (0[,]1)
1413eleq2i 2680 . . . . . . . . . . . 12 (𝑥 ∈ ((0[,)1) ∪ {1}) ↔ 𝑥 ∈ (0[,]1))
15 elun 3715 . . . . . . . . . . . 12 (𝑥 ∈ ((0[,)1) ∪ {1}) ↔ (𝑥 ∈ (0[,)1) ∨ 𝑥 ∈ {1}))
1614, 15bitr3i 265 . . . . . . . . . . 11 (𝑥 ∈ (0[,]1) ↔ (𝑥 ∈ (0[,)1) ∨ 𝑥 ∈ {1}))
17 pm2.53 387 . . . . . . . . . . 11 ((𝑥 ∈ (0[,)1) ∨ 𝑥 ∈ {1}) → (¬ 𝑥 ∈ (0[,)1) → 𝑥 ∈ {1}))
1816, 17sylbi 206 . . . . . . . . . 10 (𝑥 ∈ (0[,]1) → (¬ 𝑥 ∈ (0[,)1) → 𝑥 ∈ {1}))
19 elsni 4142 . . . . . . . . . 10 (𝑥 ∈ {1} → 𝑥 = 1)
2018, 19syl6 34 . . . . . . . . 9 (𝑥 ∈ (0[,]1) → (¬ 𝑥 ∈ (0[,)1) → 𝑥 = 1))
2120con1d 138 . . . . . . . 8 (𝑥 ∈ (0[,]1) → (¬ 𝑥 = 1 → 𝑥 ∈ (0[,)1)))
2221imp 444 . . . . . . 7 ((𝑥 ∈ (0[,]1) ∧ ¬ 𝑥 = 1) → 𝑥 ∈ (0[,)1))
23 eqid 2610 . . . . . . . . . . . 12 (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))) = (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))
2423icopnfcnv 22549 . . . . . . . . . . 11 ((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)1)–1-1-onto→(0[,)+∞) ∧ (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))) = (𝑦 ∈ (0[,)+∞) ↦ (𝑦 / (1 + 𝑦))))
2524simpli 473 . . . . . . . . . 10 (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)1)–1-1-onto→(0[,)+∞)
26 f1of 6050 . . . . . . . . . 10 ((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)1)–1-1-onto→(0[,)+∞) → (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)1)⟶(0[,)+∞))
2725, 26ax-mp 5 . . . . . . . . 9 (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)1)⟶(0[,)+∞)
2823fmpt 6289 . . . . . . . . 9 (∀𝑥 ∈ (0[,)1)(𝑥 / (1 − 𝑥)) ∈ (0[,)+∞) ↔ (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)1)⟶(0[,)+∞))
2927, 28mpbir 220 . . . . . . . 8 𝑥 ∈ (0[,)1)(𝑥 / (1 − 𝑥)) ∈ (0[,)+∞)
3029rspec 2915 . . . . . . 7 (𝑥 ∈ (0[,)1) → (𝑥 / (1 − 𝑥)) ∈ (0[,)+∞))
3122, 30syl 17 . . . . . 6 ((𝑥 ∈ (0[,]1) ∧ ¬ 𝑥 = 1) → (𝑥 / (1 − 𝑥)) ∈ (0[,)+∞))
328, 31sseldi 3566 . . . . 5 ((𝑥 ∈ (0[,]1) ∧ ¬ 𝑥 = 1) → (𝑥 / (1 − 𝑥)) ∈ (0[,]+∞))
337, 32ifclda 4070 . . . 4 (𝑥 ∈ (0[,]1) → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∈ (0[,]+∞))
3433adantl 481 . . 3 ((⊤ ∧ 𝑥 ∈ (0[,]1)) → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∈ (0[,]+∞))
35 1elunit 12162 . . . . . 6 1 ∈ (0[,]1)
3635a1i 11 . . . . 5 ((𝑦 ∈ (0[,]+∞) ∧ 𝑦 = +∞) → 1 ∈ (0[,]1))
37 icossicc 12131 . . . . . 6 (0[,)1) ⊆ (0[,]1)
38 snunico 12170 . . . . . . . . . . . . . 14 ((0 ∈ ℝ* ∧ +∞ ∈ ℝ* ∧ 0 ≤ +∞) → ((0[,)+∞) ∪ {+∞}) = (0[,]+∞))
392, 3, 4, 38mp3an 1416 . . . . . . . . . . . . 13 ((0[,)+∞) ∪ {+∞}) = (0[,]+∞)
4039eleq2i 2680 . . . . . . . . . . . 12 (𝑦 ∈ ((0[,)+∞) ∪ {+∞}) ↔ 𝑦 ∈ (0[,]+∞))
41 elun 3715 . . . . . . . . . . . 12 (𝑦 ∈ ((0[,)+∞) ∪ {+∞}) ↔ (𝑦 ∈ (0[,)+∞) ∨ 𝑦 ∈ {+∞}))
4240, 41bitr3i 265 . . . . . . . . . . 11 (𝑦 ∈ (0[,]+∞) ↔ (𝑦 ∈ (0[,)+∞) ∨ 𝑦 ∈ {+∞}))
43 pm2.53 387 . . . . . . . . . . 11 ((𝑦 ∈ (0[,)+∞) ∨ 𝑦 ∈ {+∞}) → (¬ 𝑦 ∈ (0[,)+∞) → 𝑦 ∈ {+∞}))
4442, 43sylbi 206 . . . . . . . . . 10 (𝑦 ∈ (0[,]+∞) → (¬ 𝑦 ∈ (0[,)+∞) → 𝑦 ∈ {+∞}))
45 elsni 4142 . . . . . . . . . 10 (𝑦 ∈ {+∞} → 𝑦 = +∞)
4644, 45syl6 34 . . . . . . . . 9 (𝑦 ∈ (0[,]+∞) → (¬ 𝑦 ∈ (0[,)+∞) → 𝑦 = +∞))
4746con1d 138 . . . . . . . 8 (𝑦 ∈ (0[,]+∞) → (¬ 𝑦 = +∞ → 𝑦 ∈ (0[,)+∞)))
4847imp 444 . . . . . . 7 ((𝑦 ∈ (0[,]+∞) ∧ ¬ 𝑦 = +∞) → 𝑦 ∈ (0[,)+∞))
49 f1ocnv 6062 . . . . . . . . . 10 ((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)1)–1-1-onto→(0[,)+∞) → (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)+∞)–1-1-onto→(0[,)1))
50 f1of 6050 . . . . . . . . . 10 ((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)+∞)–1-1-onto→(0[,)1) → (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)+∞)⟶(0[,)1))
5125, 49, 50mp2b 10 . . . . . . . . 9 (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)+∞)⟶(0[,)1)
5224simpri 477 . . . . . . . . . 10 (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))) = (𝑦 ∈ (0[,)+∞) ↦ (𝑦 / (1 + 𝑦)))
5352fmpt 6289 . . . . . . . . 9 (∀𝑦 ∈ (0[,)+∞)(𝑦 / (1 + 𝑦)) ∈ (0[,)1) ↔ (𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)+∞)⟶(0[,)1))
5451, 53mpbir 220 . . . . . . . 8 𝑦 ∈ (0[,)+∞)(𝑦 / (1 + 𝑦)) ∈ (0[,)1)
5554rspec 2915 . . . . . . 7 (𝑦 ∈ (0[,)+∞) → (𝑦 / (1 + 𝑦)) ∈ (0[,)1))
5648, 55syl 17 . . . . . 6 ((𝑦 ∈ (0[,]+∞) ∧ ¬ 𝑦 = +∞) → (𝑦 / (1 + 𝑦)) ∈ (0[,)1))
5737, 56sseldi 3566 . . . . 5 ((𝑦 ∈ (0[,]+∞) ∧ ¬ 𝑦 = +∞) → (𝑦 / (1 + 𝑦)) ∈ (0[,]1))
5836, 57ifclda 4070 . . . 4 (𝑦 ∈ (0[,]+∞) → if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) ∈ (0[,]1))
5958adantl 481 . . 3 ((⊤ ∧ 𝑦 ∈ (0[,]+∞)) → if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) ∈ (0[,]1))
60 eqeq2 2621 . . . . . 6 (1 = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) → (𝑥 = 1 ↔ 𝑥 = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦)))))
6160bibi1d 332 . . . . 5 (1 = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) → ((𝑥 = 1 ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥)))) ↔ (𝑥 = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))))))
62 eqeq2 2621 . . . . . 6 ((𝑦 / (1 + 𝑦)) = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) → (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑥 = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦)))))
6362bibi1d 332 . . . . 5 ((𝑦 / (1 + 𝑦)) = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) → ((𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥)))) ↔ (𝑥 = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))))))
64 simpr 476 . . . . . . 7 (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ 𝑦 = +∞) → 𝑦 = +∞)
65 iftrue 4042 . . . . . . . 8 (𝑥 = 1 → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) = +∞)
6665eqeq2d 2620 . . . . . . 7 (𝑥 = 1 → (𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ↔ 𝑦 = +∞))
6764, 66syl5ibrcom 236 . . . . . 6 (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ 𝑦 = +∞) → (𝑥 = 1 → 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥)))))
68 pnfnre 9960 . . . . . . . . 9 +∞ ∉ ℝ
69 neleq1 2888 . . . . . . . . . 10 (𝑦 = +∞ → (𝑦 ∉ ℝ ↔ +∞ ∉ ℝ))
7069adantl 481 . . . . . . . . 9 (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ 𝑦 = +∞) → (𝑦 ∉ ℝ ↔ +∞ ∉ ℝ))
7168, 70mpbiri 247 . . . . . . . 8 (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ 𝑦 = +∞) → 𝑦 ∉ ℝ)
72 neleq1 2888 . . . . . . . 8 (𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) → (𝑦 ∉ ℝ ↔ if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∉ ℝ))
7371, 72syl5ibcom 234 . . . . . . 7 (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ 𝑦 = +∞) → (𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∉ ℝ))
74 df-nel 2783 . . . . . . . 8 (if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∉ ℝ ↔ ¬ if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∈ ℝ)
75 iffalse 4045 . . . . . . . . . . . . 13 𝑥 = 1 → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) = (𝑥 / (1 − 𝑥)))
7675adantl 481 . . . . . . . . . . . 12 ((𝑥 ∈ (0[,]1) ∧ ¬ 𝑥 = 1) → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) = (𝑥 / (1 − 𝑥)))
77 rge0ssre 12151 . . . . . . . . . . . . 13 (0[,)+∞) ⊆ ℝ
7877, 31sseldi 3566 . . . . . . . . . . . 12 ((𝑥 ∈ (0[,]1) ∧ ¬ 𝑥 = 1) → (𝑥 / (1 − 𝑥)) ∈ ℝ)
7976, 78eqeltrd 2688 . . . . . . . . . . 11 ((𝑥 ∈ (0[,]1) ∧ ¬ 𝑥 = 1) → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∈ ℝ)
8079ex 449 . . . . . . . . . 10 (𝑥 ∈ (0[,]1) → (¬ 𝑥 = 1 → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∈ ℝ))
8180ad2antrr 758 . . . . . . . . 9 (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ 𝑦 = +∞) → (¬ 𝑥 = 1 → if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∈ ℝ))
8281con1d 138 . . . . . . . 8 (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ 𝑦 = +∞) → (¬ if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∈ ℝ → 𝑥 = 1))
8374, 82syl5bi 231 . . . . . . 7 (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ 𝑦 = +∞) → (if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) ∉ ℝ → 𝑥 = 1))
8473, 83syld 46 . . . . . 6 (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ 𝑦 = +∞) → (𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) → 𝑥 = 1))
8567, 84impbid 201 . . . . 5 (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ 𝑦 = +∞) → (𝑥 = 1 ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥)))))
86 eqeq2 2621 . . . . . . 7 (+∞ = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) → (𝑦 = +∞ ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥)))))
8786bibi2d 331 . . . . . 6 (+∞ = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) → ((𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = +∞) ↔ (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))))))
88 eqeq2 2621 . . . . . . 7 ((𝑥 / (1 − 𝑥)) = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) → (𝑦 = (𝑥 / (1 − 𝑥)) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥)))))
8988bibi2d 331 . . . . . 6 ((𝑥 / (1 − 𝑥)) = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))) → ((𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = (𝑥 / (1 − 𝑥))) ↔ (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥))))))
90 0re 9919 . . . . . . . . . . . . . . 15 0 ∈ ℝ
91 elico2 12108 . . . . . . . . . . . . . . 15 ((0 ∈ ℝ ∧ 1 ∈ ℝ*) → ((𝑦 / (1 + 𝑦)) ∈ (0[,)1) ↔ ((𝑦 / (1 + 𝑦)) ∈ ℝ ∧ 0 ≤ (𝑦 / (1 + 𝑦)) ∧ (𝑦 / (1 + 𝑦)) < 1)))
9290, 10, 91mp2an 704 . . . . . . . . . . . . . 14 ((𝑦 / (1 + 𝑦)) ∈ (0[,)1) ↔ ((𝑦 / (1 + 𝑦)) ∈ ℝ ∧ 0 ≤ (𝑦 / (1 + 𝑦)) ∧ (𝑦 / (1 + 𝑦)) < 1))
9356, 92sylib 207 . . . . . . . . . . . . 13 ((𝑦 ∈ (0[,]+∞) ∧ ¬ 𝑦 = +∞) → ((𝑦 / (1 + 𝑦)) ∈ ℝ ∧ 0 ≤ (𝑦 / (1 + 𝑦)) ∧ (𝑦 / (1 + 𝑦)) < 1))
9493simp1d 1066 . . . . . . . . . . . 12 ((𝑦 ∈ (0[,]+∞) ∧ ¬ 𝑦 = +∞) → (𝑦 / (1 + 𝑦)) ∈ ℝ)
9593simp3d 1068 . . . . . . . . . . . 12 ((𝑦 ∈ (0[,]+∞) ∧ ¬ 𝑦 = +∞) → (𝑦 / (1 + 𝑦)) < 1)
9694, 95gtned 10051 . . . . . . . . . . 11 ((𝑦 ∈ (0[,]+∞) ∧ ¬ 𝑦 = +∞) → 1 ≠ (𝑦 / (1 + 𝑦)))
9796adantll 746 . . . . . . . . . 10 (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ ¬ 𝑦 = +∞) → 1 ≠ (𝑦 / (1 + 𝑦)))
9897neneqd 2787 . . . . . . . . 9 (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ ¬ 𝑦 = +∞) → ¬ 1 = (𝑦 / (1 + 𝑦)))
99 eqeq1 2614 . . . . . . . . . 10 (𝑥 = 1 → (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 1 = (𝑦 / (1 + 𝑦))))
10099notbid 307 . . . . . . . . 9 (𝑥 = 1 → (¬ 𝑥 = (𝑦 / (1 + 𝑦)) ↔ ¬ 1 = (𝑦 / (1 + 𝑦))))
10198, 100syl5ibrcom 236 . . . . . . . 8 (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ ¬ 𝑦 = +∞) → (𝑥 = 1 → ¬ 𝑥 = (𝑦 / (1 + 𝑦))))
102101imp 444 . . . . . . 7 ((((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ ¬ 𝑦 = +∞) ∧ 𝑥 = 1) → ¬ 𝑥 = (𝑦 / (1 + 𝑦)))
103 simplr 788 . . . . . . 7 ((((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ ¬ 𝑦 = +∞) ∧ 𝑥 = 1) → ¬ 𝑦 = +∞)
104102, 1032falsed 365 . . . . . 6 ((((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ ¬ 𝑦 = +∞) ∧ 𝑥 = 1) → (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = +∞))
105 f1ocnvfvb 6435 . . . . . . . . . . . 12 (((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥))):(0[,)1)–1-1-onto→(0[,)+∞) ∧ 𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) → (((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑥) = 𝑦 ↔ ((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑦) = 𝑥))
10625, 105mp3an1 1403 . . . . . . . . . . 11 ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) → (((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑥) = 𝑦 ↔ ((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑦) = 𝑥))
107 simpl 472 . . . . . . . . . . . . 13 ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) → 𝑥 ∈ (0[,)1))
108 ovex 6577 . . . . . . . . . . . . 13 (𝑥 / (1 − 𝑥)) ∈ V
10923fvmpt2 6200 . . . . . . . . . . . . 13 ((𝑥 ∈ (0[,)1) ∧ (𝑥 / (1 − 𝑥)) ∈ V) → ((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑥) = (𝑥 / (1 − 𝑥)))
110107, 108, 109sylancl 693 . . . . . . . . . . . 12 ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) → ((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑥) = (𝑥 / (1 − 𝑥)))
111110eqeq1d 2612 . . . . . . . . . . 11 ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) → (((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑥) = 𝑦 ↔ (𝑥 / (1 − 𝑥)) = 𝑦))
112 simpr 476 . . . . . . . . . . . . 13 ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) → 𝑦 ∈ (0[,)+∞))
113 ovex 6577 . . . . . . . . . . . . 13 (𝑦 / (1 + 𝑦)) ∈ V
11452fvmpt2 6200 . . . . . . . . . . . . 13 ((𝑦 ∈ (0[,)+∞) ∧ (𝑦 / (1 + 𝑦)) ∈ V) → ((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑦) = (𝑦 / (1 + 𝑦)))
115112, 113, 114sylancl 693 . . . . . . . . . . . 12 ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) → ((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑦) = (𝑦 / (1 + 𝑦)))
116115eqeq1d 2612 . . . . . . . . . . 11 ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) → (((𝑥 ∈ (0[,)1) ↦ (𝑥 / (1 − 𝑥)))‘𝑦) = 𝑥 ↔ (𝑦 / (1 + 𝑦)) = 𝑥))
117106, 111, 1163bitr3rd 298 . . . . . . . . . 10 ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) → ((𝑦 / (1 + 𝑦)) = 𝑥 ↔ (𝑥 / (1 − 𝑥)) = 𝑦))
118 eqcom 2617 . . . . . . . . . 10 (𝑥 = (𝑦 / (1 + 𝑦)) ↔ (𝑦 / (1 + 𝑦)) = 𝑥)
119 eqcom 2617 . . . . . . . . . 10 (𝑦 = (𝑥 / (1 − 𝑥)) ↔ (𝑥 / (1 − 𝑥)) = 𝑦)
120117, 118, 1193bitr4g 302 . . . . . . . . 9 ((𝑥 ∈ (0[,)1) ∧ 𝑦 ∈ (0[,)+∞)) → (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = (𝑥 / (1 − 𝑥))))
12122, 48, 120syl2an 493 . . . . . . . 8 (((𝑥 ∈ (0[,]1) ∧ ¬ 𝑥 = 1) ∧ (𝑦 ∈ (0[,]+∞) ∧ ¬ 𝑦 = +∞)) → (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = (𝑥 / (1 − 𝑥))))
122121an4s 865 . . . . . . 7 (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ (¬ 𝑥 = 1 ∧ ¬ 𝑦 = +∞)) → (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = (𝑥 / (1 − 𝑥))))
123122anass1rs 845 . . . . . 6 ((((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ ¬ 𝑦 = +∞) ∧ ¬ 𝑥 = 1) → (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = (𝑥 / (1 − 𝑥))))
12487, 89, 104, 123ifbothda 4073 . . . . 5 (((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) ∧ ¬ 𝑦 = +∞) → (𝑥 = (𝑦 / (1 + 𝑦)) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥)))))
12561, 63, 85, 124ifbothda 4073 . . . 4 ((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞)) → (𝑥 = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥)))))
126125adantl 481 . . 3 ((⊤ ∧ (𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]+∞))) → (𝑥 = if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))) ↔ 𝑦 = if(𝑥 = 1, +∞, (𝑥 / (1 − 𝑥)))))
1271, 34, 59, 126f1ocnv2d 6784 . 2 (⊤ → (𝐹:(0[,]1)–1-1-onto→(0[,]+∞) ∧ 𝐹 = (𝑦 ∈ (0[,]+∞) ↦ if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦))))))
128127trud 1484 1 (𝐹:(0[,]1)–1-1-onto→(0[,]+∞) ∧ 𝐹 = (𝑦 ∈ (0[,]+∞) ↦ if(𝑦 = +∞, 1, (𝑦 / (1 + 𝑦)))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 195  wo 382  wa 383  w3a 1031   = wceq 1475  wtru 1476  wcel 1977  wne 2780  wnel 2781  wral 2896  Vcvv 3173  cun 3538  ifcif 4036  {csn 4125   class class class wbr 4583  cmpt 4643  ccnv 5037  wf 5800  1-1-ontowf1o 5803  cfv 5804  (class class class)co 6549  cr 9814  0cc0 9815  1c1 9816   + caddc 9818  +∞cpnf 9950  *cxr 9952   < clt 9953  cle 9954  cmin 10145   / cdiv 10563  [,)cico 12048  [,]cicc 12049
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833  ax-un 6847  ax-cnex 9871  ax-resscn 9872  ax-1cn 9873  ax-icn 9874  ax-addcl 9875  ax-addrcl 9876  ax-mulcl 9877  ax-mulrcl 9878  ax-mulcom 9879  ax-addass 9880  ax-mulass 9881  ax-distr 9882  ax-i2m1 9883  ax-1ne0 9884  ax-1rid 9885  ax-rnegex 9886  ax-rrecex 9887  ax-cnre 9888  ax-pre-lttri 9889  ax-pre-lttrn 9890  ax-pre-ltadd 9891  ax-pre-mulgt0 9892
This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3or 1032  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-nel 2783  df-ral 2901  df-rex 2902  df-reu 2903  df-rmo 2904  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-nul 3875  df-if 4037  df-pw 4110  df-sn 4126  df-pr 4128  df-op 4132  df-uni 4373  df-br 4584  df-opab 4644  df-mpt 4645  df-id 4953  df-po 4959  df-so 4960  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-fv 5812  df-riota 6511  df-ov 6552  df-oprab 6553  df-mpt2 6554  df-er 7629  df-en 7842  df-dom 7843  df-sdom 7844  df-pnf 9955  df-mnf 9956  df-xr 9957  df-ltxr 9958  df-le 9959  df-sub 10147  df-neg 10148  df-div 10564  df-rp 11709  df-ico 12052  df-icc 12053
This theorem is referenced by:  iccpnfhmeo  22552  xrhmeo  22553
  Copyright terms: Public domain W3C validator