ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  caoftrn Unicode version

Theorem caoftrn 6107
Description: Transfer a transitivity law to the function relation. (Contributed by Mario Carneiro, 28-Jul-2014.)
Hypotheses
Ref Expression
caofref.1  |-  ( ph  ->  A  e.  V )
caofref.2  |-  ( ph  ->  F : A --> S )
caofcom.3  |-  ( ph  ->  G : A --> S )
caofass.4  |-  ( ph  ->  H : A --> S )
caoftrn.5  |-  ( (
ph  /\  ( x  e.  S  /\  y  e.  S  /\  z  e.  S ) )  -> 
( ( x R y  /\  y T z )  ->  x U z ) )
Assertion
Ref Expression
caoftrn  |-  ( ph  ->  ( ( F  oR R G  /\  G  oR T H )  ->  F  oR U H ) )
Distinct variable groups:    x, y, z, F    x, G, y, z    x, H, y, z    ph, x, y, z   
x, R, y, z   
x, S, y, z   
x, T, y, z   
x, U, y, z
Allowed substitution hints:    A( x, y, z)    V( x, y, z)

Proof of Theorem caoftrn
Dummy variable  w is distinct from all other variables.
StepHypRef Expression
1 caoftrn.5 . . . . . 6  |-  ( (
ph  /\  ( x  e.  S  /\  y  e.  S  /\  z  e.  S ) )  -> 
( ( x R y  /\  y T z )  ->  x U z ) )
21ralrimivvva 2560 . . . . 5  |-  ( ph  ->  A. x  e.  S  A. y  e.  S  A. z  e.  S  ( ( x R y  /\  y T z )  ->  x U z ) )
32adantr 276 . . . 4  |-  ( (
ph  /\  w  e.  A )  ->  A. x  e.  S  A. y  e.  S  A. z  e.  S  ( (
x R y  /\  y T z )  ->  x U z ) )
4 caofref.2 . . . . . 6  |-  ( ph  ->  F : A --> S )
54ffvelcdmda 5651 . . . . 5  |-  ( (
ph  /\  w  e.  A )  ->  ( F `  w )  e.  S )
6 caofcom.3 . . . . . 6  |-  ( ph  ->  G : A --> S )
76ffvelcdmda 5651 . . . . 5  |-  ( (
ph  /\  w  e.  A )  ->  ( G `  w )  e.  S )
8 caofass.4 . . . . . 6  |-  ( ph  ->  H : A --> S )
98ffvelcdmda 5651 . . . . 5  |-  ( (
ph  /\  w  e.  A )  ->  ( H `  w )  e.  S )
10 breq1 4006 . . . . . . . 8  |-  ( x  =  ( F `  w )  ->  (
x R y  <->  ( F `  w ) R y ) )
1110anbi1d 465 . . . . . . 7  |-  ( x  =  ( F `  w )  ->  (
( x R y  /\  y T z )  <->  ( ( F `
 w ) R y  /\  y T z ) ) )
12 breq1 4006 . . . . . . 7  |-  ( x  =  ( F `  w )  ->  (
x U z  <->  ( F `  w ) U z ) )
1311, 12imbi12d 234 . . . . . 6  |-  ( x  =  ( F `  w )  ->  (
( ( x R y  /\  y T z )  ->  x U z )  <->  ( (
( F `  w
) R y  /\  y T z )  -> 
( F `  w
) U z ) ) )
14 breq2 4007 . . . . . . . 8  |-  ( y  =  ( G `  w )  ->  (
( F `  w
) R y  <->  ( F `  w ) R ( G `  w ) ) )
15 breq1 4006 . . . . . . . 8  |-  ( y  =  ( G `  w )  ->  (
y T z  <->  ( G `  w ) T z ) )
1614, 15anbi12d 473 . . . . . . 7  |-  ( y  =  ( G `  w )  ->  (
( ( F `  w ) R y  /\  y T z )  <->  ( ( F `
 w ) R ( G `  w
)  /\  ( G `  w ) T z ) ) )
1716imbi1d 231 . . . . . 6  |-  ( y  =  ( G `  w )  ->  (
( ( ( F `
 w ) R y  /\  y T z )  ->  ( F `  w ) U z )  <->  ( (
( F `  w
) R ( G `
 w )  /\  ( G `  w ) T z )  -> 
( F `  w
) U z ) ) )
18 breq2 4007 . . . . . . . 8  |-  ( z  =  ( H `  w )  ->  (
( G `  w
) T z  <->  ( G `  w ) T ( H `  w ) ) )
1918anbi2d 464 . . . . . . 7  |-  ( z  =  ( H `  w )  ->  (
( ( F `  w ) R ( G `  w )  /\  ( G `  w ) T z )  <->  ( ( F `
 w ) R ( G `  w
)  /\  ( G `  w ) T ( H `  w ) ) ) )
20 breq2 4007 . . . . . . 7  |-  ( z  =  ( H `  w )  ->  (
( F `  w
) U z  <->  ( F `  w ) U ( H `  w ) ) )
2119, 20imbi12d 234 . . . . . 6  |-  ( z  =  ( H `  w )  ->  (
( ( ( F `
 w ) R ( G `  w
)  /\  ( G `  w ) T z )  ->  ( F `  w ) U z )  <->  ( ( ( F `  w ) R ( G `  w )  /\  ( G `  w ) T ( H `  w ) )  -> 
( F `  w
) U ( H `
 w ) ) ) )
2213, 17, 21rspc3v 2857 . . . . 5  |-  ( ( ( F `  w
)  e.  S  /\  ( G `  w )  e.  S  /\  ( H `  w )  e.  S )  ->  ( A. x  e.  S  A. y  e.  S  A. z  e.  S  ( ( x R y  /\  y T z )  ->  x U z )  -> 
( ( ( F `
 w ) R ( G `  w
)  /\  ( G `  w ) T ( H `  w ) )  ->  ( F `  w ) U ( H `  w ) ) ) )
235, 7, 9, 22syl3anc 1238 . . . 4  |-  ( (
ph  /\  w  e.  A )  ->  ( A. x  e.  S  A. y  e.  S  A. z  e.  S  ( ( x R y  /\  y T z )  ->  x U z )  -> 
( ( ( F `
 w ) R ( G `  w
)  /\  ( G `  w ) T ( H `  w ) )  ->  ( F `  w ) U ( H `  w ) ) ) )
243, 23mpd 13 . . 3  |-  ( (
ph  /\  w  e.  A )  ->  (
( ( F `  w ) R ( G `  w )  /\  ( G `  w ) T ( H `  w ) )  ->  ( F `  w ) U ( H `  w ) ) )
2524ralimdva 2544 . 2  |-  ( ph  ->  ( A. w  e.  A  ( ( F `
 w ) R ( G `  w
)  /\  ( G `  w ) T ( H `  w ) )  ->  A. w  e.  A  ( F `  w ) U ( H `  w ) ) )
26 ffn 5365 . . . . . 6  |-  ( F : A --> S  ->  F  Fn  A )
274, 26syl 14 . . . . 5  |-  ( ph  ->  F  Fn  A )
28 ffn 5365 . . . . . 6  |-  ( G : A --> S  ->  G  Fn  A )
296, 28syl 14 . . . . 5  |-  ( ph  ->  G  Fn  A )
30 caofref.1 . . . . 5  |-  ( ph  ->  A  e.  V )
31 inidm 3344 . . . . 5  |-  ( A  i^i  A )  =  A
32 eqidd 2178 . . . . 5  |-  ( (
ph  /\  w  e.  A )  ->  ( F `  w )  =  ( F `  w ) )
33 eqidd 2178 . . . . 5  |-  ( (
ph  /\  w  e.  A )  ->  ( G `  w )  =  ( G `  w ) )
3427, 29, 30, 30, 31, 32, 33ofrfval 6090 . . . 4  |-  ( ph  ->  ( F  oR R G  <->  A. w  e.  A  ( F `  w ) R ( G `  w ) ) )
35 ffn 5365 . . . . . 6  |-  ( H : A --> S  ->  H  Fn  A )
368, 35syl 14 . . . . 5  |-  ( ph  ->  H  Fn  A )
37 eqidd 2178 . . . . 5  |-  ( (
ph  /\  w  e.  A )  ->  ( H `  w )  =  ( H `  w ) )
3829, 36, 30, 30, 31, 33, 37ofrfval 6090 . . . 4  |-  ( ph  ->  ( G  oR T H  <->  A. w  e.  A  ( G `  w ) T ( H `  w ) ) )
3934, 38anbi12d 473 . . 3  |-  ( ph  ->  ( ( F  oR R G  /\  G  oR T H )  <->  ( A. w  e.  A  ( F `  w ) R ( G `  w )  /\  A. w  e.  A  ( G `  w ) T ( H `  w ) ) ) )
40 r19.26 2603 . . 3  |-  ( A. w  e.  A  (
( F `  w
) R ( G `
 w )  /\  ( G `  w ) T ( H `  w ) )  <->  ( A. w  e.  A  ( F `  w ) R ( G `  w )  /\  A. w  e.  A  ( G `  w ) T ( H `  w ) ) )
