HSE Home Hilbert Space Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  HSE Home  >  Th. List  >  mayete3i Unicode version

Theorem mayete3i 22323
Description: Mayet's equation E3. Part of Theorem 4.1 of [Mayet3] p. 1223. (Contributed by NM, 22-Jun-2006.) (New usage is discouraged.)
Hypotheses
Ref Expression
mayete3.a  |-  A  e. 
CH
mayete3.b  |-  B  e. 
CH
mayete3.c  |-  C  e. 
CH
mayete3.d  |-  D  e. 
CH
mayete3.f  |-  F  e. 
CH
mayete3.g  |-  G  e. 
CH
mayete3.ac  |-  A  C_  ( _|_ `  C )
mayete3.af  |-  A  C_  ( _|_ `  F )
mayete3.cf  |-  C  C_  ( _|_ `  F )
mayete3.ab  |-  A  C_  ( _|_ `  B )
mayete3.cd  |-  C  C_  ( _|_ `  D )
mayete3.fg  |-  F  C_  ( _|_ `  G )
mayete3.x  |-  X  =  ( ( A  vH  C )  vH  F
)
mayete3.y  |-  Y  =  ( ( ( A  vH  B )  i^i  ( C  vH  D
) )  i^i  ( F  vH  G ) )
mayete3.z  |-  Z  =  ( ( B  vH  D )  vH  G
)
Assertion
Ref Expression
mayete3i  |-  ( X  i^i  Y )  C_  Z

Proof of Theorem mayete3i
Dummy variable  x is distinct from all other variables.
StepHypRef Expression
1 elin 3371 . . . . . . . 8  |-  ( x  e.  ( X  i^i  Y )  <->  ( x  e.  X  /\  x  e.  Y ) )
2 mayete3.a . . . . . . . . . . . . 13  |-  A  e. 
CH
3 mayete3.c . . . . . . . . . . . . 13  |-  C  e. 
CH
42, 3chjcli 22052 . . . . . . . . . . . 12  |-  ( A  vH  C )  e. 
CH
5 mayete3.f . . . . . . . . . . . 12  |-  F  e. 
CH
64, 5chjcli 22052 . . . . . . . . . . 11  |-  ( ( A  vH  C )  vH  F )  e. 
CH
76cheli 21828 . . . . . . . . . 10  |-  ( x  e.  ( ( A  vH  C )  vH  F )  ->  x  e.  ~H )
8 mayete3.x . . . . . . . . . 10  |-  X  =  ( ( A  vH  C )  vH  F
)
97, 8eleq2s 2388 . . . . . . . . 9  |-  ( x  e.  X  ->  x  e.  ~H )
109adantr 451 . . . . . . . 8  |-  ( ( x  e.  X  /\  x  e.  Y )  ->  x  e.  ~H )
111, 10sylbi 187 . . . . . . 7  |-  ( x  e.  ( X  i^i  Y )  ->  x  e.  ~H )
12 ax-hvmulid 21602 . . . . . . . 8  |-  ( x  e.  ~H  ->  (
1  .h  x )  =  x )
13 2cn 9832 . . . . . . . . . . 11  |-  2  e.  CC
14 2ne0 9845 . . . . . . . . . . 11  |-  2  =/=  0
15 recid2 9455 . . . . . . . . . . 11  |-  ( ( 2  e.  CC  /\  2  =/=  0 )  -> 
( ( 1  / 
2 )  x.  2 )  =  1 )
1613, 14, 15mp2an 653 . . . . . . . . . 10  |-  ( ( 1  /  2 )  x.  2 )  =  1
1716oveq1i 5884 . . . . . . . . 9  |-  ( ( ( 1  /  2
)  x.  2 )  .h  x )  =  ( 1  .h  x
)
1813, 14reccli 9506 . . . . . . . . . 10  |-  ( 1  /  2 )  e.  CC
19 ax-hvmulass 21603 . . . . . . . . . 10  |-  ( ( ( 1  /  2
)  e.  CC  /\  2  e.  CC  /\  x  e.  ~H )  ->  (
( ( 1  / 
2 )  x.  2 )  .h  x )  =  ( ( 1  /  2 )  .h  ( 2  .h  x
) ) )
2018, 13, 19mp3an12 1267 . . . . . . . . 9  |-  ( x  e.  ~H  ->  (
( ( 1  / 
2 )  x.  2 )  .h  x )  =  ( ( 1  /  2 )  .h  ( 2  .h  x
) ) )
2117, 20syl5eqr 2342 . . . . . . . 8  |-  ( x  e.  ~H  ->  (
1  .h  x )  =  ( ( 1  /  2 )  .h  ( 2  .h  x
) ) )
2212, 21eqtr3d 2330 . . . . . . 7  |-  ( x  e.  ~H  ->  x  =  ( ( 1  /  2 )  .h  ( 2  .h  x
) ) )
2311, 22syl 15 . . . . . 6  |-  ( x  e.  ( X  i^i  Y )  ->  x  =  ( ( 1  / 
2 )  .h  (
2  .h  x ) ) )
24 hv2times 21656 . . . . . . . . . . . . . 14  |-  ( x  e.  ~H  ->  (
2  .h  x )  =  ( x  +h  x ) )
2524oveq1d 5889 . . . . . . . . . . . . 13  |-  ( x  e.  ~H  ->  (
( 2  .h  x
)  +h  x )  =  ( ( x  +h  x )  +h  x ) )
2611, 25syl 15 . . . . . . . . . . . 12  |-  ( x  e.  ( X  i^i  Y )  ->  ( (
2  .h  x )  +h  x )  =  ( ( x  +h  x )  +h  x
) )
27 inss2 3403 . . . . . . . . . . . . . 14  |-  ( X  i^i  Y )  C_  Y
2827sseli 3189 . . . . . . . . . . . . 13  |-  ( x  e.  ( X  i^i  Y )  ->  x  e.  Y )
29 mayete3.y . . . . . . . . . . . . . . 15  |-  Y  =  ( ( ( A  vH  B )  i^i  ( C  vH  D
) )  i^i  ( F  vH  G ) )
3029elin2 3372 . . . . . . . . . . . . . 14  |-  ( x  e.  Y  <->  ( x  e.  ( ( A  vH  B )  i^i  ( C  vH  D ) )  /\  x  e.  ( F  vH  G ) ) )
31 elin 3371 . . . . . . . . . . . . . . . . 17  |-  ( x  e.  ( ( A  vH  B )  i^i  ( C  vH  D
) )  <->  ( x  e.  ( A  vH  B
)  /\  x  e.  ( C  vH  D ) ) )
32 mayete3.ab . . . . . . . . . . . . . . . . . . 19  |-  A  C_  ( _|_ `  B )
33 mayete3.b . . . . . . . . . . . . . . . . . . . 20  |-  B  e. 
CH
342, 33pjdsi 22307 . . . . . . . . . . . . . . . . . . 19  |-  ( ( x  e.  ( A  vH  B )  /\  A  C_  ( _|_ `  B
) )  ->  x  =  ( ( (
proj  h `  A ) `
 x )  +h  ( ( proj  h `  B ) `  x
) ) )
3532, 34mpan2 652 . . . . . . . . . . . . . . . . . 18  |-  ( x  e.  ( A  vH  B )  ->  x  =  ( ( (
proj  h `  A ) `
 x )  +h  ( ( proj  h `  B ) `  x
) ) )
36 mayete3.cd . . . . . . . . . . . . . . . . . . 19  |-  C  C_  ( _|_ `  D )
37 mayete3.d . . . . . . . . . . . . . . . . . . . 20  |-  D  e. 
CH
383, 37pjdsi 22307 . . . . . . . . . . . . . . . . . . 19  |-  ( ( x  e.  ( C  vH  D )  /\  C  C_  ( _|_ `  D
) )  ->  x  =  ( ( (
proj  h `  C ) `
 x )  +h  ( ( proj  h `  D ) `  x
) ) )
3936, 38mpan2 652 . . . . . . . . . . . . . . . . . 18  |-  ( x  e.  ( C  vH  D )  ->  x  =  ( ( (
proj  h `  C ) `
 x )  +h  ( ( proj  h `  D ) `  x
) ) )
4035, 39oveqan12d 5893 . . . . . . . . . . . . . . . . 17  |-  ( ( x  e.  ( A  vH  B )  /\  x  e.  ( C  vH  D ) )  -> 
( x  +h  x
)  =  ( ( ( ( proj  h `  A ) `  x
)  +h  ( (
proj  h `  B ) `
 x ) )  +h  ( ( (
proj  h `  C ) `
 x )  +h  ( ( proj  h `  D ) `  x
) ) ) )
4131, 40sylbi 187 . . . . . . . . . . . . . . . 16  |-  ( x  e.  ( ( A  vH  B )  i^i  ( C  vH  D
) )  ->  (
x  +h  x )  =  ( ( ( ( proj  h `  A
) `  x )  +h  ( ( proj  h `  B ) `  x
) )  +h  (
( ( proj  h `  C ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) ) ) )
42 inss1 3402 . . . . . . . . . . . . . . . . . 18  |-  ( ( A  vH  B )  i^i  ( C  vH  D ) )  C_  ( A  vH  B )
4342sseli 3189 . . . . . . . . . . . . . . . . 17  |-  ( x  e.  ( ( A  vH  B )  i^i  ( C  vH  D
) )  ->  x  e.  ( A  vH  B
) )
442, 33chjcli 22052 . . . . . . . . . . . . . . . . . 18  |-  ( A  vH  B )  e. 
CH
4544cheli 21828 . . . . . . . . . . . . . . . . 17  |-  ( x  e.  ( A  vH  B )  ->  x  e.  ~H )
462pjhcli 22013 . . . . . . . . . . . . . . . . . 18  |-  ( x  e.  ~H  ->  (
( proj  h `  A
) `  x )  e.  ~H )
4733pjhcli 22013 . . . . . . . . . . . . . . . . . 18  |-  ( x  e.  ~H  ->  (
( proj  h `  B
) `  x )  e.  ~H )
483pjhcli 22013 . . . . . . . . . . . . . . . . . 18  |-  ( x  e.  ~H  ->  (
( proj  h `  C
) `  x )  e.  ~H )
4937pjhcli 22013 . . . . . . . . . . . . . . . . . 18  |-  ( x  e.  ~H  ->  (
( proj  h `  D
) `  x )  e.  ~H )
50 hvadd4 21631 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ( proj 
h `  A ) `  x )  e.  ~H  /\  ( ( proj  h `  B ) `  x
)  e.  ~H )  /\  ( ( ( proj 
h `  C ) `  x )  e.  ~H  /\  ( ( proj  h `  D ) `  x
)  e.  ~H )
)  ->  ( (
( ( proj  h `  A ) `  x
)  +h  ( (
proj  h `  B ) `
 x ) )  +h  ( ( (
proj  h `  C ) `
 x )  +h  ( ( proj  h `  D ) `  x
) ) )  =  ( ( ( (
proj  h `  A ) `
 x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) ) ) )
5146, 47, 48, 49, 50syl22anc 1183 . . . . . . . . . . . . . . . . 17  |-  ( x  e.  ~H  ->  (
( ( ( proj 
h `  A ) `  x )  +h  (
( proj  h `  B
) `  x )
)  +h  ( ( ( proj  h `  C
) `  x )  +h  ( ( proj  h `  D ) `  x
) ) )  =  ( ( ( (
proj  h `  A ) `
 x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) ) ) )
5243, 45, 513syl 18 . . . . . . . . . . . . . . . 16  |-  ( x  e.  ( ( A  vH  B )  i^i  ( C  vH  D
) )  ->  (
( ( ( proj 
h `  A ) `  x )  +h  (
( proj  h `  B
) `  x )
)  +h  ( ( ( proj  h `  C
) `  x )  +h  ( ( proj  h `  D ) `  x
) ) )  =  ( ( ( (
proj  h `  A ) `
 x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) ) ) )
5341, 52eqtrd 2328 . . . . . . . . . . . . . . 15  |-  ( x  e.  ( ( A  vH  B )  i^i  ( C  vH  D
) )  ->  (
x  +h  x )  =  ( ( ( ( proj  h `  A
) `  x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) ) ) )
54 mayete3.fg . . . . . . . . . . . . . . . 16  |-  F  C_  ( _|_ `  G )
55 mayete3.g . . . . . . . . . . . . . . . . 17  |-  G  e. 
CH
565, 55pjdsi 22307 . . . . . . . . . . . . . . . 16  |-  ( ( x  e.  ( F  vH  G )  /\  F  C_  ( _|_ `  G
) )  ->  x  =  ( ( (
proj  h `  F ) `
 x )  +h  ( ( proj  h `  G ) `  x
) ) )
5754, 56mpan2 652 . . . . . . . . . . . . . . 15  |-  ( x  e.  ( F  vH  G )  ->  x  =  ( ( (
proj  h `  F ) `
 x )  +h  ( ( proj  h `  G ) `  x
) ) )
5853, 57oveqan12d 5893 . . . . . . . . . . . . . 14  |-  ( ( x  e.  ( ( A  vH  B )  i^i  ( C  vH  D ) )  /\  x  e.  ( F  vH  G ) )  -> 
( ( x  +h  x )  +h  x
)  =  ( ( ( ( ( proj 
h `  A ) `  x )  +h  (
( proj  h `  C
) `  x )
)  +h  ( ( ( proj  h `  B
) `  x )  +h  ( ( proj  h `  D ) `  x
) ) )  +h  ( ( ( proj 
h `  F ) `  x )  +h  (
( proj  h `  G
) `  x )
) ) )
5930, 58sylbi 187 . . . . . . . . . . . . 13  |-  ( x  e.  Y  ->  (
( x  +h  x
)  +h  x )  =  ( ( ( ( ( proj  h `  A ) `  x
)  +h  ( (
proj  h `  C ) `
 x ) )  +h  ( ( (
proj  h `  B ) `
 x )  +h  ( ( proj  h `  D ) `  x
) ) )  +h  ( ( ( proj 
h `  F ) `  x )  +h  (
( proj  h `  G
) `  x )
) ) )
6028, 59syl 15 . . . . . . . . . . . 12  |-  ( x  e.  ( X  i^i  Y )  ->  ( (
x  +h  x )  +h  x )  =  ( ( ( ( ( proj  h `  A
) `  x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) ) )  +h  ( ( ( proj  h `  F
) `  x )  +h  ( ( proj  h `  G ) `  x
) ) ) )
61 hvaddcl 21608 . . . . . . . . . . . . . . 15  |-  ( ( ( ( proj  h `  A ) `  x
)  e.  ~H  /\  ( ( proj  h `  C ) `  x
)  e.  ~H )  ->  ( ( ( proj 
h `  A ) `  x )  +h  (
( proj  h `  C
) `  x )
)  e.  ~H )
6246, 48, 61syl2anc 642 . . . . . . . . . . . . . 14  |-  ( x  e.  ~H  ->  (
( ( proj  h `  A ) `  x
)  +h  ( (
proj  h `  C ) `
 x ) )  e.  ~H )
63 hvaddcl 21608 . . . . . . . . . . . . . . 15  |-  ( ( ( ( proj  h `  B ) `  x
)  e.  ~H  /\  ( ( proj  h `  D ) `  x
)  e.  ~H )  ->  ( ( ( proj 
h `  B ) `  x )  +h  (
( proj  h `  D
) `  x )
)  e.  ~H )
6447, 49, 63syl2anc 642 . . . . . . . . . . . . . 14  |-  ( x  e.  ~H  ->  (
( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) )  e.  ~H )
655pjhcli 22013 . . . . . . . . . . . . . 14  |-  ( x  e.  ~H  ->  (
( proj  h `  F
) `  x )  e.  ~H )
6655pjhcli 22013 . . . . . . . . . . . . . 14  |-  ( x  e.  ~H  ->  (
( proj  h `  G
) `  x )  e.  ~H )
67 hvadd4 21631 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( (
proj  h `  A ) `
 x )  +h  ( ( proj  h `  C ) `  x
) )  e.  ~H  /\  ( ( ( proj 
h `  B ) `  x )  +h  (
( proj  h `  D
) `  x )
)  e.  ~H )  /\  ( ( ( proj 
h `  F ) `  x )  e.  ~H  /\  ( ( proj  h `  G ) `  x
)  e.  ~H )
)  ->  ( (
( ( ( proj 
h `  A ) `  x )  +h  (
( proj  h `  C
) `  x )
)  +h  ( ( ( proj  h `  B
) `  x )  +h  ( ( proj  h `  D ) `  x
) ) )  +h  ( ( ( proj 
h `  F ) `  x )  +h  (
( proj  h `  G
) `  x )
) )  =  ( ( ( ( (
proj  h `  A ) `
 x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( proj  h `  F
) `  x )
)  +h  ( ( ( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) )  +h  ( ( proj 
h `  G ) `  x ) ) ) )
6862, 64, 65, 66, 67syl22anc 1183 . . . . . . . . . . . . 13  |-  ( x  e.  ~H  ->  (
( ( ( (
proj  h `  A ) `
 x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) ) )  +h  ( ( ( proj  h `  F
) `  x )  +h  ( ( proj  h `  G ) `  x
) ) )  =  ( ( ( ( ( proj  h `  A
) `  x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( proj  h `  F
) `  x )
)  +h  ( ( ( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) )  +h  ( ( proj 
h `  G ) `  x ) ) ) )
6911, 68syl 15 . . . . . . . . . . . 12  |-  ( x  e.  ( X  i^i  Y )  ->  ( (
( ( ( proj 
h `  A ) `  x )  +h  (
( proj  h `  C
) `  x )
)  +h  ( ( ( proj  h `  B
) `  x )  +h  ( ( proj  h `  D ) `  x
) ) )  +h  ( ( ( proj 
h `  F ) `  x )  +h  (
( proj  h `  G
) `  x )
) )  =  ( ( ( ( (
proj  h `  A ) `
 x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( proj  h `  F
) `  x )
)  +h  ( ( ( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) )  +h  ( ( proj 
h `  G ) `  x ) ) ) )
7026, 60, 693eqtrd 2332 . . . . . . . . . . 11  |-  ( x  e.  ( X  i^i  Y )  ->  ( (
2  .h  x )  +h  x )  =  ( ( ( ( ( proj  h `  A
) `  x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( proj  h `  F
) `  x )
)  +h  ( ( ( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) )  +h  ( ( proj 
h `  G ) `  x ) ) ) )
71 inss1 3402 . . . . . . . . . . . . . 14  |-  ( X  i^i  Y )  C_  X
7271sseli 3189 . . . . . . . . . . . . 13  |-  ( x  e.  ( X  i^i  Y )  ->  x  e.  X )
7372, 8syl6eleq 2386 . . . . . . . . . . . 12  |-  ( x  e.  ( X  i^i  Y )  ->  x  e.  ( ( A  vH  C )  vH  F
) )
74 mayete3.ac . . . . . . . . . . . 12  |-  A  C_  ( _|_ `  C )
75 mayete3.af . . . . . . . . . . . . 13  |-  A  C_  ( _|_ `  F )
76 mayete3.cf . . . . . . . . . . . . 13  |-  C  C_  ( _|_ `  F )
772, 3, 5pjds3i 22308 . . . . . . . . . . . . 13  |-  ( ( ( x  e.  ( ( A  vH  C
)  vH  F )  /\  A  C_  ( _|_ `  C ) )  /\  ( A  C_  ( _|_ `  F )  /\  C  C_  ( _|_ `  F
) ) )  ->  x  =  ( (
( ( proj  h `  A ) `  x
)  +h  ( (
proj  h `  C ) `
 x ) )  +h  ( ( proj 
h `  F ) `  x ) ) )
7875, 76, 77mpanr12 666 . . . . . . . . . . . 12  |-  ( ( x  e.  ( ( A  vH  C )  vH  F )  /\  A  C_  ( _|_ `  C
) )  ->  x  =  ( ( ( ( proj  h `  A
) `  x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( proj  h `  F
) `  x )
) )
7973, 74, 78sylancl 643 . . . . . . . . . . 11  |-  ( x  e.  ( X  i^i  Y )  ->  x  =  ( ( ( (
proj  h `  A ) `
 x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( proj  h `  F
) `  x )
) )
8070, 79oveq12d 5892 . . . . . . . . . 10  |-  ( x  e.  ( X  i^i  Y )  ->  ( (
( 2  .h  x
)  +h  x )  -h  x )  =  ( ( ( ( ( ( proj  h `  A ) `  x
)  +h  ( (
proj  h `  C ) `
 x ) )  +h  ( ( proj 
h `  F ) `  x ) )  +h  ( ( ( (
proj  h `  B ) `
 x )  +h  ( ( proj  h `  D ) `  x
) )  +h  (
( proj  h `  G
) `  x )
) )  -h  (
( ( ( proj 
h `  A ) `  x )  +h  (
( proj  h `  C
) `  x )
)  +h  ( (
proj  h `  F ) `
 x ) ) ) )
81 hvmulcl 21609 . . . . . . . . . . . . 13  |-  ( ( 2  e.  CC  /\  x  e.  ~H )  ->  ( 2  .h  x
)  e.  ~H )
8213, 81mpan 651 . . . . . . . . . . . 12  |-  ( x  e.  ~H  ->  (
2  .h  x )  e.  ~H )
83 hvpncan 21634 . . . . . . . . . . . 12  |-  ( ( ( 2  .h  x
)  e.  ~H  /\  x  e.  ~H )  ->  ( ( ( 2  .h  x )  +h  x )  -h  x
)  =  ( 2  .h  x ) )
8482, 83mpancom 650 . . . . . . . . . . 11  |-  ( x  e.  ~H  ->  (
( ( 2  .h  x )  +h  x
)  -h  x )  =  ( 2  .h  x ) )
8511, 84syl 15 . . . . . . . . . 10  |-  ( x  e.  ( X  i^i  Y )  ->  ( (
( 2  .h  x
)  +h  x )  -h  x )  =  ( 2  .h  x
) )
8680, 85eqtr3d 2330 . . . . . . . . 9  |-  ( x  e.  ( X  i^i  Y )  ->  ( (
( ( ( (
proj  h `  A ) `
 x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( proj  h `  F
) `  x )
)  +h  ( ( ( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) )  +h  ( ( proj 
h `  G ) `  x ) ) )  -h  ( ( ( ( proj  h `  A
) `  x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( proj  h `  F
) `  x )
) )  =  ( 2  .h  x ) )
87 hvaddcl 21608 . . . . . . . . . . . 12  |-  ( ( ( ( ( proj 
h `  A ) `  x )  +h  (
( proj  h `  C
) `  x )
)  e.  ~H  /\  ( ( proj  h `  F ) `  x
)  e.  ~H )  ->  ( ( ( (
proj  h `  A ) `
 x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( proj  h `  F
) `  x )
)  e.  ~H )
8862, 65, 87syl2anc 642 . . . . . . . . . . 11  |-  ( x  e.  ~H  ->  (
( ( ( proj 
h `  A ) `  x )  +h  (
( proj  h `  C
) `  x )
)  +h  ( (
proj  h `  F ) `
 x ) )  e.  ~H )
89 hvaddcl 21608 . . . . . . . . . . . 12  |-  ( ( ( ( ( proj 
h `  B ) `  x )  +h  (
( proj  h `  D
) `  x )
)  e.  ~H  /\  ( ( proj  h `  G ) `  x
)  e.  ~H )  ->  ( ( ( (
proj  h `  B ) `
 x )  +h  ( ( proj  h `  D ) `  x
) )  +h  (
( proj  h `  G
) `  x )
)  e.  ~H )
9064, 66, 89syl2anc 642 . . . . . . . . . . 11  |-  ( x  e.  ~H  ->  (
( ( ( proj 
h `  B ) `  x )  +h  (
( proj  h `  D
) `  x )
)  +h  ( (
proj  h `  G ) `
 x ) )  e.  ~H )
91 hvpncan2 21635 . . . . . . . . . . 11  |-  ( ( ( ( ( (
proj  h `  A ) `
 x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( proj  h `  F
) `  x )
)  e.  ~H  /\  ( ( ( (
proj  h `  B ) `
 x )  +h  ( ( proj  h `  D ) `  x
) )  +h  (
( proj  h `  G
) `  x )
)  e.  ~H )  ->  ( ( ( ( ( ( proj  h `  A ) `  x
)  +h  ( (
proj  h `  C ) `
 x ) )  +h  ( ( proj 
h `  F ) `  x ) )  +h  ( ( ( (
proj  h `  B ) `
 x )  +h  ( ( proj  h `  D ) `  x
) )  +h  (
( proj  h `  G
) `  x )
) )  -h  (
( ( ( proj 
h `  A ) `  x )  +h  (
( proj  h `  C
) `  x )
)  +h  ( (
proj  h `  F ) `
 x ) ) )  =  ( ( ( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) )  +h  ( ( proj 
h `  G ) `  x ) ) )
9288, 90, 91syl2anc 642 . . . . . . . . . 10  |-  ( x  e.  ~H  ->  (
( ( ( ( ( proj  h `  A
) `  x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( proj  h `  F
) `  x )
)  +h  ( ( ( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) )  +h  ( ( proj 
h `  G ) `  x ) ) )  -h  ( ( ( ( proj  h `  A
) `  x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( proj  h `  F
) `  x )
) )  =  ( ( ( ( proj 
h `  B ) `  x )  +h  (
( proj  h `  D
) `  x )
)  +h  ( (
proj  h `  G ) `
 x ) ) )
9311, 92syl 15 . . . . . . . . 9  |-  ( x  e.  ( X  i^i  Y )  ->  ( (
( ( ( (
proj  h `  A ) `
 x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( proj  h `  F
) `  x )
)  +h  ( ( ( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) )  +h  ( ( proj 
h `  G ) `  x ) ) )  -h  ( ( ( ( proj  h `  A
) `  x )  +h  ( ( proj  h `  C ) `  x
) )  +h  (
( proj  h `  F
) `  x )
) )  =  ( ( ( ( proj 
h `  B ) `  x )  +h  (
( proj  h `  D
) `  x )
)  +h  ( (
proj  h `  G ) `
 x ) ) )
9486, 93eqtr3d 2330 . . . . . . . 8  |-  ( x  e.  ( X  i^i  Y )  ->  ( 2  .h  x )  =  ( ( ( (
proj  h `  B ) `
 x )  +h  ( ( proj  h `  D ) `  x
) )  +h  (
( proj  h `  G
) `  x )
) )
9533pjcli 22012 . . . . . . . . . . 11  |-  ( x  e.  ~H  ->  (
( proj  h `  B
) `  x )  e.  B )
9637pjcli 22012 . . . . . . . . . . 11  |-  ( x  e.  ~H  ->  (
( proj  h `  D
) `  x )  e.  D )
9733chshii 21823 . . . . . . . . . . . 12  |-  B  e.  SH
9837chshii 21823 . . . . . . . . . . . 12  |-  D  e.  SH
9997, 98shsvai 21959 . . . . . . . . . . 11  |-  ( ( ( ( proj  h `  B ) `  x
)  e.  B  /\  ( ( proj  h `  D ) `  x
)  e.  D )  ->  ( ( (
proj  h `  B ) `
 x )  +h  ( ( proj  h `  D ) `  x
) )  e.  ( B  +H  D ) )
10095, 96, 99syl2anc 642 . . . . . . . . . 10  |-  ( x  e.  ~H  ->  (
( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) )  e.  ( B  +H  D ) )
10155pjcli 22012 . . . . . . . . . 10  |-  ( x  e.  ~H  ->  (
( proj  h `  G
) `  x )  e.  G )
10297, 98shscli 21912 . . . . . . . . . . 11  |-  ( B  +H  D )  e.  SH
10355chshii 21823 . . . . . . . . . . 11  |-  G  e.  SH
104102, 103shsvai 21959 . . . . . . . . . 10  |-  ( ( ( ( ( proj 
h `  B ) `  x )  +h  (
( proj  h `  D
) `  x )
)  e.  ( B  +H  D )  /\  ( ( proj  h `  G ) `  x
)  e.  G )  ->  ( ( ( ( proj  h `  B
) `  x )  +h  ( ( proj  h `  D ) `  x
) )  +h  (
( proj  h `  G
) `  x )
)  e.  ( ( B  +H  D )  +H  G ) )
105100, 101, 104syl2anc 642 . . . . . . . . 9  |-  ( x  e.  ~H  ->  (
( ( ( proj 
h `  B ) `  x )  +h  (
( proj  h `  D
) `  x )
)  +h  ( (
proj  h `  G ) `
 x ) )  e.  ( ( B  +H  D )  +H  G ) )
10611, 105syl 15 . . . . . . . 8  |-  ( x  e.  ( X  i^i  Y )  ->  ( (
( ( proj  h `  B ) `  x
)  +h  ( (
proj  h `  D ) `
 x ) )  +h  ( ( proj 
h `  G ) `  x ) )  e.  ( ( B  +H  D )  +H  G
) )
10794, 106eqeltrd 2370 . . . . . . 7  |-  ( x  e.  ( X  i^i  Y )  ->  ( 2  .h  x )  e.  ( ( B  +H  D )  +H  G
) )
108102, 103shscli 21912 . . . . . . . 8  |-  ( ( B  +H  D )  +H  G )  e.  SH
109 shmulcl 21813 . . . . . . . 8  |-  ( ( ( ( B  +H  D )  +H  G
)  e.  SH  /\  ( 1  /  2
)  e.  CC  /\  ( 2  .h  x
)  e.  ( ( B  +H  D )  +H  G ) )  ->  ( ( 1  /  2 )  .h  ( 2  .h  x
) )  e.  ( ( B  +H  D
)  +H  G ) )
110108, 18, 109mp3an12 1267 . . . . . . 7  |-  ( ( 2  .h  x )  e.  ( ( B  +H  D )  +H  G )  ->  (
( 1  /  2
)  .h  ( 2  .h  x ) )  e.  ( ( B  +H  D )  +H  G ) )
111107, 110syl 15 . . . . . 6  |-  ( x  e.  ( X  i^i  Y )  ->  ( (
1  /  2 )  .h  ( 2  .h  x ) )  e.  ( ( B  +H  D )  +H  G
) )
11223, 111eqeltrd 2370 . . . . 5  |-  ( x  e.  ( X  i^i  Y )  ->  x  e.  ( ( B  +H  D )  +H  G
) )
113112ssriv 3197 . . . 4  |-  ( X  i^i  Y )  C_  ( ( B  +H  D )  +H  G
)
11433, 37chsleji 22053 . . . . 5  |-  ( B  +H  D )  C_  ( B  vH  D )
11533, 37chjcli 22052 . . . . . . 7  |-  ( B  vH  D )  e. 
CH
116115chshii 21823 . . . . . 6  |-  ( B  vH  D )  e.  SH
117102, 116, 103shlessi 21972 . . . . 5  |-  ( ( B  +H  D ) 
C_  ( B  vH  D )  ->  (
( B  +H  D
)  +H  G ) 
C_  ( ( B  vH  D )  +H  G ) )
118114, 117ax-mp 8 . . . 4  |-  ( ( B  +H  D )  +H  G )  C_  ( ( B  vH  D )  +H  G
)
119113, 118sstri 3201 . . 3  |-  ( X  i^i  Y )  C_  ( ( B  vH  D )  +H  G
)
120115, 55chsleji 22053 . . 3  |-  ( ( B  vH  D )  +H  G )  C_  ( ( B  vH  D )  vH  G
)
121119, 120sstri 3201 . 2  |-  ( X  i^i  Y )  C_  ( ( B  vH  D )  vH  G
)
122 mayete3.z . 2  |-  Z  =  ( ( B  vH  D )  vH  G
)
123121, 122sseqtr4i 3224 1  |-  ( X  i^i  Y )  C_  Z
Colors of variables: wff set class
Syntax hints:    /\ wa 358    = wceq 1632    e. wcel 1696    =/= wne 2459    i^i cin 3164    C_ wss 3165   ` cfv 5271  (class class class)co 5874   CCcc 8751   0cc0 8753   1c1 8754    x. cmul 8758    / cdiv 9439   2c2 9811   ~Hchil 21515    +h cva 21516    .h csm 21517    -h cmv 21521   SHcsh 21524   CHcch 21525   _|_cort 21526    +H cph 21527    vH chj 21529   proj 
hcpjh 21533
This theorem is referenced by:  mayetes3i  22325
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1536  ax-5 1547  ax-17 1606  ax-9 1644  ax-8 1661  ax-13 1698  ax-14 1700  ax-6 1715  ax-7 1720  ax-11 1727  ax-12 1878  ax-ext 2277  ax-rep 4147  ax-sep 4157  ax-nul 4165  ax-pow 4204  ax-pr 4230  ax-un 4528  ax-inf2 7358  ax-cc 8077  ax-cnex 8809  ax-resscn 8810  ax-1cn 8811  ax-icn 8812  ax-addcl 8813  ax-addrcl 8814  ax-mulcl 8815  ax-mulrcl 8816  ax-mulcom 8817  ax-addass 8818  ax-mulass 8819  ax-distr 8820  ax-i2m1 8821  ax-1ne0 8822  ax-1rid 8823  ax-rnegex 8824  ax-rrecex 8825  ax-cnre 8826  ax-pre-lttri 8827  ax-pre-lttrn 8828  ax-pre-ltadd 8829  ax-pre-mulgt0 8830  ax-pre-sup 8831  ax-addf 8832  ax-mulf 8833  ax-hilex 21595  ax-hfvadd 21596  ax-hvcom 21597  ax-hvass 21598  ax-hv0cl 21599  ax-hvaddid 21600  ax-hfvmul 21601  ax-hvmulid 21602  ax-hvmulass 21603  ax-hvdistr1 21604  ax-hvdistr2 21605  ax-hvmul0 21606  ax-hfi 21674  ax-his1 21677  ax-his2 21678  ax-his3 21679  ax-his4 21680  ax-hcompl 21797
This theorem depends on definitions:  df-bi 177  df-or 359  df-an 360  df-3or 935  df-3an 936  df-tru 1310  df-ex 1532  df-nf 1535  df-sb 1639  df-eu 2160  df-mo 2161  df-clab 2283  df-cleq 2289  df-clel 2292  df-nfc 2421  df-ne 2461  df-nel 2462  df-ral 2561  df-rex 2562  df-reu 2563  df-rmo 2564  df-rab 2565  df-v 2803  df-sbc 3005  df-csb 3095  df-dif 3168  df-un 3170  df-in 3172  df-ss 3179  df-pss 3181  df-nul 3469  df-if 3579  df-pw 3640  df-sn 3659  df-pr 3660  df-tp 3661  df-op 3662  df-uni 3844  df-int 3879  df-iun 3923  df-iin 3924  df-br 4040  df-opab 4094  df-mpt 4095  df-tr 4130  df-eprel 4321  df-id 4325  df-po 4330  df-so 4331  df-fr 4368  df-se 4369  df-we 4370  df-ord 4411  df-on 4412  df-lim 4413  df-suc 4414  df-om 4673  df-xp 4711  df-rel 4712  df-cnv 4713  df-co 4714  df-dm 4715  df-rn 4716  df-res 4717  df-ima 4718  df-iota 5235  df-fun 5273  df-fn 5274  df-f 5275  df-f1 5276  df-fo 5277  df-f1o 5278  df-fv 5279  df-isom 5280  df-ov 5877  df-oprab 5878  df-mpt2 5879  df-of 6094  df-1st 6138  df-2nd 6139  df-riota 6320  df-recs 6404  df-rdg 6439  df-1o 6495  df-2o 6496  df-oadd 6499  df-omul 6500  df-er 6676  df-map 6790  df-pm 6791  df-ixp 6834  df-en 6880  df-dom 6881  df-sdom 6882  df-fin 6883  df-fi 7181  df-sup 7210  df-oi 7241  df-card 7588  df-acn 7591  df-cda 7810  df-pnf 8885  df-mnf 8886  df-xr 8887  df-ltxr 8888  df-le 8889  df-sub 9055  df-neg 9056  df-div 9440  df-nn 9763  df-2 9820  df-3 9821  df-4 9822  df-5 9823  df-6 9824  df-7 9825  df-8 9826  df-9 9827  df-10 9828  df-n0 9982  df-z 10041  df-dec 10141  df-uz 10247  df-q 10333  df-rp 10371  df-xneg 10468  df-xadd 10469  df-xmul 10470  df-ioo 10676  df-ico 10678  df-icc 10679  df-fz 10799  df-fzo 10887  df-fl 10941  df-seq 11063  df-exp 11121  df-hash 11354  df-cj 11600  df-re 11601  df-im 11602  df-sqr 11736  df-abs 11737  df-clim 11978  df-rlim 11979  df-sum 12175  df-struct 13166  df-ndx 13167  df-slot 13168  df-base 13169  df-sets 13170  df-ress 13171  df-plusg 13237  df-mulr 13238  df-starv 13239  df-sca 13240  df-vsca 13241  df-tset 13243  df-ple 13244  df-ds 13246  df-hom 13248  df-cco 13249  df-rest 13343  df-topn 13344  df-topgen 13360  df-pt 13361  df-prds 13364  df-xrs 13419  df-0g 13420  df-gsum 13421  df-qtop 13426  df-imas 13427  df-xps 13429  df-mre 13504  df-mrc 13505  df-acs 13507  df-mnd 14383  df-submnd 14432  df-mulg 14508  df-cntz 14809  df-cmn 15107  df-xmet 16389  df-met 16390  df-bl 16391  df-mopn 16392  df-cnfld 16394  df-top 16652  df-bases 16654  df-topon 16655  df-topsp 16656  df-cld 16772  df-ntr 16773  df-cls 16774  df-nei 16851  df-cn 16973  df-cnp 16974  df-lm 16975  df-haus 17059  df-tx 17273  df-hmeo 17462  df-fbas 17536  df-fg 17537  df-fil 17557  df-fm 17649  df-flim 17650  df-flf 17651  df-xms 17901  df-ms 17902  df-tms 17903  df-cfil 18697  df-cau 18698  df-cmet 18699  df-grpo 20874  df-gid 20875  df-ginv 20876  df-gdiv 20877  df-ablo 20965  df-subgo 20985  df-vc 21118  df-nv 21164  df-va 21167  df-ba 21168  df-sm 21169  df-0v 21170  df-vs 21171  df-nmcv 21172  df-ims 21173  df-dip 21290  df-ssp 21314  df-ph 21407  df-cbn 21458  df-hnorm 21564  df-hba 21565  df-hvsub 21567  df-hlim 21568  df-hcau 21569  df-sh 21802  df-ch 21817  df-oc 21847  df-ch0 21848  df-shs 21903  df-chj 21905  df-pjh 21990
  Copyright terms: Public domain W3C validator