Proof of Theorem oprabvalig
| Step | Hyp | Ref
| Expression |
| 1 | | eleq1 1149 |
. . . . . . . . . . 11
⊢ (x =
A → (x ∈ R
↔ A ∈ R)) |
| 2 | 1 | anbi1d 469 |
. . . . . . . . . 10
⊢ (x =
A → ((x ∈ R ∧
y ∈ S) ↔ (A
∈ R ∧ y ∈ S))) |
| 3 | | oprabvalig.1 |
. . . . . . . . . 10
⊢ (x =
A → (φ ↔ ψ)) |
| 4 | 2, 3 | anbi12d 476 |
. . . . . . . . 9
⊢ (x =
A → (((x ∈ R ∧
y ∈ S) ∧ φ)
↔ ((A ∈ R ∧ y ∈
S) ∧ ψ))) |
| 5 | | eleq1 1149 |
. . . . . . . . . . 11
⊢ (y =
B → (y ∈ S
↔ B ∈ S)) |
| 6 | 5 | anbi2d 468 |
. . . . . . . . . 10
⊢ (y =
B → ((A ∈ R ∧
y ∈ S) ↔ (A
∈ R ∧ B ∈ S))) |
| 7 | | oprabvalig.2 |
. . . . . . . . . 10
⊢ (y =
B → (ψ ↔ χ)) |
| 8 | 6, 7 | anbi12d 476 |
. . . . . . . . 9
⊢ (y =
B → (((A ∈ R ∧
y ∈ S) ∧ ψ)
↔ ((A ∈ R ∧ B ∈
S) ∧ χ))) |
| 9 | | oprabvalig.3 |
. . . . . . . . . 10
⊢ (z =
C → (χ ↔ θ)) |
| 10 | 9 | anbi2d 468 |
. . . . . . . . 9
⊢ (z =
C → (((A ∈ R ∧
B ∈ S) ∧ χ)
↔ ((A ∈ R ∧ B ∈
S) ∧ θ))) |
| 11 | 4, 8, 10 | eloprabg 3035 |
. . . . . . . 8
⊢ ((A
∈ R ∧ B ∈ S ∧
C ∈ D) → (〈〈A, B〉,
C〉 ∈ {〈〈x, y〉,
z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}
↔ ((A ∈ R ∧ B ∈
S) ∧ θ))) |
| 12 | 11 | biimpar 325 |
. . . . . . 7
⊢ (((A
∈ R ∧ B ∈ S ∧
C ∈ D) ∧ ((A
∈ R ∧ B ∈ S)
∧ θ)) → 〈〈A, B〉,
C〉 ∈ {〈〈x, y〉,
z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}) |
| 13 | 12 | exp32 294 |
. . . . . 6
⊢ ((A
∈ R ∧ B ∈ S ∧
C ∈ D) → ((A
∈ R ∧ B ∈ S)
→ (θ → 〈〈A, B〉,
C〉 ∈ {〈〈x, y〉,
z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}))) |
| 14 | 13 | com12 13 |
. . . . 5
⊢ ((A
∈ R ∧ B ∈ S)
→ ((A ∈ R ∧ B ∈
S ∧ C ∈ D)
→ (θ → 〈〈A, B〉,
C〉 ∈ {〈〈x, y〉,
z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}))) |
| 15 | 14 | 3adant3 599 |
. . . 4
⊢ ((A
∈ R ∧ B ∈ S ∧
C ∈ D) → ((A
∈ R ∧ B ∈ S ∧
C ∈ D) → (θ → 〈〈A, B〉,
C〉 ∈ {〈〈x, y〉,
z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}))) |
| 16 | 15 | pm2.43i 58 |
. . 3
⊢ ((A
∈ R ∧ B ∈ S ∧
C ∈ D) → (θ → 〈〈A, B〉,
C〉 ∈ {〈〈x, y〉,
z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)})) |
| 17 | | oprabvalig.4 |
. . . . . . . 8
⊢ ((x
∈ R ∧ y ∈ S)
→ ∃*zφ) |
| 18 | | moanimv 1052 |
. . . . . . . 8
⊢ (∃*z((x ∈
R ∧ y ∈ S)
∧ φ) ↔ ((x ∈ R ∧
y ∈ S) → ∃*zφ)) |
| 19 | 17, 18 | mpbir 165 |
. . . . . . 7
⊢ ∃*z((x ∈
R ∧ y ∈ S)
∧ φ) |
| 20 | 19 | funoprab 3037 |
. . . . . 6
⊢ Fun {〈〈x, y〉,
z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)} |
| 21 | | funopfvg 2854 |
. . . . . 6
⊢ ((C
∈ D ∧ Fun {〈〈x, y〉,
z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}) → (〈〈A, B〉,
C〉 ∈ {〈〈x, y〉,
z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}
→ ({〈〈x, y〉, z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}
‘〈A, B〉) = C)) |
| 22 | 20, 21 | mpan2 519 |
. . . . 5
⊢ (C
∈ D → (〈〈A, B〉,
C〉 ∈ {〈〈x, y〉,
z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}
→ ({〈〈x, y〉, z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}
‘〈A, B〉) = C)) |
| 23 | 22 | adantl 305 |
. . . 4
⊢ ((B
∈ S ∧ C ∈ D)
→ (〈〈A, B〉, C〉
∈ {〈〈x, y〉, z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}
→ ({〈〈x, y〉, z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}
‘〈A, B〉) = C)) |
| 24 | 23 | 3adant1 597 |
. . 3
⊢ ((A
∈ R ∧ B ∈ S ∧
C ∈ D) → (〈〈A, B〉,
C〉 ∈ {〈〈x, y〉,
z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}
→ ({〈〈x, y〉, z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}
‘〈A, B〉) = C)) |
| 25 | 16, 24 | syld 27 |
. 2
⊢ ((A
∈ R ∧ B ∈ S ∧
C ∈ D) → (θ → ({〈〈x, y〉,
z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}
‘〈A, B〉) = C)) |
| 26 | | df-opr 3003 |
. . . 4
⊢ (AFB) = (F
‘〈A, B〉) |
| 27 | | oprabvalig.5 |
. . . . 5
⊢ F =
{〈〈x, y〉, z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)} |
| 28 | 27 | fveq1i 2833 |
. . . 4
⊢ (F
‘〈A, B〉) = ({〈〈x, y〉,
z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}
‘〈A, B〉) |
| 29 | 26, 28 | eqtr 1119 |
. . 3
⊢ (AFB) = ({〈〈x, y〉,
z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}
‘〈A, B〉) |
| 30 | 29 | cleq1i 1108 |
. 2
⊢ ((AFB) = C ↔
({〈〈x, y〉, z〉∣((x ∈ R ∧
y ∈ S) ∧ φ)}
‘〈A, B〉) = C) |
| 31 | 25, 30 | syl6ibr 186 |
1
⊢ ((A
∈ R ∧ B ∈ S ∧
C ∈ D) → (θ → (AFB) = C)) |