Proof of Theorem curry1val
| Step | Hyp | Ref
| Expression |
| 1 | | curry1.1 |
. . . . 5
⊢ G =
(F ∘ ◡(2nd ↾ ({C} × V))) |
| 2 | 1 | curry1 4082 |
. . . 4
⊢ ((F Fn
(A × B) ⋀ C
∈ A) → G = {〈x,
y〉∣(x ∈ B
⋀ y = (CFx))}) |
| 3 | 2 | fveq1d 3711 |
. . 3
⊢ ((F Fn
(A × B) ⋀ C
∈ A) → (G ‘D) =
({〈x, y〉∣(x
∈ B ⋀ y = (CFx))}
‘D)) |
| 4 | 3 | 3adant3 797 |
. 2
⊢ ((F Fn
(A × B) ⋀ C
∈ A ⋀ D ∈ U)
→ (G ‘D) = ({〈x,
y〉∣(x ∈ B
⋀ y = (CFx))} ‘D)) |
| 5 | | eqid 1468 |
. . . . . . . 8
⊢ {〈x, y〉∣(x
∈ B ⋀ y = (CFx))} =
{〈x, y〉∣(x
∈ B ⋀ y = (CFx))} |
| 6 | 5 | fvopab4ndm 3769 |
. . . . . . 7
⊢ (¬ D ∈ B
→ ({〈x, y〉∣(x
∈ B ⋀ y = (CFx))}
‘D) = ∅) |
| 7 | 6 | 3ad2ant3 800 |
. . . . . 6
⊢ ((F Fn
(A × B) ⋀ D
∈ U ⋀ ¬ D ∈ B)
→ ({〈x, y〉∣(x
∈ B ⋀ y = (CFx))}
‘D) = ∅) |
| 8 | | ndmoprg 4028 |
. . . . . . 7
⊢ ((dom F = (A ×
B) ⋀ D ∈ U
⋀ ¬ (C ∈ A ⋀ D
∈ B)) → (CFD) = ∅) |
| 9 | | fndm 3573 |
. . . . . . 7
⊢ (F Fn
(A × B) → dom F
= (A × B)) |
| 10 | | id 59 |
. . . . . . 7
⊢ (D
∈ U → D ∈ U) |
| 11 | | pm3.27 323 |
. . . . . . . 8
⊢ ((C
∈ A ⋀ D ∈ B)
→ D ∈ B) |
| 12 | 11 | con3i 98 |
. . . . . . 7
⊢ (¬ D ∈ B
→ ¬ (C ∈ A ⋀ D
∈ B)) |
| 13 | 8, 9, 10, 12 | syl3an 866 |
. . . . . 6
⊢ ((F Fn
(A × B) ⋀ D
∈ U ⋀ ¬ D ∈ B)
→ (CFD) =
∅) |
| 14 | 7, 13 | eqtr4d 1502 |
. . . . 5
⊢ ((F Fn
(A × B) ⋀ D
∈ U ⋀ ¬ D ∈ B)
→ ({〈x, y〉∣(x
∈ B ⋀ y = (CFx))}
‘D) = (CFD)) |
| 15 | 14 | 3expia 833 |
. . . 4
⊢ ((F Fn
(A × B) ⋀ D
∈ U) → (¬ D ∈ B
→ ({〈x, y〉∣(x
∈ B ⋀ y = (CFx))}
‘D) = (CFD))) |
| 16 | | opreq2 3954 |
. . . . 5
⊢ (x =
D → (CFx) = (CFD)) |
| 17 | | oprex 3968 |
. . . . 5
⊢ (CFD) ∈ V |
| 18 | 16, 5, 17 | fvopab4 3765 |
. . . 4
⊢ (D
∈ B → ({〈x, y〉∣(x
∈ B ⋀ y = (CFx))}
‘D) = (CFD)) |
| 19 | 15, 18 | pm2.61d2 129 |
. . 3
⊢ ((F Fn
(A × B) ⋀ D
∈ U) → ({〈x, y〉∣(x
∈ B ⋀ y = (CFx))}
‘D) = (CFD)) |
| 20 | 19 | 3adant2 796 |
. 2
⊢ ((F Fn
(A × B) ⋀ C
∈ A ⋀ D ∈ U)
→ ({〈x, y〉∣(x
∈ B ⋀ y = (CFx))}
‘D) = (CFD)) |
| 21 | 4, 20 | eqtrd 1499 |
1
⊢ ((F Fn
(A × B) ⋀ C
∈ A ⋀ D ∈ U)
→ (G ‘D) = (CFD)) |