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.