![]() |
FrontISTR 5.2.0
Large-scale structural analysis program with finit element method
|
Functions/Subroutines | |
subroutine, public | hecmw_solve_send_recv_33 (n, neibpetot, neibpe, stack_import, nod_import, stack_export, nod_export, ws, wr, x, solver_comm, my_rank) |
subroutine, public | hecmw_solve_isend_irecv_33 (n, neibpetot, neibpe, stack_import, nod_import, stack_export, nod_export, x, solver_comm, my_rank, ireq) |
subroutine, public | hecmw_solve_isend_irecv_33_wait (ireq) |
Variables | |
integer(kind=kint), parameter | max_nreq = 8 |
subroutine, public hecmw_solver_sr_33::hecmw_solve_isend_irecv_33 | ( | 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, | ||
real (kind=kreal), dimension (:), intent(inout), target | x, | ||
integer(kind=kint ), intent(in) | solver_comm, | ||
integer(kind=kint ), intent(in) | my_rank, | ||
integer(kind=kint ), intent(out) | ireq | ||
) |
subroutine, public hecmw_solver_sr_33::hecmw_solve_isend_irecv_33_wait | ( | integer(kind=kint ), intent(in) | ireq | ) |
subroutine, public hecmw_solver_sr_33::hecmw_solve_send_recv_33 | ( | 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, | ||
real (kind=kreal), dimension(: ), intent(inout) | ws, | ||
real (kind=kreal), dimension(: ), intent(inout) | wr, | ||
real (kind=kreal), dimension(: ), intent(inout) | x, | ||
integer(kind=kint ), intent(in) | solver_comm, | ||
integer(kind=kint ), intent(in) | my_rank | ||
) |
integer(kind=kint), parameter hecmw_solver_sr_33::max_nreq = 8 |
Definition at line 34 of file hecmw_solver_SR_33.F90.