programmer's documentation
 All Data Structures Files Functions Variables Typedefs Enumerations Enumerator Macros Groups Pages
Functions/Subroutines
prodsc.f90 File Reference

Dot product vava = $ v_a \cdot v_b $. More...

Functions/Subroutines

subroutine prodsc (ncel, isqrt, va, vb, vavb)
 

Detailed Description

Dot product vava = $ v_a \cdot v_b $.

The flag isqrt can be used to compute the square root of the dot product or the normed residual of two extensive vectors:

Function/Subroutine Documentation

subroutine prodsc ( integer  ncel,
integer  isqrt,
double precision, dimension(*)  va,
double precision, dimension(*)  vb,
double precision  vavb 
)
Parameters
[in]ncelnumber of cells
[in]isqrtflag:
  • 0 to return the canonic scalar product
  • 1 to return the square root
  • 10 to return the scalar product of extensive vectors
  • 11 to return the square root of the scalar product of extensive vectors
[in]vafirst vector to multiply
[in]vbsecond vector to multiply
[out]vavbdot product