MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  dipcl Structured version   Visualization version   GIF version

Theorem dipcl 30460
Description: An inner product is a complex number. (Contributed by NM, 1-Feb-2007.) (Revised by Mario Carneiro, 5-May-2014.) (New usage is discouraged.)
Hypotheses
Ref Expression
ipcl.1 𝑋 = (BaseSetβ€˜π‘ˆ)
ipcl.7 𝑃 = (·𝑖OLDβ€˜π‘ˆ)
Assertion
Ref Expression
dipcl ((π‘ˆ ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋) β†’ (𝐴𝑃𝐡) ∈ β„‚)

Proof of Theorem dipcl
Dummy variable π‘˜ is distinct from all other variables.
StepHypRef Expression
1 ipcl.1 . . 3 𝑋 = (BaseSetβ€˜π‘ˆ)
2 eqid 2724 . . 3 ( +𝑣 β€˜π‘ˆ) = ( +𝑣 β€˜π‘ˆ)
3 eqid 2724 . . 3 ( ·𝑠OLD β€˜π‘ˆ) = ( ·𝑠OLD β€˜π‘ˆ)
4 eqid 2724 . . 3 (normCVβ€˜π‘ˆ) = (normCVβ€˜π‘ˆ)
5 ipcl.7 . . 3 𝑃 = (·𝑖OLDβ€˜π‘ˆ)
61, 2, 3, 4, 5ipval 30451 . 2 ((π‘ˆ ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋) β†’ (𝐴𝑃𝐡) = (Ξ£π‘˜ ∈ (1...4)((iβ†‘π‘˜) Β· (((normCVβ€˜π‘ˆ)β€˜(𝐴( +𝑣 β€˜π‘ˆ)((iβ†‘π‘˜)( ·𝑠OLD β€˜π‘ˆ)𝐡)))↑2)) / 4))
7 fzfid 13939 . . . 4 ((π‘ˆ ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋) β†’ (1...4) ∈ Fin)
8 ax-icn 11166 . . . . . . 7 i ∈ β„‚
9 elfznn 13531 . . . . . . . 8 (π‘˜ ∈ (1...4) β†’ π‘˜ ∈ β„•)
109nnnn0d 12531 . . . . . . 7 (π‘˜ ∈ (1...4) β†’ π‘˜ ∈ β„•0)
11 expcl 14046 . . . . . . 7 ((i ∈ β„‚ ∧ π‘˜ ∈ β„•0) β†’ (iβ†‘π‘˜) ∈ β„‚)
128, 10, 11sylancr 586 . . . . . 6 (π‘˜ ∈ (1...4) β†’ (iβ†‘π‘˜) ∈ β„‚)
1312adantl 481 . . . . 5 (((π‘ˆ ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋) ∧ π‘˜ ∈ (1...4)) β†’ (iβ†‘π‘˜) ∈ β„‚)
141, 2, 3, 4, 5ipval2lem4 30454 . . . . . 6 (((π‘ˆ ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋) ∧ (iβ†‘π‘˜) ∈ β„‚) β†’ (((normCVβ€˜π‘ˆ)β€˜(𝐴( +𝑣 β€˜π‘ˆ)((iβ†‘π‘˜)( ·𝑠OLD β€˜π‘ˆ)𝐡)))↑2) ∈ β„‚)
1512, 14sylan2 592 . . . . 5 (((π‘ˆ ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋) ∧ π‘˜ ∈ (1...4)) β†’ (((normCVβ€˜π‘ˆ)β€˜(𝐴( +𝑣 β€˜π‘ˆ)((iβ†‘π‘˜)( ·𝑠OLD β€˜π‘ˆ)𝐡)))↑2) ∈ β„‚)
1613, 15mulcld 11233 . . . 4 (((π‘ˆ ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋) ∧ π‘˜ ∈ (1...4)) β†’ ((iβ†‘π‘˜) Β· (((normCVβ€˜π‘ˆ)β€˜(𝐴( +𝑣 β€˜π‘ˆ)((iβ†‘π‘˜)( ·𝑠OLD β€˜π‘ˆ)𝐡)))↑2)) ∈ β„‚)
177, 16fsumcl 15681 . . 3 ((π‘ˆ ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋) β†’ Ξ£π‘˜ ∈ (1...4)((iβ†‘π‘˜) Β· (((normCVβ€˜π‘ˆ)β€˜(𝐴( +𝑣 β€˜π‘ˆ)((iβ†‘π‘˜)( ·𝑠OLD β€˜π‘ˆ)𝐡)))↑2)) ∈ β„‚)
18 4cn 12296 . . . 4 4 ∈ β„‚
19 4ne0 12319 . . . 4 4 β‰  0
20 divcl 11877 . . . 4 ((Ξ£π‘˜ ∈ (1...4)((iβ†‘π‘˜) Β· (((normCVβ€˜π‘ˆ)β€˜(𝐴( +𝑣 β€˜π‘ˆ)((iβ†‘π‘˜)( ·𝑠OLD β€˜π‘ˆ)𝐡)))↑2)) ∈ β„‚ ∧ 4 ∈ β„‚ ∧ 4 β‰  0) β†’ (Ξ£π‘˜ ∈ (1...4)((iβ†‘π‘˜) Β· (((normCVβ€˜π‘ˆ)β€˜(𝐴( +𝑣 β€˜π‘ˆ)((iβ†‘π‘˜)( ·𝑠OLD β€˜π‘ˆ)𝐡)))↑2)) / 4) ∈ β„‚)
2118, 19, 20mp3an23 1449 . . 3 (Ξ£π‘˜ ∈ (1...4)((iβ†‘π‘˜) Β· (((normCVβ€˜π‘ˆ)β€˜(𝐴( +𝑣 β€˜π‘ˆ)((iβ†‘π‘˜)( ·𝑠OLD β€˜π‘ˆ)𝐡)))↑2)) ∈ β„‚ β†’ (Ξ£π‘˜ ∈ (1...4)((iβ†‘π‘˜) Β· (((normCVβ€˜π‘ˆ)β€˜(𝐴( +𝑣 β€˜π‘ˆ)((iβ†‘π‘˜)( ·𝑠OLD β€˜π‘ˆ)𝐡)))↑2)) / 4) ∈ β„‚)
2217, 21syl 17 . 2 ((π‘ˆ ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋) β†’ (Ξ£π‘˜ ∈ (1...4)((iβ†‘π‘˜) Β· (((normCVβ€˜π‘ˆ)β€˜(𝐴( +𝑣 β€˜π‘ˆ)((iβ†‘π‘˜)( ·𝑠OLD β€˜π‘ˆ)𝐡)))↑2)) / 4) ∈ β„‚)
236, 22eqeltrd 2825 1 ((π‘ˆ ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋) β†’ (𝐴𝑃𝐡) ∈ β„‚)
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ∧ wa 395   ∧ w3a 1084   = wceq 1533   ∈ wcel 2098   β‰  wne 2932  β€˜cfv 6534  (class class class)co 7402  β„‚cc 11105  0cc0 11107  1c1 11108  ici 11109   Β· cmul 11112   / cdiv 11870  2c2 12266  4c4 12268  β„•0cn0 12471  ...cfz 13485  β†‘cexp 14028  Ξ£csu 15634  NrmCVeccnv 30332   +𝑣 cpv 30333  BaseSetcba 30334   ·𝑠OLD cns 30335  normCVcnmcv 30338  Β·π‘–OLDcdip 30448
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5276  ax-sep 5290  ax-nul 5297  ax-pow 5354  ax-pr 5418  ax-un 7719  ax-inf2 9633  ax-cnex 11163  ax-resscn 11164  ax-1cn 11165  ax-icn 11166  ax-addcl 11167  ax-addrcl 11168  ax-mulcl 11169  ax-mulrcl 11170  ax-mulcom 11171  ax-addass 11172  ax-mulass 11173  ax-distr 11174  ax-i2m1 11175  ax-1ne0 11176  ax-1rid 11177  ax-rnegex 11178  ax-rrecex 11179  ax-cnre 11180  ax-pre-lttri 11181  ax-pre-lttrn 11182  ax-pre-ltadd 11183  ax-pre-mulgt0 11184  ax-pre-sup 11185
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3771  df-csb 3887  df-dif 3944  df-un 3946  df-in 3948  df-ss 3958  df-pss 3960  df-nul 4316  df-if 4522  df-pw 4597  df-sn 4622  df-pr 4624  df-op 4628  df-uni 4901  df-int 4942  df-iun 4990  df-br 5140  df-opab 5202  df-mpt 5223  df-tr 5257  df-id 5565  df-eprel 5571  df-po 5579  df-so 5580  df-fr 5622  df-se 5623  df-we 5624  df-xp 5673  df-rel 5674  df-cnv 5675  df-co 5676  df-dm 5677  df-rn 5678  df-res 5679  df-ima 5680  df-pred 6291  df-ord 6358  df-on 6359  df-lim 6360  df-suc 6361  df-iota 6486  df-fun 6536  df-fn 6537  df-f 6538  df-f1 6539  df-fo 6540  df-f1o 6541  df-fv 6542  df-isom 6543  df-riota 7358  df-ov 7405  df-oprab 7406  df-mpo 7407  df-om 7850  df-1st 7969  df-2nd 7970  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-1o 8462  df-er 8700  df-en 8937  df-dom 8938  df-sdom 8939  df-fin 8940  df-sup 9434  df-oi 9502  df-card 9931  df-pnf 11249  df-mnf 11250  df-xr 11251  df-ltxr 11252  df-le 11253  df-sub 11445  df-neg 11446  df-div 11871  df-nn 12212  df-2 12274  df-3 12275  df-4 12276  df-n0 12472  df-z 12558  df-uz 12822  df-rp 12976  df-fz 13486  df-fzo 13629  df-seq 13968  df-exp 14029  df-hash 14292  df-cj 15048  df-re 15049  df-im 15050  df-sqrt 15184  df-abs 15185  df-clim 15434  df-sum 15635  df-grpo 30241  df-ablo 30293  df-vc 30307  df-nv 30340  df-va 30343  df-ba 30344  df-sm 30345  df-0v 30346  df-nmcv 30348  df-dip 30449
This theorem is referenced by:  ipf  30461  ipipcj  30463  ip1ilem  30574  ip2i  30576  ipasslem1  30579  ipasslem2  30580  ipasslem4  30582  ipasslem5  30583  ipasslem7  30584  ipasslem8  30585  ipasslem9  30586  ipasslem10  30587  ipasslem11  30588  dipdi  30591  ip2dii  30592  dipassr  30594  dipsubdir  30596  dipsubdi  30597  pythi  30598  siilem1  30599  siilem2  30600  siii  30601  ipblnfi  30603  ip2eqi  30604  htthlem  30665
  Copyright terms: Public domain W3C validator