Go to the source code of this file.
|
subroutine | assve1 (X, IKLE, W, NELEM, NELMAX, LV, MSK, MASKEL) |
|
◆ assve1()
subroutine assve1 |
( |
double precision, dimension(*), intent(inout) |
X, |
|
|
integer, dimension(nelmax), intent(in) |
IKLE, |
|
|
double precision, dimension(nelmax), intent(in) |
W, |
|
|
integer, intent(in) |
NELEM, |
|
|
integer, intent(in) |
NELMAX, |
|
|
integer, intent(in) |
LV, |
|
|
logical, intent(in) |
MSK, |
|
|
double precision, dimension(*), intent(in) |
MASKEL |
|
) |
| |
- Parameters
-
[in,out] | x | [in] IKLE Connectivity table |
[in] | LV | Vector length of the computer |
[in] | MASKEL | Masking of elements =1. : NORMAL =0. : MASKED ELEMENT |
[in] | MSK | If yes, there is masked elements. |
[in] | NELEM | Number of elements in the mesh |
[in] | NELMAX | First dimension of ikle and w. |
[in] | W | Work array with a non assembled form of the RESULT |
[in,out] | X | Assembled vector |
Definition at line 7 of file assve1.f.