ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  ovi3 Structured version   GIF version

Theorem ovi3 5551
Description: The value of an operation class abstraction. Special case. (Contributed by NM, 28-May-1995.) (Revised by Mario Carneiro, 29-Dec-2014.)
Hypotheses
Ref Expression
ovi3.1 (((A 𝐻 B 𝐻) (𝐶 𝐻 𝐷 𝐻)) → 𝑆 (𝐻 × 𝐻))
ovi3.2 (((w = A v = B) (u = 𝐶 f = 𝐷)) → 𝑅 = 𝑆)
ovi3.3 𝐹 = {⟨⟨x, y⟩, z⟩ ∣ ((x (𝐻 × 𝐻) y (𝐻 × 𝐻)) wvuf((x = ⟨w, v y = ⟨u, f⟩) z = 𝑅))}
Assertion
Ref Expression
ovi3 (((A 𝐻 B 𝐻) (𝐶 𝐻 𝐷 𝐻)) → (⟨A, B𝐹𝐶, 𝐷⟩) = 𝑆)
Distinct variable groups:   u,f,v,w,x,y,z,A   B,f,u,v,w,x,y,z   x,𝑅,y,z   𝐶,f,u,v,w,y,z   𝐷,f,u,v,w,y,z   f,𝐻,u,v,w,x,y,z   𝑆,f,u,v,w,z
Allowed substitution hints:   𝐶(x)   𝐷(x)   𝑅(w,v,u,f)   𝑆(x,y)   𝐹(x,y,z,w,v,u,f)