4139, 40bitr4di 198 . 2  |-  ( ph  ->  ( ( F  oR R G  /\  G  oR T H )  <->  A. w  e.  A  ( ( F `  w ) R ( G `  w )  /\  ( G `  w ) T ( H `  w ) ) ) )
4227, 36, 30, 30, 31, 32, 37ofrfval 6090 . 2  |-  ( ph  ->  ( F  oR U H  <->  A. w  e.  A  ( F `  w ) U ( H `  w ) ) )
4325, 41, 423imtr4d 203 1  |-  ( ph  ->  ( ( F  oR R G  /\  G  oR T H )  ->  F  oR U H ) )
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 104    /\ w3a 978    = wceq 1353    e. wcel 2148   A.wral 2455   class class class wbr 4003    Fn wfn 5211   -->wf 5212   ` cfv 5216    oRcofr 6081
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-io 709  ax-5 1447  ax-7 1448  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-8 1504  ax-10 1505  ax-11 1506  ax-i12 1507  ax-bndl 1509  ax-4 1510  ax-17 1526  ax-i9 1530  ax-ial 1534  ax-i5r 1535  ax-14 2151  ax-ext 2159  ax-coll 4118  ax-sep 4121  ax-pow 4174  ax-pr 4209
This theorem depends on definitions:  df-bi 117  df-3an 980  df-tru 1356  df-nf 1461  df-sb 1763  df-eu 2029  df-mo 2030  df-clab 2164  df-cleq 2170  df-clel 2173  df-nfc 2308  df-ral 2460  df-rex 2461  df-reu 2462  df-rab 2464  df-v 2739  df-sbc 2963  df-csb 3058  df-un 3133  df-in 3135  df-ss 3142  df-pw 3577  df-sn 3598  df-pr 3599  df-op 3601  df-uni 3810  df-iun 3888  df-br 4004  df-opab 4065  df-mpt 4066  df-id 4293  df-xp 4632  df-rel 4633  df-cnv 4634  df-co 4635  df-dm 4636  df-rn 4637  df-res 4638  df-ima 4639  df-iota 5178  df-fun 5218  df-fn 5219  df-f 5220  df-f1 5221  df-fo 5222  df-f1o 5223  df-fv 5224  df-ofr 6083
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator