The TELEMAC-MASCARET system  trunk
Functions/Subroutines
ovd.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine ovd (OP, X, Y, Z, C, NPOIN, IOPT, D, EPS)
 

Function/Subroutine Documentation

◆ 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]npoinC A given constant
[in]DA diagonal matrix
[in]EPSThreshold to avoid divisions by zero
[in]IOPTOption 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]NPOINSize of vectors
[in]OPString indicating the operation to be done
[out]XResulting vector
[in]YTo be used in the operation
[in]ZTo be used in the operation
[in]ioptC A given constant
[in]DA diagonal matrix
[in]EPSThreshold to avoid divisions by zero
[in]IOPTOption 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]NPOINSize of vectors
[in]OPString indicating the operation to be done
[out]XResulting vector
[in]YTo be used in the operation
[in]ZTo be used in the operation

Definition at line 7 of file ovd.f.

+ Here is the caller graph for this function: