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

Theorem ccatass 11398
Description: Associative law for concatenation of words. (Contributed by Stefan O'Rear, 15-Aug-2015.)
Assertion
Ref Expression
ccatass  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
( S ++  T ) ++  U )  =  ( S ++  ( T ++  U
) ) )

Proof of Theorem ccatass
Dummy variable  x is distinct from all other variables.
StepHypRef Expression
1 ccatcl 11383 . . . . 5  |-  ( ( S  e. Word  B  /\  T  e. Word  B )  ->  ( S ++  T )  e. Word  B )
2 ccatcl 11383 . . . . 5  |-  ( ( ( S ++  T )  e. Word  B  /\  U  e. Word  B )  ->  (
( S ++  T ) ++  U )  e. Word  B
)
31, 2stoic3 1480 . . . 4  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
( S ++  T ) ++  U )  e. Word  B
)
4 wrdfn 11341 . . . 4  |-  ( ( ( S ++  T ) ++  U )  e. Word  B  ->  ( ( S ++  T
) ++  U )  Fn  ( 0..^ (♯ `  (
( S ++  T ) ++  U ) ) ) )
53, 4syl 14 . . 3  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
( S ++  T ) ++  U )  Fn  (
0..^ (♯ `  ( ( S ++  T ) ++  U ) ) ) )
6 ccatlen 11385 . . . . . . 7  |-  ( ( ( S ++  T )  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  ( ( S ++  T
) ++  U ) )  =  ( (♯ `  ( S ++  T ) )  +  (♯ `  U )
) )
71, 6stoic3 1480 . . . . . 6  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  ( ( S ++  T
) ++  U ) )  =  ( (♯ `  ( S ++  T ) )  +  (♯ `  U )
) )
8 ccatlen 11385 . . . . . . . 8  |-  ( ( S  e. Word  B  /\  T  e. Word  B )  ->  (♯ `  ( S ++  T ) )  =  ( (♯ `  S
)  +  (♯ `  T
) ) )
983adant3 1048 . . . . . . 7  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  ( S ++  T ) )  =  ( (♯ `  S )  +  (♯ `  T ) ) )
109oveq1d 6103 . . . . . 6  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
(♯ `  ( S ++  T
) )  +  (♯ `  U ) )  =  ( ( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) ) )
117, 10eqtrd 2271 . . . . 5  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  ( ( S ++  T
) ++  U ) )  =  ( ( (♯ `  S )  +  (♯ `  T ) )  +  (♯ `  U )
) )
1211oveq2d 6104 . . . 4  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
0..^ (♯ `  ( ( S ++  T ) ++  U ) ) )  =  ( 0..^ ( ( (♯ `  S )  +  (♯ `  T ) )  +  (♯ `  U )
) ) )
1312fneq2d 5475 . . 3  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
( ( S ++  T
) ++  U )  Fn  ( 0..^ (♯ `  (
( S ++  T ) ++  U ) ) )  <-> 
( ( S ++  T
) ++  U )  Fn  ( 0..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) ) )
145, 13mpbid 147 . 2  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
( S ++  T ) ++  U )  Fn  (
0..^ ( ( (♯ `  S )  +  (♯ `  T ) )  +  (♯ `  U )
) ) )
15 simp1 1028 . . . . 5  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  S  e. Word  B )
16 ccatcl 11383 . . . . . 6  |-  ( ( T  e. Word  B  /\  U  e. Word  B )  ->  ( T ++  U )  e. Word  B )
17163adant1 1046 . . . . 5  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  ( T ++  U )  e. Word  B
)
18 ccatcl 11383 . . . . 5  |-  ( ( S  e. Word  B  /\  ( T ++  U )  e. Word  B )  ->  ( S ++  ( T ++  U ) )  e. Word  B )
1915, 17, 18syl2anc 415 . . . 4  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  ( S ++  ( T ++  U ) )  e. Word  B )
20 wrdfn 11341 . . . 4  |-  ( ( S ++  ( T ++  U
) )  e. Word  B  ->  ( S ++  ( T ++  U ) )  Fn  ( 0..^ (♯ `  ( S ++  ( T ++  U ) ) ) ) )
2119, 20syl 14 . . 3  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  ( S ++  ( T ++  U ) )  Fn  ( 0..^ (♯ `  ( S ++  ( T ++  U )
) ) ) )
22 ccatlen 11385 . . . . . . . 8  |-  ( ( T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  ( T ++  U ) )  =  ( (♯ `  T
)  +  (♯ `  U
) ) )
23223adant1 1046 . . . . . . 7  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  ( T ++  U ) )  =  ( (♯ `  T )  +  (♯ `  U ) ) )
2423oveq2d 6104 . . . . . 6  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
(♯ `  S )  +  (♯ `  ( T ++  U ) ) )  =  ( (♯ `  S
)  +  ( (♯ `  T )  +  (♯ `  U ) ) ) )
25 ccatlen 11385 . . . . . . 7  |-  ( ( S  e. Word  B  /\  ( T ++  U )  e. Word  B )  ->  (♯ `  ( S ++  ( T ++  U ) ) )  =  ( (♯ `  S
)  +  (♯ `  ( T ++  U ) ) ) )
2615, 17, 25syl2anc 415 . . . . . 6  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  ( S ++  ( T ++  U ) ) )  =  ( (♯ `  S
)  +  (♯ `  ( T ++  U ) ) ) )
27 lencl 11330 . . . . . . . . 9  |-  ( S  e. Word  B  ->  (♯ `  S )  e.  NN0 )
28273ad2ant1 1049 . . . . . . . 8  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  S )  e.  NN0 )
2928nn0cnd 9633 . . . . . . 7  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  S )  e.  CC )
30 lencl 11330 . . . . . . . . 9  |-  ( T  e. Word  B  ->  (♯ `  T )  e.  NN0 )
31303ad2ant2 1050 . . . . . . . 8  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  T )  e.  NN0 )
3231nn0cnd 9633 . . . . . . 7  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  T )  e.  CC )
33 lencl 11330 . . . . . . . . 9  |-  ( U  e. Word  B  ->  (♯ `  U )  e.  NN0 )
34333ad2ant3 1051 . . . . . . . 8  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  U )  e.  NN0 )
3534nn0cnd 9633 . . . . . . 7  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  U )  e.  CC )
3629, 32, 35addassd 8354 . . . . . 6  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) )  =  ( (♯ `  S
)  +  ( (♯ `  T )  +  (♯ `  U ) ) ) )
3724, 26, 363eqtr4d 2281 . . . . 5  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  ( S ++  ( T ++  U ) ) )  =  ( ( (♯ `  S )  +  (♯ `  T ) )  +  (♯ `  U )
) )
3837oveq2d 6104 . . . 4  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
0..^ (♯ `  ( S ++  ( T ++  U )
) ) )  =  ( 0..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )
3938fneq2d 5475 . . 3  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
( S ++  ( T ++  U ) )  Fn  ( 0..^ (♯ `  ( S ++  ( T ++  U ) ) ) )  <->  ( S ++  ( T ++  U )
)  Fn  ( 0..^ ( ( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) ) ) ) )
4021, 39mpbid 147 . 2  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  ( S ++  ( T ++  U ) )  Fn  ( 0..^ ( ( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) ) ) )
4128nn0zd 9777 . . . 4  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  S )  e.  ZZ )
42 fzospliti 10602 . . . . 5  |-  ( ( x  e.  ( 0..^ ( ( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) ) )  /\  (♯ `  S
)  e.  ZZ )  ->  ( x  e.  ( 0..^ (♯ `  S
) )  \/  x  e.  ( (♯ `  S
)..^ ( ( (♯ `  S )  +  (♯ `  T ) )  +  (♯ `  U )
) ) ) )
4342ex 115 . . . 4  |-  ( x  e.  ( 0..^ ( ( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) ) )  ->  ( (♯ `  S
)  e.  ZZ  ->  ( x  e.  ( 0..^ (♯ `  S )
)  \/  x  e.  ( (♯ `  S
)..^ ( ( (♯ `  S )  +  (♯ `  T ) )  +  (♯ `  U )
) ) ) ) )
4441, 43mpan9 281 . . 3  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
0..^ ( ( (♯ `  S )  +  (♯ `  T ) )  +  (♯ `  U )
) ) )  -> 
( x  e.  ( 0..^ (♯ `  S
) )  \/  x  e.  ( (♯ `  S
)..^ ( ( (♯ `  S )  +  (♯ `  T ) )  +  (♯ `  U )
) ) ) )
45 simp2 1029 . . . . . 6  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  T  e. Word  B )
46 id 19 . . . . . 6  |-  ( x  e.  ( 0..^ (♯ `  S ) )  ->  x  e.  ( 0..^ (♯ `  S )
) )
47 ccatval1 11387 . . . . . 6  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  x  e.  ( 0..^ (♯ `  S
) ) )  -> 
( ( S ++  T
) `  x )  =  ( S `  x ) )
4815, 45, 46, 47syl2an3an 1339 . . . . 5  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
0..^ (♯ `  S )
) )  ->  (
( S ++  T ) `
 x )  =  ( S `  x
) )
4913adant3 1048 . . . . . . 7  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  ( S ++  T )  e. Word  B
)
5049adantr 276 . . . . . 6  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
0..^ (♯ `  S )
) )  ->  ( S ++  T )  e. Word  B
)
51 simpl3 1033 . . . . . 6  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
0..^ (♯ `  S )
) )  ->  U  e. Word  B )
5241uzidd 9953 . . . . . . . . . 10  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  S )  e.  (
ZZ>= `  (♯ `  S
) ) )
53 uzaddcl 10002 . . . . . . . . . 10  |-  ( ( (♯ `  S )  e.  ( ZZ>= `  (♯ `  S
) )  /\  (♯ `  T )  e.  NN0 )  ->  ( (♯ `  S
)  +  (♯ `  T
) )  e.  (
ZZ>= `  (♯ `  S
) ) )
5452, 31, 53syl2anc 415 . . . . . . . . 9  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
(♯ `  S )  +  (♯ `  T )
)  e.  ( ZZ>= `  (♯ `  S ) ) )
55 fzoss2 10598 . . . . . . . . 9  |-  ( ( (♯ `  S )  +  (♯ `  T )
)  e.  ( ZZ>= `  (♯ `  S ) )  ->  ( 0..^ (♯ `  S ) )  C_  ( 0..^ ( (♯ `  S
)  +  (♯ `  T
) ) ) )
5654, 55syl 14 . . . . . . . 8  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
0..^ (♯ `  S )
)  C_  ( 0..^ ( (♯ `  S
)  +  (♯ `  T
) ) ) )
579oveq2d 6104 . . . . . . . 8  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
0..^ (♯ `  ( S ++  T ) ) )  =  ( 0..^ ( (♯ `  S )  +  (♯ `  T )
) ) )
5856, 57sseqtrrd 3287 . . . . . . 7  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
0..^ (♯ `  S )
)  C_  ( 0..^ (♯ `  ( S ++  T ) ) ) )
5958sselda 3248 . . . . . 6  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
0..^ (♯ `  S )
) )  ->  x  e.  ( 0..^ (♯ `  ( S ++  T ) ) ) )
60 ccatval1 11387 . . . . . 6  |-  ( ( ( S ++  T )  e. Word  B  /\  U  e. Word  B  /\  x  e.  ( 0..^ (♯ `  ( S ++  T ) ) ) )  ->  ( (
( S ++  T ) ++  U ) `  x
)  =  ( ( S ++  T ) `  x ) )
6150, 51, 59, 60syl3anc 1278 . . . . 5  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
0..^ (♯ `  S )
) )  ->  (
( ( S ++  T
) ++  U ) `  x )  =  ( ( S ++  T ) `
 x ) )
