Proof of Theorem reupick2
Step | Hyp | Ref
| Expression |
1 | | ancr 532 |
. . . . . 6
⊢ ((ψ → φ) → (ψ → (φ ∧ ψ))) |
2 | 1 | ralimi 2690 |
. . . . 5
⊢ (∀x ∈ A (ψ → φ) → ∀x ∈ A (ψ → (φ ∧ ψ))) |
3 | | rexim 2719 |
. . . . 5
⊢ (∀x ∈ A (ψ → (φ ∧ ψ)) → (∃x ∈ A ψ → ∃x ∈ A (φ ∧ ψ))) |
4 | 2, 3 | syl 15 |
. . . 4
⊢ (∀x ∈ A (ψ → φ) → (∃x ∈ A ψ → ∃x ∈ A (φ ∧ ψ))) |
5 | | reupick3 3541 |
. . . . . 6
⊢ ((∃!x ∈ A φ ∧ ∃x ∈ A (φ ∧ ψ) ∧
x ∈
A) → (φ → ψ)) |
6 | 5 | 3exp 1150 |
. . . . 5
⊢ (∃!x ∈ A φ → (∃x ∈ A (φ ∧ ψ) → (x ∈ A → (φ
→ ψ)))) |
7 | 6 | com12 27 |
. . . 4
⊢ (∃x ∈ A (φ ∧ ψ) → (∃!x ∈ A φ → (x ∈ A → (φ
→ ψ)))) |
8 | 4, 7 | syl6 29 |
. . 3
⊢ (∀x ∈ A (ψ → φ) → (∃x ∈ A ψ → (∃!x ∈ A φ → (x ∈ A → (φ
→ ψ))))) |
9 | 8 | 3imp1 1164 |
. 2
⊢ (((∀x ∈ A (ψ → φ) ∧ ∃x ∈ A ψ ∧ ∃!x ∈ A φ) ∧
x ∈
A) → (φ → ψ)) |
10 | | rsp 2675 |
. . . 4
⊢ (∀x ∈ A (ψ → φ) → (x ∈ A → (ψ
→ φ))) |
11 | 10 | 3ad2ant1 976 |
. . 3
⊢ ((∀x ∈ A (ψ → φ) ∧ ∃x ∈ A ψ ∧ ∃!x ∈ A φ) → (x ∈ A → (ψ
→ φ))) |
12 | 11 | imp 418 |
. 2
⊢ (((∀x ∈ A (ψ → φ) ∧ ∃x ∈ A ψ ∧ ∃!x ∈ A φ) ∧
x ∈
A) → (ψ → φ)) |
13 | 9, 12 | impbid 183 |
1
⊢ (((∀x ∈ A (ψ → φ) ∧ ∃x ∈ A ψ ∧ ∃!x ∈ A φ) ∧
x ∈
A) → (φ ↔ ψ)) |