Go to the source code of this file.
|
subroutine | mt14pp (T, XM, PPQ, LEGO, XMUL, SW, W, H, SURFAC, IKLE, NELEM, NELMAX) |
|
◆ mt14pp()
subroutine mt14pp |
( |
double precision, dimension(nelmax,6), intent(inout) |
T, |
|
|
double precision, dimension(30,nelmax), intent(inout) |
XM, |
|
|
integer, dimension(6,6), intent(in) |
PPQ, |
|
|
logical, intent(in) |
LEGO, |
|
|
double precision, intent(in) |
XMUL, |
|
|
type(bief_obj), intent(in) |
SW, |
|
|
double precision, dimension(*), intent(in) |
W, |
|
|
double precision, dimension(nelmax,6), intent(in) |
H, |
|
|
double precision, dimension(nelmax), intent(in) |
SURFAC, |
|
|
integer, dimension(nelmax,6), intent(in) |
IKLE, |
|
|
integer, intent(in) |
NELEM, |
|
|
integer, intent(in) |
NELMAX |
|
) |
| |
- Parameters
-
[in] | nelem | H Function used in the formula |
[in] | IKLE | Connectivity table |
[in] | LEGO | Logical. if yes result assembled. |
[in] | NELEM | Number of elements |
[in] | NELMAX | Maximum number of elements |
[in] | PPQ | Storage in xm of off-diagonal elements |
[in] | SW | Bief_obj structure of w |
[in] | SURFAC | Area of 2d elements |
[in,out] | T | Work array for element by element diagonal |
[in] | W | Function used in the formula |
[in,out] | XM | Off-diagonal terms |
[in] | XMUL | Coefficient for multiplication |
[in] | nelmax | H Function used in the formula |
[in] | IKLE | Connectivity table |
[in] | LEGO | Logical. if yes result assembled. |
[in] | NELEM | Number of elements |
[in] | NELMAX | Maximum number of elements |
[in] | PPQ | Storage in xm of off-diagonal elements |
[in] | SW | Bief_obj structure of w |
[in] | SURFAC | Area of 2d elements |
[in,out] | T | Work array for element by element diagonal |
[in] | W | Function used in the formula |
[in,out] | XM | Off-diagonal terms |
[in] | XMUL | Coefficient for multiplication |
Definition at line 8 of file mt14pp.f.