62 ccatval1 11387 . . . . . 6  |-  ( ( S  e. Word  B  /\  ( T ++  U )  e. Word  B  /\  x  e.  ( 0..^ (♯ `  S
) ) )  -> 
( ( S ++  ( T ++  U ) ) `  x )  =  ( S `  x ) )
6315, 17, 46, 62syl2an3an 1339 . . . . 5  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
0..^ (♯ `  S )
) )  ->  (
( S ++  ( T ++  U ) ) `  x )  =  ( S `  x ) )
6448, 61, 633eqtr4d 2281 . . . 4  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
0..^ (♯ `  S )
) )  ->  (
( ( S ++  T
) ++  U ) `  x )  =  ( ( S ++  ( T ++  U ) ) `  x ) )
6531nn0zd 9777 . . . . . . 7  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  T )  e.  ZZ )
6641, 65zaddcld 9783 . . . . . 6  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
(♯ `  S )  +  (♯ `  T )
)  e.  ZZ )
67 fzospliti 10602 . . . . . . 7  |-  ( ( x  e.  ( (♯ `  S )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) )  /\  ( (♯ `  S )  +  (♯ `  T )
)  e.  ZZ )  ->  ( x  e.  ( (♯ `  S
)..^ ( (♯ `  S
)  +  (♯ `  T
) ) )  \/  x  e.  ( ( (♯ `  S )  +  (♯ `  T )
)..^ ( ( (♯ `  S )  +  (♯ `  T ) )  +  (♯ `  U )
) ) ) )
6867ex 115 . . . . . 6  |-  ( x  e.  ( (♯ `  S
)..^ ( ( (♯ `  S )  +  (♯ `  T ) )  +  (♯ `  U )
) )  ->  (
( (♯ `  S
)  +  (♯ `  T
) )  e.  ZZ  ->  ( x  e.  ( (♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) )  \/  x  e.  ( ( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) ) ) )
6966, 68mpan9 281 . . . . 5  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
(♯ `  S )..^ ( ( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) ) ) )  ->  ( x  e.  ( (♯ `  S
)..^ ( (♯ `  S
)  +  (♯ `  T
) ) )  \/  x  e.  ( ( (♯ `  S )  +  (♯ `  T )
)..^ ( ( (♯ `  S )  +  (♯ `  T ) )  +  (♯ `  U )
) ) ) )
70 id 19 . . . . . . . . 9  |-  ( x  e.  ( (♯ `  S
)..^ ( (♯ `  S
)  +  (♯ `  T
) ) )  ->  x  e.  ( (♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T ) ) ) )
71 ccatval2 11388 . . . . . . . . 9  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  x  e.  ( (♯ `  S
)..^ ( (♯ `  S
)  +  (♯ `  T
) ) ) )  ->  ( ( S ++  T ) `  x
)  =  ( T `
 ( x  -  (♯ `  S ) ) ) )
