exec_dist_penta_compact Subroutine

public subroutine exec_dist_penta_compact(du, u, u_recv_s, u_recv_e, tdsops, n_groups)

Single-pass non-periodic pentadiagonal compact-FD solve on CPU. No MPI exchange is needed; each group is solved independently.

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(out), dimension(:, :, :) :: du
real(kind=dp), intent(in), dimension(:, :, :) :: u
real(kind=dp), intent(in), dimension(:, :, :) :: u_recv_s
real(kind=dp), intent(in), dimension(:, :, :) :: u_recv_e
type(tdsops_t), intent(in) :: tdsops
integer, intent(in) :: n_groups

Calls

proc~~exec_dist_penta_compact~2~~CallsGraph proc~exec_dist_penta_compact~2 m_omp_exec_dist::exec_dist_penta_compact proc~der_penta_full m_omp_kernels_dist::der_penta_full proc~exec_dist_penta_compact~2->proc~der_penta_full