Step | Hyp | Ref
| Expression |
1 | | eumo 2058 |
. . . . . 6
⊢
(∃!𝑧𝜓 → ∃*𝑧𝜓) |
2 | 1 | imim2i 12 |
. . . . 5
⊢ ((𝜑 → ∃!𝑧𝜓) → (𝜑 → ∃*𝑧𝜓)) |
3 | | moanimv 2101 |
. . . . 5
⊢
(∃*𝑧(𝜑 ∧ 𝜓) ↔ (𝜑 → ∃*𝑧𝜓)) |
4 | 2, 3 | sylibr 134 |
. . . 4
⊢ ((𝜑 → ∃!𝑧𝜓) → ∃*𝑧(𝜑 ∧ 𝜓)) |
5 | 4 | 2alimi 1456 |
. . 3
⊢
(∀𝑥∀𝑦(𝜑 → ∃!𝑧𝜓) → ∀𝑥∀𝑦∃*𝑧(𝜑 ∧ 𝜓)) |
6 | | funoprabg 5974 |
. . 3
⊢
(∀𝑥∀𝑦∃*𝑧(𝜑 ∧ 𝜓) → Fun {⟨⟨𝑥, 𝑦⟩, 𝑧⟩ ∣ (𝜑 ∧ 𝜓)}) |
7 | 5, 6 | syl 14 |
. 2
⊢
(∀𝑥∀𝑦(𝜑 → ∃!𝑧𝜓) → Fun {⟨⟨𝑥, 𝑦⟩, 𝑧⟩ ∣ (𝜑 ∧ 𝜓)}) |
8 | | dmoprab 5956 |
. . 3
⊢ dom
{⟨⟨𝑥, 𝑦⟩, 𝑧⟩ ∣ (𝜑 ∧ 𝜓)} = {⟨𝑥, 𝑦⟩ ∣ ∃𝑧(𝜑 ∧ 𝜓)} |
9 | | nfa1 1541 |
. . . 4
⊢
Ⅎ𝑥∀𝑥∀𝑦(𝜑 → ∃!𝑧𝜓) |
10 | | nfa2 1579 |
. . . 4
⊢
Ⅎ𝑦∀𝑥∀𝑦(𝜑 → ∃!𝑧𝜓) |
11 | | simpl 109 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝜓) → 𝜑) |
12 | 11 | exlimiv 1598 |
. . . . . . 7
⊢
(∃𝑧(𝜑 ∧ 𝜓) → 𝜑) |
13 | | euex 2056 |
. . . . . . . . . 10
⊢
(∃!𝑧𝜓 → ∃𝑧𝜓) |
14 | 13 | imim2i 12 |
. . . . . . . . 9
⊢ ((𝜑 → ∃!𝑧𝜓) → (𝜑 → ∃𝑧𝜓)) |
15 | 14 | ancld 325 |
. . . . . . . 8
⊢ ((𝜑 → ∃!𝑧𝜓) → (𝜑 → (𝜑 ∧ ∃𝑧𝜓))) |
16 | | 19.42v 1906 |
. . . . . . . 8
⊢
(∃𝑧(𝜑 ∧ 𝜓) ↔ (𝜑 ∧ ∃𝑧𝜓)) |
17 | 15, 16 | imbitrrdi 162 |
. . . . . . 7
⊢ ((𝜑 → ∃!𝑧𝜓) → (𝜑 → ∃𝑧(𝜑 ∧ 𝜓))) |
18 | 12, 17 | impbid2 143 |
. . . . . 6
⊢ ((𝜑 → ∃!𝑧𝜓) → (∃𝑧(𝜑 ∧ 𝜓) ↔ 𝜑)) |
19 | 18 | sps 1537 |
. . . . 5
⊢
(∀𝑦(𝜑 → ∃!𝑧𝜓) → (∃𝑧(𝜑 ∧ 𝜓) ↔ 𝜑)) |
20 | 19 | sps 1537 |
. . . 4
⊢
(∀𝑥∀𝑦(𝜑 → ∃!𝑧𝜓) → (∃𝑧(𝜑 ∧ 𝜓) ↔ 𝜑)) |
21 | 9, 10, 20 | opabbid 4069 |
. . 3
⊢
(∀𝑥∀𝑦(𝜑 → ∃!𝑧𝜓) → {⟨𝑥, 𝑦⟩ ∣ ∃𝑧(𝜑 ∧ 𝜓)} = {⟨𝑥, 𝑦⟩ ∣ 𝜑}) |
22 | 8, 21 | eqtrid 2222 |
. 2
⊢
(∀𝑥∀𝑦(𝜑 → ∃!𝑧𝜓) → dom {⟨⟨𝑥, 𝑦⟩, 𝑧⟩ ∣ (𝜑 ∧ 𝜓)} = {⟨𝑥, 𝑦⟩ ∣ 𝜑}) |
23 | | df-fn 5220 |
. 2
⊢
({⟨⟨𝑥,
𝑦⟩, 𝑧⟩ ∣ (𝜑 ∧ 𝜓)} Fn {⟨𝑥, 𝑦⟩ ∣ 𝜑} ↔ (Fun {⟨⟨𝑥, 𝑦⟩, 𝑧⟩ ∣ (𝜑 ∧ 𝜓)} ∧ dom {⟨⟨𝑥, 𝑦⟩, 𝑧⟩ ∣ (𝜑 ∧ 𝜓)} = {⟨𝑥, 𝑦⟩ ∣ 𝜑})) |
24 | 7, 22, 23 | sylanbrc 417 |
1
⊢
(∀𝑥∀𝑦(𝜑 → ∃!𝑧𝜓) → {⟨⟨𝑥, 𝑦⟩, 𝑧⟩ ∣ (𝜑 ∧ 𝜓)} Fn {⟨𝑥, 𝑦⟩ ∣ 𝜑}) |