HomeHome Metamath Proof Explorer < Previous   Next >
Related theorems
GIF version

Theorem oprabval 3047
Description: The value of an operation abstraction.
Hypotheses
Ref Expression
oprabval.1 CV
oprabval.2 (x = A → (φψ))
oprabval.3 (y = B → (ψχ))
oprabval.4 (z = C → (χθ))
oprabval.5 ((xRyS) → ∃!zφ)
oprabval.6 F = {⟨⟨x, y⟩, z⟩∣((xRyS) ∧ φ)}
Assertion
Ref Expression
oprabval ((ARBS) → ((AFB) = Cθ))
Distinct variable group(s):   x,y,z,A   x,B,y,z   x,C,y,z   x,R,y,z   x,S,y,z   ψ,x   χ,x,y   θ,x,y,z

Proof of Theorem oprabval
StepHypRef Expression
1 eleq1 1149 . . . . . . . . 9 (x = A → (xRAR))
21anbi1d 469 . . . . . . . 8 (x = A → ((xRyS) ↔ (ARyS)))
3 eleq1 1149 . . . . . . . . 9 (y = B → (ySBS))
43anbi2d 468 . . . . . . . 8 (y = B → ((ARyS) ↔ (ARBS)))
52, 4opelopabg 2115 . . . . . . 7 ((ARBS) → (⟨A, B⟩ ∈ {⟨x, y⟩∣(xRyS)} ↔ (ARBS)))
65biimprd 136 . . . . . 6 ((ARBS) → ((ARBS) → ⟨A, B⟩ ∈ {⟨x, y⟩∣(xRyS)}))
76pm2.43i 58 . . . . 5 ((ARBS) → ⟨A, B⟩ ∈ {⟨x, y⟩∣(xRyS)})
8 oprabval.5 . . . . . . 7 ((xRyS) → ∃!zφ)
98fnoprab 3038 . . . . . 6 {⟨⟨x, y⟩, z⟩∣((xRyS) ∧ φ)} Fn {⟨x, y⟩∣(xRyS)}
10 oprabval.1 . . . . . . 7 CV
1110fnfvop 2856 . . . . . 6 (({⟨⟨x, y⟩, z⟩∣((xRyS) ∧ φ)} Fn {⟨x, y⟩∣(xRyS)} ∧ ⟨A, B⟩ ∈ {⟨x, y⟩∣(xRyS)}) → (({⟨⟨x, y⟩, z⟩∣((xRyS) ∧ φ)} ‘⟨A, B⟩) = C ↔ ⟨⟨A, B⟩, C⟩ ∈ {⟨⟨x, y⟩, z⟩∣((xRyS) ∧ φ)}))
129, 11mpan 518 . . . . 5 (⟨A, B⟩ ∈ {⟨x, y⟩∣(xRyS)} → (({⟨⟨x, y⟩, z⟩∣((xRyS) ∧ φ)} ‘⟨A, B⟩) = C ↔ ⟨⟨A, B⟩, C⟩ ∈ {⟨⟨x, y⟩, z⟩∣((xRyS) ∧ φ)}))
137, 12syl 12 . . . 4 ((ARBS) → (({⟨⟨x, y⟩, z⟩∣((xRyS) ∧ φ)} ‘⟨A, B⟩) = C ↔ ⟨⟨A, B⟩, C⟩ ∈ {⟨⟨x, y⟩, z⟩∣((xRyS) ∧ φ)}))
14 oprabval.2 . . . . . . 7 (x = A → (φψ))
152, 14anbi12d 476 . . . . . 6 (x = A → (((xRyS) ∧ φ) ↔ ((ARyS) ∧ ψ)))
16 oprabval.3 . . . . . . 7 (y = B → (ψχ))
174, 16anbi12d 476 . . . . . 6 (y = B → (((ARyS) ∧ ψ) ↔ ((ARBS) ∧ χ)))
18 oprabval.4 . . . . . . 7 (z = C → (χθ))
1918anbi2d 468 . . . . . 6 (z = C → (((ARBS) ∧ χ) ↔ ((ARBS) ∧ θ)))
2015, 17, 19eloprabg 3035 . . . . 5 ((ARBSCV) → (⟨⟨A, B⟩, C⟩ ∈ {⟨⟨x, y⟩, z⟩∣((xRyS) ∧ φ)} ↔ ((ARBS) ∧ θ)))
2110, 20mp3an3 641 . . . 4 ((ARBS) → (⟨⟨A, B⟩, C⟩ ∈ {⟨⟨x, y⟩, z⟩∣((xRyS) ∧ φ)} ↔ ((ARBS) ∧ θ)))
2213, 21bitrd 406 . . 3 ((ARBS) → (({⟨⟨x, y⟩, z⟩∣((xRyS) ∧ φ)} ‘⟨A, B⟩) = C ↔ ((ARBS) ∧ θ)))
23 df-opr 3003 . . . . 5 (AFB) = (F ‘⟨A, B⟩)
24 oprabval.6 . . . . . 6 F = {⟨⟨x, y⟩, z⟩∣((xRyS) ∧ φ)}
2524fveq1i 2833 . . . . 5 (F ‘⟨A, B⟩) = ({⟨⟨x, y⟩, z⟩∣((xRyS) ∧ φ)} ‘⟨A, B⟩)
2623, 25eqtr 1119 . . . 4 (AFB) = ({⟨⟨x, y⟩, z⟩∣((xRyS) ∧ φ)} ‘⟨A, B⟩)
2726cleq1i 1108 . . 3 ((AFB) = C ↔ ({⟨⟨x, y⟩, z⟩∣((xRyS) ∧ φ)} ‘⟨A, B⟩) = C)
2822, 27syl5bb 410 . 2 ((ARBS) → ((AFB) = C ↔ ((ARBS) ∧ θ)))
29 ibar 487 . 2 ((ARBS) → (θ ↔ ((ARBS) ∧ θ)))
3028, 29bitr4d 409 1 ((ARBS) → ((AFB) = Cθ))
Colors of variables: wff set class
Syntax hints:   → wi 2   ↔ wb 127   ∧ wa 196  ∃!weu 1007   = wceq 1091   ∈ wcel 1092  Vcvv 1348  ⟨cop 1810  {copab 2055   Fn wfn 2417   ‘cfv 2422  (class class class)co 3001  {copab2 3002
This theorem was proved from axioms:  ax-1 3  ax-2 4  ax-3 5  ax-mp 6  ax-4 673  ax-5 674  ax-6 675  ax-7 676  ax-gen 677  ax-8 798  ax-9 799  ax-10 800  ax-11 801  ax-12 802  ax-13 804  ax-14 805  ax-16 922  ax-17 925  ax-ext 1074  ax-rep 1075  ax-pow 1077
This theorem depends on definitions:  df-bi 128  df-or 197  df-an 198  df-3an 583  df-ex 679  df-sb 853  df-eu 1009  df-mo 1010  df-clab 1093  df-cleq 1097  df-clel 1099  df-rex 1206  df-v 1349  df-dif 1489  df-un 1490  df-in 1491  df-ss 1492  df-nul 1708  df-pw 1799  df-sn 1811  df-pr 1812  df-op 1815  df-uni 1920  df-br 2063  df-opab 2098  df-id 2125  df-xp 2424  df-rel 2425  df-cnv 2426  df-co 2427  df-dm 2428  df-rn 2429  df-res 2430  df-ima 2431  df-fun 2432  df-fn 2433  df-fv 2438  df-opr 3003  df-oprab 3004
metamath.org