Proof of Theorem fnopabg
| Step | Hyp | Ref
| Expression |
| 1 | | hbra1 1237 |
. . . . . . 7
⊢ (∀x ∈ A
∃!yφ → ∀x∀x
∈ A ∃!yφ) |
| 2 | | ra4 1243 |
. . . . . . . 8
⊢ (∀x ∈ A
∃!yφ → (x ∈ A
→ ∃!yφ)) |
| 3 | | eumo 1037 |
. . . . . . . . . 10
⊢ (∃!yφ →
∃*yφ) |
| 4 | 3 | syl3 18 |
. . . . . . . . 9
⊢ ((x
∈ A → ∃!yφ) →
(x ∈ A → ∃*yφ)) |
| 5 | | moanimv 1052 |
. . . . . . . . 9
⊢ (∃*y(x ∈
A ∧ φ) ↔ (x ∈ A
→ ∃*yφ)) |
| 6 | 4, 5 | sylibr 175 |
. . . . . . . 8
⊢ ((x
∈ A → ∃!yφ) →
∃*y(x ∈ A ∧
φ)) |
| 7 | 2, 6 | syl 12 |
. . . . . . 7
⊢ (∀x ∈ A
∃!yφ → ∃*y(x ∈
A ∧ φ)) |
| 8 | 1, 7 | 19.21ai 740 |
. . . . . 6
⊢ (∀x ∈ A
∃!yφ → ∀x∃*y(x ∈
A ∧ φ)) |
| 9 | | funopab 2694 |
. . . . . 6
⊢ (Fun {〈x, y〉∣(x
∈ A ∧ φ)} ↔ ∀x∃*y(x ∈
A ∧ φ)) |
| 10 | 8, 9 | sylibr 175 |
. . . . 5
⊢ (∀x ∈ A
∃!yφ → Fun {〈x, y〉∣(x
∈ A ∧ φ)}) |
| 11 | | euex 1021 |
. . . . . . 7
⊢ (∃!yφ →
∃yφ) |
| 12 | 11 | r19.20si 1254 |
. . . . . 6
⊢ (∀x ∈ A
∃!yφ → ∀x ∈ A
∃yφ) |
| 13 | | dmopab2 2541 |
. . . . . 6
⊢ (∀x ∈ A
∃yφ ↔ dom {〈x, y〉∣(x
∈ A ∧ φ)} = A) |
| 14 | 12, 13 | sylib 173 |
. . . . 5
⊢ (∀x ∈ A
∃!yφ → dom {〈x, y〉∣(x
∈ A ∧ φ)} = A) |
| 15 | 10, 14 | jca 236 |
. . . 4
⊢ (∀x ∈ A
∃!yφ → (Fun {〈x, y〉∣(x
∈ A ∧ φ)} ∧ dom {〈x, y〉∣(x
∈ A ∧ φ)} = A)) |
| 16 | | df-fn 2433 |
. . . 4
⊢ ({〈x, y〉∣(x
∈ A ∧ φ)} Fn A
↔ (Fun {〈x, y〉∣(x
∈ A ∧ φ)} ∧ dom {〈x, y〉∣(x
∈ A ∧ φ)} = A)) |
| 17 | 15, 16 | sylibr 175 |
. . 3
⊢ (∀x ∈ A
∃!yφ → {〈x, y〉∣(x
∈ A ∧ φ)} Fn A) |
| 18 | | fnopabg.1 |
. . . 4
⊢ F =
{〈x, y〉∣(x
∈ A ∧ φ)} |
| 19 | | fneq1 2718 |
. . . 4
⊢ (F =
{〈x, y〉∣(x
∈ A ∧ φ)} → (F Fn A ↔
{〈x, y〉∣(x
∈ A ∧ φ)} Fn A)) |
| 20 | 18, 19 | ax-mp 6 |
. . 3
⊢ (F Fn
A ↔ {〈x, y〉∣(x
∈ A ∧ φ)} Fn A) |
| 21 | 17, 20 | sylibr 175 |
. 2
⊢ (∀x ∈ A
∃!yφ → F Fn A) |
| 22 | | hbopab1 2112 |
. . . . 5
⊢ (z
∈ {〈x, y〉∣(x
∈ A ∧ φ)} → ∀x z ∈
{〈x, y〉∣(x
∈ A ∧ φ)}) |
| 23 | 18 | eleq2i 1153 |
. . . . 5
⊢ (z
∈ F ↔ z ∈ {〈x, y〉∣(x
∈ A ∧ φ)}) |
| 24 | 23 | bial 695 |
. . . . 5
⊢ (∀x z ∈
F ↔ ∀x z ∈
{〈x, y〉∣(x
∈ A ∧ φ)}) |
| 25 | 22, 23, 24 | 3imtr4 192 |
. . . 4
⊢ (z
∈ F → ∀x z ∈
F) |
| 26 | | ax-17 925 |
. . . 4
⊢ (z
∈ A → ∀x z ∈
A) |
| 27 | 25, 26 | hbfn 2720 |
. . 3
⊢ (F Fn
A → ∀x F Fn A) |
| 28 | | fneu2 2729 |
. . . . . 6
⊢ ((F Fn
A ∧ x ∈ A)
→ ∃!z〈x, z〉
∈ F) |
| 29 | | ax-17 925 |
. . . . . . . 8
⊢ (w
∈ 〈x, z〉 → ∀y w ∈
〈x, z〉) |
| 30 | | hbopab2 2113 |
. . . . . . . . 9
⊢ (z
∈ {〈x, y〉∣(x
∈ A ∧ φ)} → ∀y z ∈
{〈x, y〉∣(x
∈ A ∧ φ)}) |
| 31 | 23 | bial 695 |
. . . . . . . . 9
⊢ (∀y z ∈
F ↔ ∀y z ∈
{〈x, y〉∣(x
∈ A ∧ φ)}) |
| 32 | 30, 23, 31 | 3imtr4 192 |
. . . . . . . 8
⊢ (z
∈ F → ∀y z ∈
F) |
| 33 | 29, 32 | hbel 1172 |
. . . . . . 7
⊢ (〈x, z〉
∈ F → ∀y〈x,
z〉 ∈ F) |
| 34 | | "ax-17.html">ax-17 925 |
. . . . . . 7
⊢ (〈x, y〉
∈ F → ∀z〈x,
y〉 ∈ F) |
| 35 | | opeq2 1877 |
. . . . . . . 8
⊢ (z =
y → 〈x, z〉 =
〈x, y〉) |
| 36 | 35 | eleq1d 1155 |
. . . . . . 7
⊢ (z =
y → (〈x, z〉
∈ F ↔ 〈x, y〉
∈ F)) |
| 37 | 33, 34, 36 | cbveu 1018 |
. . . . . 6
⊢ (∃!z〈x,
z〉 ∈ F ↔ ∃!y〈x,
y〉 ∈ F) |
| 38 | 28, 37 | sylib 173 |
. . . . 5
⊢ ((F Fn
A ∧ x ∈ A)
→ ∃!y〈x, y〉
∈ F) |
| 39 | 18 | eleq2i 1153 |
. . . . . . . . 9
⊢ (〈x, y〉
∈ F ↔ 〈x, y〉
∈ {〈x, y〉∣(x
∈ A ∧ φ)}) |
| 40 | | opabid 2099 |
. . . . . . . . 9
⊢ (〈x, y〉
∈ {〈x, y〉∣(x
∈ A ∧ φ)} ↔ (x ∈ A ∧
φ)) |
| 41 | 39, 40 | bitr 151 |
. . . . . . . 8
⊢ (〈x, y〉
∈ F ↔ (x ∈ A ∧
φ)) |
| 42 | 41 | bieu 1014 |
. . . . . . 7
⊢ (∃!y〈x,
y〉 ∈ F ↔ ∃!y(x ∈
A ∧ φ)) |
| 43 | | euanv 1053 |
. . . . . . 7
⊢ (∃!y(x ∈
A ∧ φ) ↔ (x ∈ A ∧
∃!yφ)) |
| 44 | 42, 43 | bitr 151 |
. . . . . 6
⊢ (∃!y〈x,
y〉 ∈ F ↔ (x
∈ A ∧ ∃!yφ)) |
| 45 | 44 | pm3.27bd 263 |
. . . . 5
⊢ (∃!y〈x,
y〉 ∈ F → ∃!yφ) |
| 46 | 38, 45 | syl 12 |
. . . 4
⊢ ((F Fn
A ∧ x ∈ A)
→ ∃!yφ) |
| 47 | 46 | exp 291 |
. . 3
⊢ (F Fn
A → (x ∈ A
→ ∃!yφ)) |
| 48 | 27, 47 | r19.21ai 1258 |
. 2
⊢ (F Fn
A → ∀x ∈ A
∃!yφ) |
| 49 | 21, 48 | impbi 139 |
1
⊢ (∀x ∈ A
∃!yφ ↔ F Fn A) |