Go to the source code of this file.
Functions/Subroutines | |
| subroutine | mv0404_2 (OP, X, DA, TYPDIA, XA, TYPEXT, Y, C, IKLE1, IKLE2, IKLE3, IKLE4, NPOIN, NELEM, W1, W2, W3, W4, DIM1XA) |
Function/Subroutine Documentation
◆ mv0404_2()
| subroutine mv0404_2 | ( | 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(dim1xa,*), intent(in) | XA, | ||
| 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, dimension(*), intent(in) | IKLE4, | ||
| 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) | W4, | ||
| integer, intent(in) | DIM1XA | ||
| ) |
- Parameters
-
[in] nelem C A given constant [in] DA Matrix diagonal [in] IKLE1 First points of elements [in] IKLE2 Second points of elements [in] IKLE3 Third points of elements [in] IKLE4 Fourth points of elements [in] NELEM Number of elements [in] NPOIN Number of linear 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] W4 Result in non assembled form [in,out] X Result in assembled form [in] XA13 Off-diagonal term of matrix [in] XA14 Off-diagonal term of matrix [in] XA21 Off-diagonal term of matrix [in] XA23 Off-diagonal term of matrix [in] XA24 Off-diagonal term of matrix [in] XA31 Off-diagonal term of matrix [in] XA32 Off-diagonal term of matrix [in] XA34 Off-diagonal term of matrix [in] XA41 Off-diagonal term of matrix [in] XA42 Off-diagonal term of matrix [in] XA43 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 elements [in] IKLE2 Second points of elements [in] IKLE3 Third points of elements [in] IKLE4 Fourth points of elements [in] NELEM Number of elements [in] NPOIN Number of linear 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] W4 Result in non assembled form [in,out] X Result in assembled form [in] XA13 Off-diagonal term of matrix [in] XA14 Off-diagonal term of matrix [in] XA21 Off-diagonal term of matrix [in] XA23 Off-diagonal term of matrix [in] XA24 Off-diagonal term of matrix [in] XA31 Off-diagonal term of matrix [in] XA32 Off-diagonal term of matrix [in] XA34 Off-diagonal term of matrix [in] XA41 Off-diagonal term of matrix [in] XA42 Off-diagonal term of matrix [in] XA43 Off-diagonal term of matrix [in] Y Vector used in the operation [in] dim1xa C A given constant [in] DA Matrix diagonal [in] IKLE1 First points of elements [in] IKLE2 Second points of elements [in] IKLE3 Third points of elements [in] IKLE4 Fourth points of elements [in] NELEM Number of elements [in] NPOIN Number of linear 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] W4 Result in non assembled form [in,out] X Result in assembled form [in] XA13 Off-diagonal term of matrix [in] XA14 Off-diagonal term of matrix [in] XA21 Off-diagonal term of matrix [in] XA23 Off-diagonal term of matrix [in] XA24 Off-diagonal term of matrix [in] XA31 Off-diagonal term of matrix [in] XA32 Off-diagonal term of matrix [in] XA34 Off-diagonal term of matrix [in] XA41 Off-diagonal term of matrix [in] XA42 Off-diagonal term of matrix [in] XA43 Off-diagonal term of matrix [in] Y Vector used in the operation
Definition at line 8 of file mv0404_2.f.
Here is the call graph for this function: Here is the caller graph for this function: