Go to the source code of this file.
Functions/Subroutines | |
| subroutine | mv0202 (OP, X, DA, TYPDIA, XA12, XA21, TYPEXT, Y, C, IKLE1, IKLE2, NPOIN, NELEM, W1, W2) |
Function/Subroutine Documentation
◆ mv0202()
| subroutine mv0202 | ( | character(len=*), intent(in) | OP, |
| double precision, dimension(*), intent(inout) | X, | ||
| double precision, dimension(*), intent(in) | DA, | ||
| character(len=*), intent(in) | TYPDIA, | ||
| double precision, dimension(*), intent(in) | XA12, | ||
| double precision, dimension(*), intent(in) | XA21, | ||
| character(len=*), 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, intent(in) | NPOIN, | ||
| integer, intent(in) | NELEM, | ||
| double precision, dimension(*), intent(inout) | W1, | ||
| double precision, dimension(*), intent(inout) | W2 | ||
| ) |
- Parameters
-
[in] nelem C A given constant [in] DA Matrix diagonal [in] IKLE1 First point of segment [in] IKLE2 Second point of segment [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] X Result in assembled form [in] XA12 Off-diagonal term of matrix [in] XA21 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 point of segment [in] IKLE2 Second point of segment [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] X Result in assembled form [in] XA12 Off-diagonal term of matrix [in] XA21 Off-diagonal term of matrix [in] Y Vector used in the operation
Definition at line 8 of file mv0202.f.
Here is the call graph for this function: Here is the caller graph for this function: