![]() |
FrontISTR 5.2.0
Large-scale structural analysis program with finit element method
|
Adaptive Mesh Refinement. More...
Functions/Subroutines | |
subroutine | hecmw_adapt_int_send_recv (n, neibpetot, neibpe, stack_import, nod_import, stack_export, nod_export, ws, wr, x, solver_comm, my_rank, nb, m) |
Adaptive Mesh Refinement.
subroutine hecmw_adapt_int_sr::hecmw_adapt_int_send_recv | ( | integer(kind=kint), intent(in) | n, |
integer(kind=kint), intent(in) | neibpetot, | ||
integer(kind=kint), dimension (:), pointer | neibpe, | ||
integer(kind=kint), dimension(:), pointer | stack_import, | ||
integer(kind=kint), dimension (:), pointer | nod_import, | ||
integer(kind=kint), dimension(:), pointer | stack_export, | ||
integer(kind=kint), dimension (:), pointer | nod_export, | ||
integer(kind=kint), dimension(nb*m), intent(inout) | ws, | ||
integer(kind=kint), dimension(nb*m), intent(inout) | wr, | ||
integer(kind=kint), dimension(nb*n), intent(inout) | x, | ||
integer(kind=kint), intent(in) | solver_comm, | ||
integer(kind=kint), intent(in) | my_rank, | ||
nb, | |||
integer(kind=kint), intent(in) | m | ||
) |