MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  ipdiri Unicode version

Theorem ipdiri 21333
Description: Distributive law for inner product. Equation I3 of [Ponnusamy] p. 362. (Contributed by NM, 27-Apr-2007.) (New usage is discouraged.)
Hypotheses
Ref Expression
ip1i.1  |-  X  =  ( BaseSet `  U )
ip1i.2  |-  G  =  ( +v `  U
)
ip1i.4  |-  S  =  ( .s OLD `  U
)
ip1i.7  |-  P  =  ( .i OLD `  U
)
ip1i.9  |-  U  e.  CPreHil
OLD
Assertion
Ref Expression
ipdiri  |-  ( ( A  e.  X  /\  B  e.  X  /\  C  e.  X )  ->  ( ( A G B ) P C )  =  ( ( A P C )  +  ( B P C ) ) )

Proof of Theorem ipdiri
StepHypRef Expression
1 oveq1 5764 . . . 4  |-  ( A  =  if ( A  e.  X ,  A ,  ( 0vec `  U
) )  ->  ( A G B )  =  ( if ( A  e.  X ,  A ,  ( 0vec `  U
) ) G B ) )
21oveq1d 5772 . . 3  |-  ( A  =  if ( A  e.  X ,  A ,  ( 0vec `  U
) )  ->  (
( A G B ) P C )  =  ( ( if ( A  e.  X ,  A ,  ( 0vec `  U ) ) G B ) P C ) )
3 oveq1 5764 . . . 4  |-  ( A  =  if ( A  e.  X ,  A ,  ( 0vec `  U
) )  ->  ( A P C )  =  ( if ( A  e.  X ,  A ,  ( 0vec `  U
) ) P C ) )
43oveq1d 5772 . . 3  |-  ( A  =  if ( A  e.  X ,  A ,  ( 0vec `  U
) )  ->  (
( A P C )  +  ( B P C ) )  =  ( ( if ( A  e.  X ,  A ,  ( 0vec `  U ) ) P C )  +  ( B P C ) ) )
52, 4eqeq12d 2270 . 2  |-  ( A  =  if ( A  e.  X ,  A ,  ( 0vec `  U
) )  ->  (
( ( A G B ) P C )  =  ( ( A P C )  +  ( B P C ) )  <->  ( ( if ( A  e.  X ,  A ,  ( 0vec `  U ) ) G B ) P C )  =  ( ( if ( A  e.  X ,  A , 
( 0vec `  U )
) P C )  +  ( B P C ) ) ) )
6 oveq2 5765 . . . 4  |-  ( B  =  if ( B  e.  X ,  B ,  ( 0vec `  U
) )  ->  ( if ( A  e.  X ,  A ,  ( 0vec `  U ) ) G B )  =  ( if ( A  e.  X ,  A , 
( 0vec `  U )
) G if ( B  e.  X ,  B ,  ( 0vec `  U ) ) ) )
76oveq1d 5772 . . 3  |-  ( B  =  if ( B  e.  X ,  B ,  ( 0vec `  U
) )  ->  (
( if ( A  e.  X ,  A ,  ( 0vec `  U
) ) G B ) P C )  =  ( ( if ( A  e.  X ,  A ,  ( 0vec `  U ) ) G if ( B  e.  X ,  B , 
( 0vec `  U )
) ) P C ) )
8 oveq1 5764 . . . 4  |-  ( B  =  if ( B  e.  X ,  B ,  ( 0vec `  U
) )  ->  ( B P C )  =  ( if ( B  e.  X ,  B ,  ( 0vec `  U
) ) P C ) )
98oveq2d 5773 . . 3  |-  ( B  =  if ( B  e.  X ,  B ,  ( 0vec `  U
) )  ->  (
( if ( A  e.  X ,  A ,  ( 0vec `  U
) ) P C )  +  ( B P C ) )  =  ( ( if ( A  e.  X ,  A ,  ( 0vec `  U ) ) P C )  +  ( if ( B  e.  X ,  B , 
( 0vec `  U )
) P C ) ) )
107, 9eqeq12d 2270 . 2  |-  ( B  =  if ( B  e.  X ,  B ,  ( 0vec `  U
) )  ->  (
( ( if ( A  e.  X ,  A ,  ( 0vec `  U ) ) G B ) P C )  =  ( ( if ( A  e.  X ,  A , 
( 0vec `  U )
) P C )  +  ( B P C ) )  <->  ( ( if ( A  e.  X ,  A ,  ( 0vec `  U ) ) G if ( B  e.  X ,  B , 
( 0vec `  U )
) ) P C )  =  ( ( if ( A  e.  X ,  A , 
( 0vec `  U )
) P C )  +  ( if ( B  e.  X ,  B ,  ( 0vec `  U ) ) P C ) ) ) )
11 oveq2 5765 . . 3  |-  ( C  =  if ( C  e.  X ,  C ,  ( 0vec `  U
) )  ->  (
( if ( A  e.  X ,  A ,  ( 0vec `  U
) ) G if ( B  e.  X ,  B ,  ( 0vec `  U ) ) ) P C )  =  ( ( if ( A  e.  X ,  A ,  ( 0vec `  U ) ) G if ( B  e.  X ,  B , 
( 0vec `  U )
) ) P if ( C  e.  X ,  C ,  ( 0vec `  U ) ) ) )
12 oveq2 5765 . . . 4  |-  ( C  =  if ( C  e.  X ,  C ,  ( 0vec `  U
) )  ->  ( if ( A  e.  X ,  A ,  ( 0vec `  U ) ) P C )  =  ( if ( A  e.  X ,  A , 
( 0vec `  U )
) P if ( C  e.  X ,  C ,  ( 0vec `  U ) ) ) )
13 oveq2 5765 . . . 4  |-  ( C  =  if ( C  e.  X ,  C ,  ( 0vec `  U
) )  ->  ( if ( B  e.  X ,  B ,  ( 0vec `  U ) ) P C )  =  ( if ( B  e.  X ,  B , 
( 0vec `  U )
) P if ( C  e.  X ,  C ,  ( 0vec `  U ) ) ) )
1412, 13oveq12d 5775 . . 3  |-  ( C  =  if ( C  e.  X ,  C ,  ( 0vec `  U
) )  ->  (
( if ( A  e.  X ,  A ,  ( 0vec `  U
) ) P C )  +  ( if ( B  e.  X ,  B ,  ( 0vec `  U ) ) P C ) )  =  ( ( if ( A  e.  X ,  A ,  ( 0vec `  U ) ) P if ( C  e.  X ,  C , 
( 0vec `  U )
) )  +  ( if ( B  e.  X ,  B , 
( 0vec `  U )
) P if ( C  e.  X ,  C ,  ( 0vec `  U ) ) ) ) )
1511, 14eqeq12d 2270 . 2  |-  ( C  =  if ( C  e.  X ,  C ,  ( 0vec `  U
) )  ->  (
( ( if ( A  e.  X ,  A ,  ( 0vec `  U ) ) G if ( B  e.  X ,  B , 
( 0vec `  U )
) ) P C )  =  ( ( if ( A  e.  X ,  A , 
( 0vec `  U )
) P C )  +  ( if ( B  e.  X ,  B ,  ( 0vec `  U ) ) P C ) )  <->  ( ( if ( A  e.  X ,  A ,  ( 0vec `  U ) ) G if ( B  e.  X ,  B , 
( 0vec `  U )
) ) P if ( C  e.  X ,  C ,  ( 0vec `  U ) ) )  =  ( ( if ( A  e.  X ,  A ,  ( 0vec `  U ) ) P if ( C  e.  X ,  C , 
( 0vec `  U )
) )  +  ( if ( B  e.  X ,  B , 
( 0vec `  U )
) P if ( C  e.  X ,  C ,  ( 0vec `  U ) ) ) ) ) )
16 ip1i.1 . . 3  |-  X  =  ( BaseSet `  U )
17 ip1i.2 . . 3  |-  G  =  ( +v `  U
)
18 ip1i.4 . . 3  |-  S  =  ( .s OLD `  U
)
19 ip1i.7 . . 3  |-  P  =  ( .i OLD `  U
)
20 ip1i.9 . . 3  |-  U  e.  CPreHil
OLD
21 eqid 2256 . . . 4  |-  ( 0vec `  U )  =  (
0vec `  U )
2216, 21, 20elimph 21323 . . 3  |-  if ( A  e.  X ,  A ,  ( 0vec `  U ) )  e.  X
2316, 21, 20elimph 21323 . . 3  |-  if ( B  e.  X ,  B ,  ( 0vec `  U ) )  e.  X
2416, 21, 20elimph 21323 . . 3  |-  if ( C  e.  X ,  C ,  ( 0vec `  U ) )  e.  X
2516, 17, 18, 19, 20, 22, 23, 24ipdirilem 21332 . 2  |-  ( ( if ( A  e.  X ,  A , 
( 0vec `  U )
) G if ( B  e.  X ,  B ,  ( 0vec `  U ) ) ) P if ( C  e.  X ,  C ,  ( 0vec `  U
) ) )  =  ( ( if ( A  e.  X ,  A ,  ( 0vec `  U ) ) P if ( C  e.  X ,  C , 
( 0vec `  U )
) )  +  ( if ( B  e.  X ,  B , 
( 0vec `  U )
) P if ( C  e.  X ,  C ,  ( 0vec `  U ) ) ) )
265, 10, 15, 25dedth3h 3549 1  |-  ( ( A  e.  X  /\  B  e.  X  /\  C  e.  X )  ->  ( ( A G B ) P C )  =  ( ( A P C )  +  ( B P C ) ) )
Colors of variables: wff set class
Syntax hints:    -> wi 6    /\ w3a 939    = wceq 1619    e. wcel 1621   ifcif 3506   ` cfv 4638  (class class class)co 5757    + caddc 8673   +vcpv 21066   BaseSetcba 21067   .s
OLDcns 21068   0veccn0v 21069   .i
OLDcdip 21198   CPreHil OLDccphlo 21315
This theorem is referenced by:  ipasslem1  21334  ipasslem2  21335  ipasslem11  21343  dipdir  21345
This theorem was proved from axioms:  ax-1 7  ax-2 8  ax-3 9  ax-mp 10  ax-5 1533  ax-6 1534  ax-7 1535  ax-gen 1536  ax-8 1623  ax-11 1624  ax-13 1625  ax-14 1626  ax-17 1628  ax-12o 1664  ax-10 1678  ax-9 1684  ax-4 1692  ax-16 1927  ax-ext 2237  ax-rep 4071  ax-sep 4081  ax-nul 4089  ax-pow 4126  ax-pr 4152  ax-un 4449  ax-inf2 7275  ax-cnex 8726  ax-resscn 8727  ax-1cn 8728  ax-icn 8729  ax-addcl 8730  ax-addrcl 8731  ax-mulcl 8732  ax-mulrcl 8733  ax-mulcom 8734  ax-addass 8735  ax-mulass 8736  ax-distr 8737  ax-i2m1 8738  ax-1ne0 8739  ax-1rid 8740  ax-rnegex 8741  ax-rrecex 8742  ax-cnre 8743  ax-pre-lttri 8744  ax-pre-lttrn 8745  ax-pre-ltadd 8746  ax-pre-mulgt0 8747  ax-pre-sup 8748
This theorem depends on definitions:  df-bi 179  df-or 361  df-an 362  df-3or 940  df-3an 941  df-tru 1315  df-ex 1538  df-nf 1540  df-sb 1884  df-eu 2121  df-mo 2122  df-clab 2243  df-cleq 2249  df-clel 2252  df-nfc 2381  df-ne 2421  df-nel 2422  df-ral 2520  df-rex 2521  df-reu 2522  df-rab 2523  df-v 2742  df-sbc 2936  df-csb 3024  df-dif 3097  df-un 3099  df-in 3101  df-ss 3108  df-pss 3110  df-nul 3398  df-if 3507  df-pw 3568  df-sn 3587  df-pr 3588  df-tp 3589  df-op 3590  df-uni 3769  df-int 3804  df-iun 3848  df-br 3964  df-opab 4018  df-mpt 4019  df-tr 4054  df-eprel 4242  df-id 4246  df-po 4251  df-so 4252  df-fr 4289  df-se 4290  df-we 4291  df-ord 4332  df-on 4333  df-lim 4334  df-suc 4335  df-om 4594  df-xp 4640  df-rel 4641  df-cnv 4642  df-co 4643  df-dm 4644  df-rn 4645  df-res 4646  df-ima 4647  df-fun 4648  df-fn 4649  df-f 4650  df-f1 4651  df-fo 4652  df-f1o 4653  df-fv 4654  df-isom 4655  df-ov 5760  df-oprab 5761  df-mpt2 5762  df-1st 6021  df-2nd 6022  df-iota 6190  df-riota 6237  df-recs 6321  df-rdg 6356  df-1o 6412  df-oadd 6416  df-er 6593  df-en 6797  df-dom 6798  df-sdom 6799  df-fin 6800  df-sup 7127  df-oi 7158  df-card 7505  df-pnf 8802  df-mnf 8803  df-xr 8804  df-ltxr 8805  df-le 8806  df-sub 8972  df-neg 8973  df-div 9357  df-n 9680  df-2 9737  df-3 9738  df-4 9739  df-n0 9898  df-z 9957  df-uz 10163  df-rp 10287  df-fz 10714  df-fzo 10802  df-seq 10978  df-exp 11036  df-hash 11269  df-cj 11514  df-re 11515  df-im 11516  df-sqr 11650  df-abs 11651  df-clim 11892  df-sum 12089  df-grpo 20783  df-gid 20784  df-ginv 20785  df-ablo 20874  df-vc 21027  df-nv 21073  df-va 21076  df-ba 21077  df-sm 21078  df-0v 21079  df-nmcv 21081  df-dip 21199  df-ph 21316
  Copyright terms: Public domain W3C validator