Go to the source code of this file.
|
subroutine | asmvec (X, IKLE, NPOIN, NELEM, NELMAX, NDP, W, INIT, LV) |
|
◆ asmvec()
subroutine asmvec |
( |
double precision, dimension(npoin), intent(inout) |
X, |
|
|
integer, dimension(nelmax,ndp), intent(in) |
IKLE, |
|
|
integer, intent(in) |
NPOIN, |
|
|
integer, intent(in) |
NELEM, |
|
|
integer, intent(in) |
NELMAX, |
|
|
integer, intent(in) |
NDP, |
|
|
double precision, dimension(nelmax,ndp), intent(in) |
W, |
|
|
logical, intent(in) |
INIT, |
|
|
integer, intent(in) |
LV |
|
) |
| |
- Parameters
-
[in] | nelmax | IKLE Connectivity table |
[in] | INIT | Logical : if true x is initialised to 0. |
[in] | LV | Vector length of the computer |
[in] | NDP | Second dimension of ikle |
[in] | NELEM | Number of elements in the mesh |
[in] | NELMAX | First dimension of ikle and w. |
[in] | NPOIN | Number of points in x |
[in] | W | Work array with a non assembled form of the RESULT W HAS DIMENSION NELMAX * NDP(IELM) NDP IS THE NUMBER OF POINTS IN THE ELEMENT |
[in,out] | X | Assembled vector |
[in] | npoin | IKLE Connectivity table |
[in] | INIT | Logical : if true x is initialised to 0. |
[in] | LV | Vector length of the computer |
[in] | NDP | Second dimension of ikle |
[in] | NELEM | Number of elements in the mesh |
[in] | NELMAX | First dimension of ikle and w. |
[in] | NPOIN | Number of points in x |
[in] | W | Work array with a non assembled form of the RESULT W HAS DIMENSION NELMAX * NDP(IELM) NDP IS THE NUMBER OF POINTS IN THE ELEMENT |
[in,out] | X | Assembled vector |
[in] | nelem | IKLE Connectivity table |
[in] | INIT | Logical : if true x is initialised to 0. |
[in] | LV | Vector length of the computer |
[in] | NDP | Second dimension of ikle |
[in] | NELEM | Number of elements in the mesh |
[in] | NELMAX | First dimension of ikle and w. |
[in] | NPOIN | Number of points in x |
[in] | W | Work array with a non assembled form of the RESULT W HAS DIMENSION NELMAX * NDP(IELM) NDP IS THE NUMBER OF POINTS IN THE ELEMENT |
[in,out] | X | Assembled vector |
[in] | ndp | IKLE Connectivity table |
[in] | INIT | Logical : if true x is initialised to 0. |
[in] | LV | Vector length of the computer |
[in] | NDP | Second dimension of ikle |
[in] | NELEM | Number of elements in the mesh |
[in] | NELMAX | First dimension of ikle and w. |
[in] | NPOIN | Number of points in x |
[in] | W | Work array with a non assembled form of the RESULT W HAS DIMENSION NELMAX * NDP(IELM) NDP IS THE NUMBER OF POINTS IN THE ELEMENT |
[in,out] | X | Assembled vector |
[in] | lv | IKLE Connectivity table |
[in] | INIT | Logical : if true x is initialised to 0. |
[in] | LV | Vector length of the computer |
[in] | NDP | Second dimension of ikle |
[in] | NELEM | Number of elements in the mesh |
[in] | NELMAX | First dimension of ikle and w. |
[in] | NPOIN | Number of points in x |
[in] | W | Work array with a non assembled form of the RESULT W HAS DIMENSION NELMAX * NDP(IELM) NDP IS THE NUMBER OF POINTS IN THE ELEMENT |
[in,out] | X | Assembled vector |
Definition at line 7 of file asmvec.f.