7215, 45, 70, 71syl2an3an 1339 . . . . . . . 8  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) ) )  -> 
( ( S ++  T
) `  x )  =  ( T `  ( x  -  (♯ `  S ) ) ) )
73 simpl2 1032 . . . . . . . . 9  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) ) )  ->  T  e. Word  B )
74 simpl3 1033 . . . . . . . . 9  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) ) )  ->  U  e. Word  B )
75 fzosubel3 10631 . . . . . . . . . . 11  |-  ( ( x  e.  ( (♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T ) ) )  /\  (♯ `  T
)  e.  ZZ )  ->  ( x  -  (♯ `  S ) )  e.  ( 0..^ (♯ `  T ) ) )
7675ex 115 . . . . . . . . . 10  |-  ( x  e.  ( (♯ `  S
)..^ ( (♯ `  S
)  +  (♯ `  T
) ) )  -> 
( (♯ `  T
)  e.  ZZ  ->  ( x  -  (♯ `  S
) )  e.  ( 0..^ (♯ `  T
) ) ) )
7765, 76mpan9 281 . . . . . . . . 9  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) ) )  -> 
( x  -  (♯ `  S ) )  e.  ( 0..^ (♯ `  T
) ) )
78 ccatval1 11387 . . . . . . . . 9  |-  ( ( T  e. Word  B  /\  U  e. Word  B  /\  (
x  -  (♯ `  S
) )  e.  ( 0..^ (♯ `  T
) ) )  -> 
( ( T ++  U
) `  ( x  -  (♯ `  S )
) )  =  ( T `  ( x  -  (♯ `  S
) ) ) )
7973, 74, 77, 78syl3anc 1278 . . . . . . . 8  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) ) )  -> 
( ( T ++  U
) `  ( x  -  (♯ `  S )
) )  =  ( T `  ( x  -  (♯ `  S
) ) ) )
8072, 79eqtr4d 2274 . . . . . . 7  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) ) )  -> 
( ( S ++  T
) `  x )  =  ( ( T ++  U ) `  (
x  -  (♯ `  S
) ) ) )
8149adantr 276 . . . . . . . 8  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) ) )  -> 
( S ++  T )  e. Word  B )
82 fzoss1 10597 . . . . . . . . . . . 12  |-  ( (♯ `  S )  e.  (
ZZ>= `  0 )  -> 
( (♯ `  S
)..^ ( (♯ `  S
)  +  (♯ `  T
) ) )  C_  ( 0..^ ( (♯ `  S
)  +  (♯ `  T
) ) ) )
83 nn0uz 9973 . . . . . . . . . . . 12  |-  NN0  =  ( ZZ>= `  0 )
8482, 83eleq2s 2333 . . . . . . . . . . 11  |-  ( (♯ `  S )  e.  NN0  ->  ( (♯ `  S
)..^ ( (♯ `  S
)  +  (♯ `  T
) ) )  C_  ( 0..^ ( (♯ `  S
)  +  (♯ `  T
) ) ) )
8528, 84syl 14 . . . . . . . . . 10  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) )  C_  (
0..^ ( (♯ `  S
)  +  (♯ `  T
) ) ) )
8685, 57sseqtrrd 3287 . . . . . . . . 9  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) )  C_  (
0..^ (♯ `  ( S ++  T ) ) ) )
8786sselda 3248 . . . . . . . 8  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) ) )  ->  x  e.  ( 0..^ (♯ `  ( S ++  T ) ) ) )
8881, 74, 87, 60syl3anc 1278 . . . . . . 7  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) ) )  -> 
( ( ( S ++  T ) ++  U ) `
 x )  =  ( ( S ++  T
) `  x )
)
89 simpl1 1031 . . . . . . . 8  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) ) )  ->  S  e. Word  B )
9017adantr 276 . . . . . . . 8  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) ) )  -> 
( T ++  U )  e. Word  B )
9166uzidd 9953 . . . . . . . . . . . 12  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
(♯ `  S )  +  (♯ `  T )
)  e.  ( ZZ>= `  ( (♯ `  S )  +  (♯ `  T )
) ) )
92 uzaddcl 10002 . . . . . . . . . . . 12  |-  ( ( ( (♯ `  S
)  +  (♯ `  T
) )  e.  (
ZZ>= `  ( (♯ `  S
)  +  (♯ `  T
) ) )  /\  (♯ `  U )  e. 
NN0 )  ->  (
( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) )  e.  ( ZZ>= `  ( (♯ `  S )  +  (♯ `  T ) ) ) )
9391, 34, 92syl2anc 415 . . . . . . . . . . 11  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) )  e.  ( ZZ>= `  ( (♯ `  S )  +  (♯ `  T ) ) ) )
94 fzoss2 10598 . . . . . . . . . . 11  |-  ( ( ( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) )  e.  ( ZZ>= `  ( (♯ `  S )  +  (♯ `  T ) ) )  ->  ( (♯ `  S
)..^ ( (♯ `  S
)  +  (♯ `  T
) ) )  C_  ( (♯ `  S )..^ ( ( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) ) ) )
9593, 94syl 14 . . . . . . . . . 10  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) )  C_  (
(♯ `  S )..^ ( ( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) ) ) )
9624, 36eqtr4d 2274 . . . . . . . . . . 11  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
(♯ `  S )  +  (♯ `  ( T ++  U ) ) )  =  ( ( (♯ `  S )  +  (♯ `  T ) )  +  (♯ `  U )
) )
9796oveq2d 6104 . . . . . . . . . 10  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  ( T ++  U ) ) ) )  =  ( (♯ `  S )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )
9895, 97sseqtrrd 3287 . . . . . . . . 9  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) )  C_  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  ( T ++  U ) ) ) ) )
9998sselda 3248 . . . . . . . 8  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) ) )  ->  x  e.  ( (♯ `  S )..^ ( (♯ `  S )  +  (♯ `  ( T ++  U ) ) ) ) )
100 ccatval2 11388 . . . . . . . 8  |-  ( ( S  e. Word  B  /\  ( T ++  U )  e. Word  B  /\  x  e.  ( (♯ `  S
)..^ ( (♯ `  S
)  +  (♯ `  ( T ++  U ) ) ) ) )  ->  (
( S ++  ( T ++  U ) ) `  x )  =  ( ( T ++  U ) `
 ( x  -  (♯ `  S ) ) ) )
10189, 90, 99, 100syl3anc 1278 . . . . . . 7  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) ) )  -> 
( ( S ++  ( T ++  U ) ) `  x )  =  ( ( T ++  U ) `
 ( x  -  (♯ `  S ) ) ) )
10280, 88, 1013eqtr4d 2281 . . . . . 6  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
(♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) ) )  -> 
( ( ( S ++  T ) ++  U ) `
 x )  =  ( ( S ++  ( T ++  U ) ) `  x ) )
1039oveq2d 6104 . . . . . . . . . . 11  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
x  -  (♯ `  ( S ++  T ) ) )  =  ( x  -  ( (♯ `  S )  +  (♯ `  T )
) ) )
104103adantr 276 . . . . . . . . . 10  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  ( x  -  (♯ `  ( S ++  T
) ) )  =  ( x  -  (
(♯ `  S )  +  (♯ `  T )
) ) )
105 elfzoelz 10571 . . . . . . . . . . . . 13  |-  ( x  e.  ( ( (♯ `  S )  +  (♯ `  T ) )..^ ( ( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) ) )  ->  x  e.  ZZ )
106105zcnd 9780 . . . . . . . . . . . 12  |-  ( x  e.  ( ( (♯ `  S )  +  (♯ `  T ) )..^ ( ( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) ) )  ->  x  e.  CC )
107106adantl 277 . . . . . . . . . . 11  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  x  e.  CC )
10829adantr 276 . . . . . . . . . . 11  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  (♯ `  S )  e.  CC )
10932adantr 276 . . . . . . . . . . 11  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  (♯ `  T )  e.  CC )
110107, 108, 109subsub4d 8675 . . . . . . . . . 10  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  ( ( x  -  (♯ `  S
) )  -  (♯ `  T ) )  =  ( x  -  (
(♯ `  S )  +  (♯ `  T )
) ) )
111104, 110eqtr4d 2274 . . . . . . . . 9  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  ( x  -  (♯ `  ( S ++  T
) ) )  =  ( ( x  -  (♯ `  S ) )  -  (♯ `  T
) ) )
112111fveq2d 5702 . . . . . . . 8  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  ( U `  ( x  -  (♯ `  ( S ++  T ) ) ) )  =  ( U `  (
( x  -  (♯ `  S ) )  -  (♯ `  T ) ) ) )
113 simpl2 1032 . . . . . . . . 9  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  T  e. Word  B
)
114 simpl3 1033 . . . . . . . . 9  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  U  e. Word  B
)
11536oveq2d 6104 . . . . . . . . . . . 12  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) )  =  ( ( (♯ `  S
)  +  (♯ `  T
) )..^ ( (♯ `  S )  +  ( (♯ `  T )  +  (♯ `  U )
) ) ) )
116115eleq2d 2308 . . . . . . . . . . 11  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
x  e.  ( ( (♯ `  S )  +  (♯ `  T )
)..^ ( ( (♯ `  S )  +  (♯ `  T ) )  +  (♯ `  U )
) )  <->  x  e.  ( ( (♯ `  S
)  +  (♯ `  T
) )..^ ( (♯ `  S )  +  ( (♯ `  T )  +  (♯ `  U )
) ) ) ) )
117116biimpa 296 . . . . . . . . . 10  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  x  e.  ( ( (♯ `  S
)  +  (♯ `  T
) )..^ ( (♯ `  S )  +  ( (♯ `  T )  +  (♯ `  U )
) ) ) )
11834nn0zd 9777 . . . . . . . . . . . . 13  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (♯ `  U )  e.  ZZ )
11965, 118zaddcld 9783 . . . . . . . . . . . 12  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
(♯ `  T )  +  (♯ `  U )
)  e.  ZZ )
12041, 65, 1193jca 1208 . . . . . . . . . . 11  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
(♯ `  S )  e.  ZZ  /\  (♯ `  T
)  e.  ZZ  /\  ( (♯ `  T )  +  (♯ `  U )
)  e.  ZZ ) )
121120adantr 276 . . . . . . . . . 10  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  ( (♯ `  S
)  e.  ZZ  /\  (♯ `  T )  e.  ZZ  /\  ( (♯ `  T )  +  (♯ `  U ) )  e.  ZZ ) )
122 fzosubel2 10630 . . . . . . . . . 10  |-  ( ( x  e.  ( ( (♯ `  S )  +  (♯ `  T )
)..^ ( (♯ `  S
)  +  ( (♯ `  T )  +  (♯ `  U ) ) ) )  /\  ( (♯ `  S )  e.  ZZ  /\  (♯ `  T )  e.  ZZ  /\  ( (♯ `  T )  +  (♯ `  U ) )  e.  ZZ ) )  -> 
( x  -  (♯ `  S ) )  e.  ( (♯ `  T
)..^ ( (♯ `  T
)  +  (♯ `  U
) ) ) )
123117, 121, 122syl2anc 415 . . . . . . . . 9  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  ( x  -  (♯ `  S ) )  e.  ( (♯ `  T
)..^ ( (♯ `  T
)  +  (♯ `  U
) ) ) )
124 ccatval2 11388 . . . . . . . . 9  |-  ( ( T  e. Word  B  /\  U  e. Word  B  /\  (
x  -  (♯ `  S
) )  e.  ( (♯ `  T )..^ ( (♯ `  T )  +  (♯ `  U )
) ) )  -> 
( ( T ++  U
) `  ( x  -  (♯ `  S )
) )  =  ( U `  ( ( x  -  (♯ `  S
) )  -  (♯ `  T ) ) ) )
125113, 114, 123, 124syl3anc 1278 . . . . . . . 8  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  ( ( T ++  U ) `  (
x  -  (♯ `  S
) ) )  =  ( U `  (
( x  -  (♯ `  S ) )  -  (♯ `  T ) ) ) )
126112, 125eqtr4d 2274 . . . . . . 7  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  ( U `  ( x  -  (♯ `  ( S ++  T ) ) ) )  =  ( ( T ++  U
) `  ( x  -  (♯ `  S )
) ) )
12749adantr 276 . . . . . . . 8  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  ( S ++  T
)  e. Word  B )
1289, 10oveq12d 6106 . . . . . . . . . 10  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
(♯ `  ( S ++  T
) )..^ ( (♯ `  ( S ++  T ) )  +  (♯ `  U
) ) )  =  ( ( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )
129128eleq2d 2308 . . . . . . . . 9  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
x  e.  ( (♯ `  ( S ++  T ) )..^ ( (♯ `  ( S ++  T ) )  +  (♯ `  U )
) )  <->  x  e.  ( ( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) ) )
130129biimpar 297 . . . . . . . 8  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  x  e.  ( (♯ `  ( S ++  T ) )..^ ( (♯ `  ( S ++  T ) )  +  (♯ `  U )
) ) )
131 ccatval2 11388 . . . . . . . 8  |-  ( ( ( S ++  T )  e. Word  B  /\  U  e. Word  B  /\  x  e.  ( (♯ `  ( S ++  T ) )..^ ( (♯ `  ( S ++  T ) )  +  (♯ `  U )
) ) )  -> 
( ( ( S ++  T ) ++  U ) `
 x )  =  ( U `  (
x  -  (♯ `  ( S ++  T ) ) ) ) )
132127, 114, 130, 131syl3anc 1278 . . . . . . 7  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  ( ( ( S ++  T ) ++  U
) `  x )  =  ( U `  ( x  -  (♯ `  ( S ++  T ) ) ) ) )
133 simpl1 1031 . . . . . . . 8  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  S  e. Word  B
)
13417adantr 276 . . . . . . . 8  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  ( T ++  U
)  e. Word  B )
135 fzoss1 10597 . . . . . . . . . . 11  |-  ( ( (♯ `  S )  +  (♯ `  T )
)  e.  ( ZZ>= `  (♯ `  S ) )  ->  ( ( (♯ `  S )  +  (♯ `  T ) )..^ ( ( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) ) ) 
C_  ( (♯ `  S
)..^ ( ( (♯ `  S )  +  (♯ `  T ) )  +  (♯ `  U )
) ) )
13654, 135syl 14 . . . . . . . . . 10  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) )  C_  ( (♯ `  S )..^ ( ( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) ) ) )
137136, 97sseqtrrd 3287 . . . . . . . . 9  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) )  C_  ( (♯ `  S )..^ ( (♯ `  S )  +  (♯ `  ( T ++  U ) ) ) ) )
138137sselda 3248 . . . . . . . 8  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  x  e.  ( (♯ `  S )..^ ( (♯ `  S )  +  (♯ `  ( T ++  U ) ) ) ) )
139133, 134, 138, 100syl3anc 1278 . . . . . . 7  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  ( ( S ++  ( T ++  U ) ) `  x )  =  ( ( T ++  U ) `  (
x  -  (♯ `  S
) ) ) )
140126, 132, 1393eqtr4d 2281 . . . . . 6  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) )  ->  ( ( ( S ++  T ) ++  U
) `  x )  =  ( ( S ++  ( T ++  U ) ) `  x ) )
141102, 140jaodan 809 . . . . 5  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  ( x  e.  ( (♯ `  S )..^ ( (♯ `  S )  +  (♯ `  T )
) )  \/  x  e.  ( ( (♯ `  S
)  +  (♯ `  T
) )..^ ( ( (♯ `  S )  +  (♯ `  T )
)  +  (♯ `  U
) ) ) ) )  ->  ( (
( S ++  T ) ++  U ) `  x
)  =  ( ( S ++  ( T ++  U
) ) `  x
) )
14269, 141syldan 282 . . . 4  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
(♯ `  S )..^ ( ( (♯ `  S
)  +  (♯ `  T
) )  +  (♯ `  U ) ) ) )  ->  ( (
( S ++  T ) ++  U ) `  x
)  =  ( ( S ++  ( T ++  U
) ) `  x
) )
14364, 142jaodan 809 . . 3  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  ( x  e.  ( 0..^ (♯ `  S
) )  \/  x  e.  ( (♯ `  S
)..^ ( ( (♯ `  S )  +  (♯ `  T ) )  +  (♯ `  U )
) ) ) )  ->  ( ( ( S ++  T ) ++  U
) `  x )  =  ( ( S ++  ( T ++  U ) ) `  x ) )
14444, 143syldan 282 . 2  |-  ( ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  /\  x  e.  (
0..^ ( ( (♯ `  S )  +  (♯ `  T ) )  +  (♯ `  U )
) ) )  -> 
( ( ( S ++  T ) ++  U ) `
 x )  =  ( ( S ++  ( T ++  U ) ) `  x ) )
14514, 40, 144eqfnfvd 5812 1  |-  ( ( S  e. Word  B  /\  T  e. Word  B  /\  U  e. Word  B )  ->  (
( S ++  T ) ++  U )  =  ( S ++  ( T ++  U
) ) )
Colors of variables:    wff set class
This proof depends on syntax axioms:    -> wi 4    /\ wa 104    \/ wo 720    /\ w3a 1009    = wceq 1402    e. wcel 2209    C_ wss 3220    Fn wfn 5375   ` cfv 5380  (class class class)co 6088   CCcc 8183   0cc0 8185    + caddc 8188    - cmin 8504   NN0cn0 9574   ZZcz 9655   ZZ>=cuz 9937  ..^cfzo 10566  ♯chash 11236  Word cword 11326   ++ cconcat 11380
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-coll 4248  ax-sep 4251  ax-nul 4261  ax-pow 4313  ax-pr 4348  ax-un 4580  ax-setind 4686  ax-iinf 4737  ax-cnex 8276  ax-resscn 8277  ax-1cn 8278  ax-1re 8279  ax-icn 8280  ax-addcl 8281  ax-addrcl 8282  ax-mulcl 8283  ax-addcom 8285  ax-addass 8287  ax-distr 8289  ax-i2m1 8290  ax-0lt1 8291  ax-0id 8293  ax-rnegex 8294  ax-cnre 8296  ax-pre-ltirr 8297  ax-pre-ltwlin 8298  ax-pre-lttrn 8299  ax-pre-apti 8300  ax-pre-ltadd 8301
This proof depends on definitions:  df-bi 117  df-dc 847  df-3or 1010  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-nel 2516  df-ral 2533  df-rex 2534  df-reu 2535  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-if 3639  df-pw 3690  df-sn 3715  df-pr 3716  df-op 3718  df-uni 3936  df-int 3971  df-iun 4014  df-br 4132  df-opab 4194  df-mpt 4195  df-tr 4232  df-id 4440  df-iord 4513  df-on 4515  df-ilim 4516  df-suc 4518  df-iom 4740  df-xp 4782  df-rel 4783  df-cnv 4784  df-co 4785  df-dm 4786  df-rn 4787  df-res 4788  df-ima 4789  df-iota 5340  df-fun 5382  df-fn 5383  df-f 5384  df-f1 5385  df-fo 5386  df-f1o 5387  df-fv 5388  df-riota 6041  df-ov 6091  df-oprab 6092  df-mpo 6093  df-1st 6378  df-2nd 6379  df-recs 6580  df-frec 6666  df-1o 6691  df-er 6811  df-en 7027  df-dom 7028  df-fin 7029  df-pnf 8368  df-mnf 8369  df-xr 8370  df-ltxr 8371  df-le 8372  df-sub 8506  df-neg 8507  df-inn 9314  df-n0 9575  df-z 9656  df-uz 9938  df-fz 10429  df-fzo 10567  df-ihash 11237  df-word 11327  df-concat 11381
This theorem is used by:  ccat2s1fvwd  11437  cats1catd  11562  cats2catd  11563
  Copyright terms: Public domain W3C validator