Go to the source code of this file.
|
subroutine | ovd (OP, X, Y, Z, C, NPOIN, IOPT, D, EPS) |
|
◆ ovd()
subroutine ovd |
( |
character(len=8), intent(in) |
OP, |
|
|
double precision, dimension(npoin), intent(inout) |
X, |
|
|
double precision, dimension(npoin), intent(in) |
Y, |
|
|
double precision, dimension(npoin), intent(in) |
Z, |
|
|
double precision, intent(in) |
C, |
|
|
integer, intent(in) |
NPOIN, |
|
|
integer, intent(in) |
IOPT, |
|
|
double precision, intent(in) |
D, |
|
|
double precision, intent(in) |
EPS |
|
) |
| |
- Parameters
-
[in] | npoin | C A given constant |
[in] | D | A diagonal matrix |
[in] | EPS | Threshold to avoid divisions by zero |
[in] | IOPT | Option for divisions by zero 1: NO TEST DONE (WILL CRASH IF DIVISION BY 0.). 2: INFINITE TERMS REPLACED BY CONSTANT INFINI. 3: STOP IF DIVISION BY ZERO. 4: DIVISIONS BY 0. REPLACED BY DIVISIONS/ZERO ZERO BEING AN OPTIONAL ARGUMENT |
[in] | NPOIN | Size of vectors |
[in] | OP | String indicating the operation to be done |
[out] | X | Resulting vector |
[in] | Y | To be used in the operation |
[in] | Z | To be used in the operation |
[in] | iopt | C A given constant |
[in] | D | A diagonal matrix |
[in] | EPS | Threshold to avoid divisions by zero |
[in] | IOPT | Option for divisions by zero 1: NO TEST DONE (WILL CRASH IF DIVISION BY 0.). 2: INFINITE TERMS REPLACED BY CONSTANT INFINI. 3: STOP IF DIVISION BY ZERO. 4: DIVISIONS BY 0. REPLACED BY DIVISIONS/ZERO ZERO BEING AN OPTIONAL ARGUMENT |
[in] | NPOIN | Size of vectors |
[in] | OP | String indicating the operation to be done |
[out] | X | Resulting vector |
[in] | Y | To be used in the operation |
[in] | Z | To be used in the operation |
Definition at line 7 of file ovd.f.