Proof of Theorem ovi3
StepHypRef Expression
1 ovi3.1 . . . 4 (((A 𝐻 B 𝐻) (𝐶 𝐻 𝐷 𝐻)) → 𝑆 (𝐻 × 𝐻))
2 elex 2537 . . . 4 (𝑆 (𝐻 × 𝐻) → 𝑆 V)
31, 2syl 14 . . 3 (((A 𝐻 B 𝐻) (𝐶 𝐻 𝐷 𝐻)) → 𝑆 V)
4 isset 2533 . . 3 (𝑆 V ↔ z z = 𝑆)
53, 4sylib 127 . 2 (((A 𝐻 B 𝐻) (𝐶 𝐻 𝐷 𝐻)) → z z = 𝑆)
6 nfv 1397 . . 3 z((A 𝐻 B 𝐻) (𝐶 𝐻 𝐷 𝐻))
7 nfcv 2154 . . . . 5 zA, B
8 ovi3.3 . . . . . 6 𝐹 = {⟨⟨x, y⟩, z⟩ ∣ ((x (𝐻 × 𝐻) y (𝐻 × 𝐻)) wvuf((x = ⟨w, v y = ⟨u, f⟩) z = 𝑅))}
9 nfoprab3 5470 . . . . . 6 z{⟨⟨x, y⟩, z⟩ ∣ ((x (𝐻 × 𝐻) y (𝐻 × 𝐻)) wvuf((x = ⟨w, v y = ⟨u, f⟩) z = 𝑅))}
108, 9nfcxfr 2151 . . . . 5 z𝐹
11 nfcv 2154 . . . . 5 z𝐶, 𝐷
127, 10, 11nfov 5450 . . . 4 z(⟨A, B𝐹𝐶, 𝐷⟩)
1312nfeq1 2163 . . 3 z(⟨A, B𝐹𝐶, 𝐷⟩) = 𝑆
14 ovi3.2 . . . . . . 7 (((w = A v = B) (u = 𝐶 f = 𝐷)) → 𝑅 = 𝑆)
1514eqeq2d 2027 . . . . . 6 (((w = A v = B) (u = 𝐶 f = 𝐷)) → (z = 𝑅z = 𝑆))
1615copsex4g 3950 . . . . 5 (((A 𝐻 B 𝐻) (𝐶 𝐻 𝐷 𝐻)) → (wvuf((⟨A, B⟩ = ⟨w, v𝐶, 𝐷⟩ = ⟨u, f⟩) z = 𝑅) ↔ z = 𝑆))
17 opelxpi 4294 . . . . . 6 ((A 𝐻 B 𝐻) → ⟨A, B (𝐻 × 𝐻))
18 opelxpi 4294 . . . . . 6 ((𝐶 𝐻 𝐷 𝐻) → ⟨𝐶, 𝐷 (𝐻 × 𝐻))
19 nfcv 2154 . . . . . . 7 xA, B
20 nfcv 2154 . . . . . . 7 yA, B
21 nfcv 2154 . . . . . . 7 y𝐶, 𝐷
22 nfv 1397 . . . . . . . 8 xwvuf((⟨A, B⟩ = ⟨w, v y = ⟨u, f⟩) z = 𝑅)
23 nfoprab1 5468 . . . . . . . . . . 11 x{⟨⟨x, y⟩, z⟩ ∣ ((x (𝐻 × 𝐻) y (𝐻 × 𝐻)) wvuf((x = ⟨w, v y = ⟨u, f⟩) z = 𝑅))}
248, 23nfcxfr 2151 . . . . . . . . . 10 x𝐹
25 nfcv 2154 . . . . . . . . . 10 xy
2619, 24, 25nfov 5450 . . . . . . . . 9 x(⟨A, B𝐹y)
2726nfeq1 2163 . . . . . . . 8 x(⟨A, B𝐹y) = z
2822, 27nfim 1440 . . . . . . 7 x(wvuf((⟨A, B⟩ = ⟨w, v y = ⟨u, f⟩) z = 𝑅) → (⟨A, B𝐹y) = z)
29 nfv 1397 . . . . . . . 8 ywvuf((⟨A, B⟩ = ⟨w, v𝐶, 𝐷⟩ = ⟨u, f⟩) z = 𝑅)
30 nfoprab2 5469 . . . . . . . . . . 11 y{⟨⟨x, y⟩, z⟩ ∣ ((x (𝐻 × 𝐻) y (𝐻 × 𝐻)) wvuf((x = ⟨w, v y = ⟨u, f⟩) z = 𝑅))}
318, 30nfcxfr 2151 . . . . . . . . . 10 y𝐹
3220, 31, 21nfov 5450 . . . . . . . . 9 y(⟨A, B𝐹𝐶, 𝐷⟩)
3332nfeq1 2163 . . . . . . . 8 y(⟨A, B𝐹𝐶, 𝐷⟩) = z
3429, 33nfim 1440 . . . . . . 7 y(wvuf((⟨A, B⟩ = ⟨w, v𝐶, 𝐷⟩ = ⟨u, f⟩) z = 𝑅) → (⟨A, B𝐹𝐶, 𝐷⟩) = z)
35 eqeq1 2022 . . . . . . . . . . 11 (x = ⟨A, B⟩ → (x = ⟨w, v⟩ ↔ ⟨A, B⟩ = ⟨w, v⟩))
3635anbi1d 438 . . . . . . . . . 10 (x = ⟨A, B⟩ → ((x = ⟨w, v y = ⟨u, f⟩) ↔ (⟨A, B⟩ = ⟨w, v y = ⟨u, f⟩)))
3736anbi1d 438 . . . . . . . . 9 (x = ⟨A, B⟩ → (((x = ⟨w, v y = ⟨u, f⟩) z = 𝑅) ↔ ((⟨A, B⟩ = ⟨w, v y = ⟨u, f⟩) z = 𝑅)))
38374exbidv 1726 . . . . . . . 8 (x = ⟨A, B⟩ → (wvuf((x = ⟨w, v y = ⟨u, f⟩) z = 𝑅) ↔ wvuf((⟨A, B⟩ = ⟨w, v y = ⟨u, f⟩) z = 𝑅)))
39 oveq1 5434 . . . . . . . . 9 (x = ⟨A, B⟩ → (x𝐹y) = (⟨A, B𝐹y))
4039eqeq1d 2024 . . . . . . . 8 (x = ⟨A, B⟩ → ((x𝐹y) = z ↔ (⟨A, B𝐹y) = z))
4138, 40imbi12d 223 . . . . . . 7 (x = ⟨A, B⟩ → ((wvuf((x = ⟨w, v y = ⟨u, f⟩) z = 𝑅) → (x𝐹y) = z) ↔ (wvuf((⟨A, B⟩ = ⟨w, v y = ⟨u, f⟩) z = 𝑅) → (⟨A, B𝐹y) = z)))
42 eqeq1 2022 . . . . . . . . . . 11 (y = ⟨𝐶, 𝐷⟩ → (y = ⟨u, f⟩ ↔ ⟨𝐶, 𝐷⟩ = ⟨u, f⟩))
4342anbi2d 437 . . . . . . . . . 10 (y = ⟨𝐶, 𝐷⟩ → ((⟨A, B⟩ = ⟨w, v y = ⟨u, f⟩) ↔ (⟨A, B⟩ = ⟨w, v𝐶, 𝐷⟩ = ⟨u, f⟩)))
4443anbi1d 438 . . . . . . . . 9 (y = ⟨𝐶, 𝐷⟩ → (((⟨A, B⟩ = ⟨w, v y = ⟨u, f⟩) z = 𝑅) ↔ ((⟨A, B⟩ = ⟨w, v𝐶, 𝐷⟩ = ⟨u, f⟩) z = 𝑅)))
45444exbidv 1726 . . . . . . . 8 (y = ⟨𝐶, 𝐷⟩ → (wvuf((⟨A, B⟩ = ⟨w, v y = ⟨u, f⟩) z = 𝑅) ↔ wvuf((⟨A, B⟩ = ⟨w, v𝐶, 𝐷⟩ = ⟨u, f⟩) z = 𝑅)))
46 oveq2 5435 . . . . . . . . 9 (y = ⟨𝐶, 𝐷⟩ → (⟨A, B𝐹y) = (⟨A, B𝐹𝐶, 𝐷⟩))
4746eqeq1d 2024 . . . . . . . 8 (y = ⟨𝐶, 𝐷⟩ → ((⟨A, B𝐹y) = z ↔ (⟨A, B𝐹𝐶, 𝐷⟩) = z))
4845, 47imbi12d 223 . . . . . . 7 (y = ⟨𝐶, 𝐷⟩ → ((wvuf((⟨A, B⟩ = ⟨w, v y = ⟨u, f⟩) z = 𝑅) → (⟨A, B𝐹y) = z) ↔ (wvuf((⟨A, B⟩ = ⟨w, v𝐶, 𝐷⟩ = ⟨u, f⟩) z = 𝑅) → (⟨A, B𝐹𝐶, 𝐷⟩) = z)))
49 moeq 2687 . . . . . . . . . . . 12 ∃*z z = 𝑅
5049mosubop 4324 . . . . . . . . . . 11 ∃*zuf(y = ⟨u, f z = 𝑅)
5150mosubop 4324 . . . . . . . . . 10 ∃*zwv(x = ⟨w, v uf(y = ⟨u, f z = 𝑅))
52 anass 381 . . . . . . . . . . . . . 14 (((x = ⟨w, v y = ⟨u, f⟩) z = 𝑅) ↔ (x = ⟨w, v (y = ⟨u, f z = 𝑅)))
53522exbii 1473 . . . . . . . . . . . . 13 (uf((x = ⟨w, v y = ⟨u, f⟩) z = 𝑅) ↔ uf(x = ⟨w, v (y = ⟨u, f z = 𝑅)))
54 19.42vv 1764 . . . . . . . . . . . . 13 (uf(x = ⟨w, v (y = ⟨u, f z = 𝑅)) ↔ (x = ⟨w, v uf(y = ⟨u, f z = 𝑅)))
5553, 54bitri 173 . . . . . . . . . . . 12 (uf((x = ⟨w, v y = ⟨u, f⟩) z = 𝑅) ↔ (x = ⟨w, v uf(y = ⟨u, f z = 𝑅)))
56552exbii 1473 . . . . . . . . . . 11 (wvuf((x = ⟨w, v y = ⟨u, f⟩) z = 𝑅) ↔ wv(x = ⟨w, v uf(y = ⟨u, f z = 𝑅)))
5756mobii 1913 . . . . . . . . . 10 (∃*zwvuf((x = ⟨w, v y = ⟨u, f⟩) z = 𝑅) ↔ ∃*zwv(x = ⟨w, v uf(y = ⟨u, f z = 𝑅)))
5851, 57mpbir 134 . . . . . . . . 9 ∃*zwvuf((x = ⟨w, v y = ⟨u, f⟩) z = 𝑅)
5958a1i 9 . . . . . . . 8 ((x (𝐻 × 𝐻) y (𝐻 × 𝐻)) → ∃*zwvuf((x = ⟨w, v y = ⟨u, f⟩) z = 𝑅))
6059, 8ovidi 5533 . . . . . . 7 ((x (𝐻 × 𝐻) y (𝐻 × 𝐻)) → (wvuf((x = ⟨w, v y = ⟨u, f⟩) z = 𝑅) → (x𝐹y) = z))
6119, 20, 21, 28, 34, 41, 48, 60vtocl2gaf 2591 . . . . . 6 ((⟨A, B (𝐻 × 𝐻) 𝐶, 𝐷 (𝐻 × 𝐻)) → (wvuf((⟨A, B⟩ = ⟨w, v𝐶, 𝐷⟩ = ⟨u, f⟩) z = 𝑅) → (⟨A, B𝐹𝐶, 𝐷⟩) = z))
6217, 18, 61syl2an 273 . . . . 5 (((A 𝐻 B 𝐻) (𝐶 𝐻 𝐷 𝐻)) → (wvuf((⟨A, B⟩ = ⟨w, v𝐶, 𝐷⟩ = ⟨u, f⟩) z = 𝑅) → (⟨A, B𝐹𝐶, 𝐷⟩) = z))
6316, 62sylbird 159 . . . 4 (((A 𝐻 B 𝐻) (𝐶 𝐻 𝐷 𝐻)) → (z = 𝑆 → (⟨A, B𝐹𝐶, 𝐷⟩) = z))
64 eqeq2 2025 . . . 4 (z = 𝑆 → ((⟨A, B𝐹𝐶, 𝐷⟩) = z ↔ (⟨A, B𝐹𝐶, 𝐷⟩) = 𝑆))
6563, 64mpbidi 140 . . 3 (((A 𝐻 B 𝐻) (𝐶 𝐻 𝐷 𝐻)) → (z = 𝑆 → (⟨A, B𝐹𝐶, 𝐷⟩) = 𝑆))
666, 13, 65exlimd 1464 . 2 (((A 𝐻 B 𝐻) (𝐶 𝐻 𝐷 𝐻)) → (z z = 𝑆 → (⟨A, B𝐹𝐶, 𝐷⟩) = 𝑆))
675, 66mpd 13 1 (((A 𝐻 B 𝐻) (𝐶 𝐻 𝐷 𝐻)) → (⟨A, B𝐹𝐶, 𝐷⟩) = 𝑆)
Colors of variables: wff set class
Syntax hints:  wi 4   wa 97   = wceq 1226  wex 1357   wcel 1369  ∃*wmo 1877  Vcvv 2529  cop 3345   × cxp 4261  (class class class)co 5427  {coprab 5428
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 99  ax-ia2 100  ax-ia3 101  ax-in1 529  ax-in2 530  ax-io 614  ax-5 1312  ax-7 1313  ax-gen 1314  ax-ie1 1358  ax-ie2 1359  ax-8 1371  ax-10 1372  ax-11 1373  ax-i12 1374  ax-bnd 1375  ax-4 1376  ax-14 1381  ax-17 1395  ax-i9 1399  ax-ial 1403  ax-i5r 1404  ax-ext 1998  ax-sep 3841  ax-pow 3893  ax-pr 3910  ax-setind 4195
This theorem depends on definitions:  df-bi 110  df-3an 871  df-tru 1229  df-fal 1232  df-nf 1326  df-sb 1622  df-eu 1879  df-mo 1880  df-clab 2003  df-cleq 2009  df-clel 2012  df-nfc 2143  df-ne 2182  df-ral 2283  df-rex 2284  df-v 2531  df-sbc 2736  df-dif 2891  df-un 2893  df-in 2895  df-ss 2902  df-pw 3328  df-sn 3348  df-pr 3349  df-op 3351  df-uni 3547  df-br 3731  df-opab 3785  df-id 3996  df-xp 4269  df-rel 4270  df-cnv 4271  df-co 4272  df-dm 4273  df-iota 4785  df-fun 4822  df-fv 4828  df-ov 5430  df-oprab 5431
This theorem is referenced by:  oviec  6114  addcnsr  6543  mulcnsr  6544
  Copyright terms: Public domain W3C validator