Proof of Theorem oprabval4g
| Step | Hyp | Ref
| Expression |
| 1 | | sbab 1188 |
. . . . 5
⊢ (x =
w → {u∣[v /
y]u
∈ C} = {f∣[w /
x]f
∈ {u∣[v / y]u ∈ C}}) |
| 2 | 1 | cleqcomd 1106 |
. . . 4
⊢ (x =
w → {f∣[w /
x]f
∈ {u∣[v / y]u ∈ C}} =
{u∣[v / y]u ∈ C}) |
| 3 | 2 | cleqcoms 1104 |
. . 3
⊢ (w =
x → {f∣[w /
x]f
∈ {u∣[v / y]u ∈ C}} =
{u∣[v / y]u ∈ C}) |
| 4 | | sbab 1188 |
. . . . 5
⊢ (y =
v → C = {u∣[v /
y]u
∈ C}) |
| 5 | 4 | cleqcomd 1106 |
. . . 4
⊢ (y =
v → {u∣[v /
y]u
∈ C} = C) |
| 6 | 5 | cleqcoms 1104 |
. . 3
⊢ (v =
y → {u∣[v /
y]u
∈ C} = C) |
| 7 | | oprabval4g.1 |
. . . 4
⊢ F =
{〈〈x, y〉, z〉∣((x ∈ A ∧
y ∈ B) ∧ z =
C)} |
| 8 | | ax-17 925 |
. . . . . 6
⊢ ((w
∈ A ∧ v ∈ B)
→ ∀x(w ∈ A ∧
v ∈ B)) |
| 9 | | hbs1 986 |
. . . . . . . 8
⊢ ([w /
x]f
∈ {u∣[v / y]u ∈ C}
→ ∀x[w / x]f ∈ {u∣[v /
y]u
∈ C}) |
| 10 | 9 | hbab 1096 |
. . . . . . 7
⊢ (z
∈ {f∣[w / x]f ∈ {u∣[v /
y]u
∈ C}} → ∀x z ∈
{f∣[w / x]f ∈ {u∣[v /
y]u
∈ C}}) |
| 11 | 10 | hbeleq 1173 |
. . . . . 6
⊢ (z =
{f∣[w / x]f ∈ {u∣[v /
y]u
∈ C}} → ∀x z = {f∣[w /
x]f
∈ {u∣[v / y]u ∈ C}}) |
| 12 | 8, 11 | hban 704 |
. . . . 5
⊢ (((w
∈ A ∧ v ∈ B)
∧ z = {f∣[w /
x]f
∈ {u∣[v / y]u ∈ C}})
→ ∀x((w ∈ A ∧
v ∈ B) ∧ z =
{f∣[w / x]f ∈ {u∣[v /
y]u
∈ C}})) |
| 13 | | ax-17 925 |
. . . . . 6
⊢ ((w
∈ A ∧ v ∈ B)
→ ∀y(w ∈ A ∧
v ∈ B)) |
| 14 | | hbs1 986 |
. . . . . . . . . 10
⊢ ([v /
y]u
∈ C → ∀y[v / y]u ∈
C) |
| 15 | 14 | hbab 1096 |
. . . . . . . . 9
⊢ (f
∈ {u∣[v / y]u ∈ C}
→ ∀y f ∈ {u∣[v /
y]u
∈ C}) |
| 16 | 15 | hbsb 987 |
. . . . . . . 8
⊢ ([w /
x]f
∈ {u∣[v / y]u ∈ C}
→ ∀y[w / x]f ∈ {u∣[v /
y]u
∈ C}) |
| 17 | 16 | hbab 1096 |
. . . . . . 7
⊢ (z
∈ {f∣[w / x]f ∈ {u∣[v /
y]u
∈ C}} → ∀y z ∈
{f∣[w / x]f ∈ {u∣[v /
y]u
∈ C}}) |
| 18 | 17 | hbeleq 1173 |
. . . . . 6
⊢ (z =
{f∣[w / x]f ∈ {u∣[v /
y]u
∈ C}} → ∀y z = {f∣[w /
x]f
∈ {u∣[v / y]u ∈ C}}) |
| 19 | 13, 18 | hban 704 |
. . . . 5
⊢ (((w
∈ A ∧ v ∈ B)
∧ z = {f∣[w /
x]f
∈ {u∣[v / y]u ∈ C}})
→ ∀y((w ∈ A ∧
v ∈ B) ∧ z =
{f∣[w / x]f ∈ {u∣[v /
y]u
∈ C}})) |
| 20 | | ax-17 925 |
. . . . 5
⊢ (((x
∈ A ∧ y ∈ B)
∧ z = C) → ∀w((x ∈
A ∧ y ∈ B)
∧ z = C)) |
| 21 | | ax-17 925 |
. . . . 5
⊢ (((x
∈ A ∧ y ∈ B)
∧ z = C) → ∀v((x ∈
A ∧ y ∈ B)
∧ z = C)) |
| 22 | | eleq1 1149 |
. . . . . . 7
⊢ (w =
x → (w ∈ A
↔ x ∈ A)) |
| 23 | | eleq1 1149 |
. . . . . . 7
⊢ (v =
y → (v ∈ B
↔ y ∈ B)) |
| 24 | 22, 23 | bi2anan9 478 |
. . . . . 6
⊢ ((w =
x ∧ v = y) →
((w ∈ A ∧ v ∈
B) ↔ (x ∈ A ∧
y ∈ B))) |
| 25 | 3, 6 | sylan9eq 1144 |
. . . . . . 7
⊢ ((w =
x ∧ v = y) →
{f∣[w / x]f ∈ {u∣[v /
y]u
∈ C}} = C) |
| 26 | 25 | cleq2d 1112 |
. . . . . 6
⊢ ((w =
x ∧ v = y) →
(z = {f∣[w /
x]f
∈ {u∣[v / y]u ∈ C}}
↔ z = C)) |
| 27 | 24, 26 | anbi12d 476 |
. . . . 5
⊢ ((w =
x ∧ v = y) →
(((w ∈ A ∧ v ∈
B) ∧ z = {f∣[w /
x]f
∈ {u∣[v / y]u ∈ C}})
↔ ((x ∈ A ∧ y ∈
B) ∧ z = C))) |
| 28 | 12, 19, 20, 21, 27 | cbvoprab12 3028 |
. . . 4
⊢ {〈〈w, v〉,
z〉∣((w ∈ A ∧
v ∈ B) ∧ z =
{f∣[w / x]f ∈ {u∣[v /
y]u
∈ C}})} = {〈〈x, y〉,
z〉∣((x ∈ A ∧
y ∈ B) ∧ z =
C)} |
| 29 | 7, 28 | eqtr4 1122 |
. . 3
⊢ F =
{〈〈w, v〉, z〉∣((w ∈ A ∧
v ∈ B) ∧ z =
{f∣[w / x]f ∈ {u∣[v /
y]u
∈ C}})} |
| 30 | 3, 6, 29 | oprabval2g 3050 |
. 2
⊢ ((x
∈ A ∧ y ∈ B ∧
C ∈ V) → (xFy) = C) |
| 31 | | elisset 1354 |
. 2
⊢ (C
∈ D → C ∈ V) |
| 32 | 30, 31 | syl3an3 621 |
1
⊢ ((x
∈ A ∧ y ∈ B ∧
C ∈ D) → (xFy) = C) |