Go to the source code of this file.
Functions/Subroutines | |
| subroutine | mv0303 (OP, X, DA, TYPDIA, XA12, XA13, XA21, XA23, XA31, XA32, TYPEXT, Y, C, IKLE1, IKLE2, IKLE3, NPOIN, NELEM, W1, W2, W3, X_ERR, Y_ERR, DA_ERR) |
Function/Subroutine Documentation
◆ mv0303()
| subroutine mv0303 | ( | character(len=8), intent(in) | OP, |
| double precision, dimension(*), intent(inout) | X, | ||
| double precision, dimension(*), intent(in) | DA, | ||
| character(len=1), intent(in) | TYPDIA, | ||
| double precision, dimension(*), intent(in) | XA12, | ||
| double precision, dimension(*), intent(in) | XA13, | ||
| double precision, dimension(*), intent(in) | XA21, | ||
| double precision, dimension(*), intent(in) | XA23, | ||
| double precision, dimension(*), intent(in) | XA31, | ||
| double precision, dimension(*), intent(in) | XA32, | ||
| character(len=1), intent(in) | TYPEXT, | ||
| double precision, dimension(*), intent(in) | Y, | ||
| double precision, intent(in) | C, | ||
| integer, dimension(*), intent(in) | IKLE1, | ||
| integer, dimension(*), intent(in) | IKLE2, | ||
| integer, dimension(*), intent(in) | IKLE3, | ||
| integer, intent(in) | NPOIN, | ||
| integer, intent(in) | NELEM, | ||
| double precision, dimension(*), intent(inout) | W1, | ||
| double precision, dimension(*), intent(inout) | W2, | ||
| double precision, dimension(*), intent(inout) | W3, | ||
| double precision, dimension(*), intent(inout), optional | X_ERR, | ||
| double precision, dimension(*), intent(in), optional | Y_ERR, | ||
| double precision, dimension(*), intent(in), optional | DA_ERR | ||
| ) |
- Parameters
-
[in] nelem C A given constant [in] DA Matrix diagonal [in] IKLE1 First points of triangles [in] IKLE2 Second points of triangles [in] IKLE3 Third points of triangles [in] NELEM Number of elements [in] NPOIN Number of points [in] OP Operation to be done (see above) [in] TYPDIA Type of diagonal: TYPDIA = 'Q' : ANY VALUE TYPDIA = 'I' : IDENTITY TYPDIA = '0' : ZERO [in] TYPEXT Type of off-diagonal terms TYPEXT = 'Q' : ANY VALUE TYPEXT = 'S' : SYMMETRIC TYPEXT = '0' : ZERO [in,out] W1 Result in non assembled form [in,out] W2 Result in non assembled form [in,out] W3 Result in non assembled form [in,out] X Result in assembled form [in] XA13 Off-diagonal term of matrix [in] XA21 Off-diagonal term of matrix [in] XA23 Off-diagonal term of matrix [in] XA31 Off-diagonal term of matrix [in] XA32 Off-diagonal term of matrix [in] Y Vector used in the operation [in] npoin C A given constant [in] DA Matrix diagonal [in] IKLE1 First points of triangles [in] IKLE2 Second points of triangles [in] IKLE3 Third points of triangles [in] NELEM Number of elements [in] NPOIN Number of points [in] OP Operation to be done (see above) [in] TYPDIA Type of diagonal: TYPDIA = 'Q' : ANY VALUE TYPDIA = 'I' : IDENTITY TYPDIA = '0' : ZERO [in] TYPEXT Type of off-diagonal terms TYPEXT = 'Q' : ANY VALUE TYPEXT = 'S' : SYMMETRIC TYPEXT = '0' : ZERO [in,out] W1 Result in non assembled form [in,out] W2 Result in non assembled form [in,out] W3 Result in non assembled form [in,out] X Result in assembled form [in] XA13 Off-diagonal term of matrix [in] XA21 Off-diagonal term of matrix [in] XA23 Off-diagonal term of matrix [in] XA31 Off-diagonal term of matrix [in] XA32 Off-diagonal term of matrix [in] Y Vector used in the operation
Definition at line 9 of file mv0303.f.
Here is the call graph for this function: Here is the caller graph for this function: