src/alge/prodsc.f90 File Reference

| programmer's documentation

- Main Page
- Related Pages
- Modules
- Data Structures
- Files

- File List
- Globals

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

Dot product `vava` = . More...

## Functions/Subroutines
subroutine | prodsc (ncel, isqrt, va, vb, vavb)

## Detailed Description

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:

- if `isqrt` = 0:

- if `isqrt` = 1:

- if `isqrt` = 10:

- if `isqrt` = 11:

## Function/Subroutine Documentation

subroutine prodsc | ( | integer | ncel,
|  | integer | isqrt,
|  | double precision, dimension(*) | va,
|  | double precision, dimension(*) | vb,
|  | double precision | vavb
| ) |  |

Parameters

  [in] | ncel | number of cells
  [in] | isqrt | flag: 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] | va | first vector to multiply
  [in] | vb | second vector to multiply
  [out] | vavb | dot product