Metamath Proof Explorer


Theorem ov

Description: The value of an operation class abstraction. (Contributed by NM, 16-May-1995) (Revised by David Abernethy, 19-Jun-2012)

Ref Expression
Hypotheses ov.1 C V
ov.2 x = A φ ψ
ov.3 y = B ψ χ
ov.4 z = C χ θ
ov.5 x R y S ∃! z φ
ov.6 F = x y z | x R y S φ
Assertion ov A R B S A F B = C θ

Proof

Step Hyp Ref Expression
1 ov.1 C V
2 ov.2 x = A φ ψ
3 ov.3 y = B ψ χ
4 ov.4 z = C χ θ
5 ov.5 x R y S ∃! z φ
6 ov.6 F = x y z | x R y S φ
7 df-ov A F B = F A B
8 6 fveq1i F A B = x y z | x R y S φ A B
9 7 8 eqtri A F B = x y z | x R y S φ A B
10 9 eqeq1i A F B = C x y z | x R y S φ A B = C
11 5 fnoprab x y z | x R y S φ Fn x y | x R y S
12 eleq1 x = A x R A R
13 12 anbi1d x = A x R y S A R y S
14 eleq1 y = B y S B S
15 14 anbi2d y = B A R y S A R B S
16 13 15 opelopabg A R B S A B x y | x R y S A R B S
17 16 ibir A R B S A B x y | x R y S
18 fnopfvb x y z | x R y S φ Fn x y | x R y S A B x y | x R y S x y z | x R y S φ A B = C A B C x y z | x R y S φ
19 11 17 18 sylancr A R B S x y z | x R y S φ A B = C A B C x y z | x R y S φ
20 13 2 anbi12d x = A x R y S φ A R y S ψ
21 15 3 anbi12d y = B A R y S ψ A R B S χ
22 4 anbi2d z = C A R B S χ A R B S θ
23 20 21 22 eloprabg A R B S C V A B C x y z | x R y S φ A R B S θ
24 1 23 mp3an3 A R B S A B C x y z | x R y S φ A R B S θ
25 19 24 bitrd A R B S x y z | x R y S φ A B = C A R B S θ
26 10 25 bitrid A R B S A F B = C A R B S θ
27 26 bianabs A R B S A F B = C θ