|  | programmer's documentation | 
Dot product vava =  .  
More...
.  
More...
| Functions/Subroutines | |
| subroutine | prodsc (ncel, isqrt, va, vb, vavb) | 
Dot product vava =  .
. 
The flag isqrt can be used to compute the square root of the dot product or the normed residual of two extensive vectors:
isqrt = 0: 
![\[ v_a \cdot v_b = \sum_{\celli =1}^{\ncell} v_{a_\celli} v_{b_\celli} \]](form_44.png) 
isqrt = 1: 
![\[ v_a \cdot v_b = \sqrt{\sum_{\celli =1}^{\ncell} v_{a_\celli} v_{b_\celli}} \]](form_45.png) 
isqrt = 10: 
![\[ v_a \cdot v_b = \sum_{\celli =1}^{\ncell} \dfrac{v_{a_\celli} v_{b_\celli}}{\norm{\vol{\celli}}} \]](form_46.png) 
isqrt = 11: 
![\[ v_a \cdot v_b = \sqrt{\sum_{\celli =1}^{\ncell} \dfrac{v_{a_\celli} v_{b_\celli}}{\norm{\vol{\celli}}}} \]](form_47.png) 
| subroutine prodsc | ( | integer | ncel, | 
| integer | isqrt, | ||
| double precision, dimension(*) | va, | ||
| double precision, dimension(*) | vb, | ||
| double precision | vavb | ||
| ) | 
| [in] | ncel | number of cells | 
| [in] | isqrt | flag: 
 | 
| [in] | va | first vector to multiply | 
| [in] | vb | second vector to multiply | 
| [out] | vavb | dot product | 
 1.8.3.1
 1.8.3.1