m_cuda_kernels_dist Module


Uses

  • module~~m_cuda_kernels_dist~~UsesGraph module~m_cuda_kernels_dist m_cuda_kernels_dist cudafor cudafor module~m_cuda_kernels_dist->cudafor module~m_common m_common module~m_cuda_kernels_dist->module~m_common mpi mpi module~m_common->mpi

Used by

  • module~~m_cuda_kernels_dist~~UsedByGraph module~m_cuda_kernels_dist m_cuda_kernels_dist module~m_cuda_backend m_cuda_backend module~m_cuda_backend->module~m_cuda_kernels_dist module~m_cuda_exec_dist m_cuda_exec_dist module~m_cuda_backend->module~m_cuda_exec_dist module~m_cuda_exec_dist->module~m_cuda_kernels_dist program~xcompact xcompact program~xcompact->module~m_cuda_backend

Subroutines

public subroutine der_univ_dist(du, send_u_s, send_u_e, u, u_s, u_e, n_tds, n_rhs, coeffs_s, coeffs_e, coeffs, ffr, fbc, faf)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(out), device, dimension(:, :, :) :: du
real(kind=dp), intent(out), device, dimension(:, :, :) :: send_u_s
real(kind=dp), intent(out), device, dimension(:, :, :) :: send_u_e
real(kind=dp), intent(in), device, dimension(:, :, :) :: u
real(kind=dp), intent(in), device, dimension(:, :, :) :: u_s
real(kind=dp), intent(in), device, dimension(:, :, :) :: u_e
integer, intent(in), value :: n_tds
integer, intent(in), value :: n_rhs
real(kind=dp), intent(in), device, dimension(:, :) :: coeffs_s
real(kind=dp), intent(in), device, dimension(:, :) :: coeffs_e
real(kind=dp), intent(in), device, dimension(:) :: coeffs
real(kind=dp), intent(in), device, dimension(:) :: ffr
real(kind=dp), intent(in), device, dimension(:) :: fbc
real(kind=dp), intent(in), device, dimension(:) :: faf

public subroutine der_univ_subs(du, recv_u_s, recv_u_e, n, dist_sa, dist_sc, strch)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(out), device, dimension(:, :, :) :: du
real(kind=dp), intent(in), device, dimension(:, :, :) :: recv_u_s
real(kind=dp), intent(in), device, dimension(:, :, :) :: recv_u_e
integer, intent(in), value :: n
real(kind=dp), intent(in), device, dimension(:) :: dist_sa
real(kind=dp), intent(in), device, dimension(:) :: dist_sc
real(kind=dp), intent(in), device, dimension(:) :: strch

public subroutine transeq_3fused_dist(du, dud, d2u, send_du_s, send_du_e, send_dud_s, send_dud_e, send_d2u_s, send_d2u_e, u, u_s, u_e, v, v_s, v_e, n_tds, n_rhs, du_coeffs_s, du_coeffs_e, du_coeffs, du_fw, du_bw, du_af, dud_coeffs_s, dud_coeffs_e, dud_coeffs, dud_fw, dud_bw, dud_af, d2u_coeffs_s, d2u_coeffs_e, d2u_coeffs, d2u_fw, d2u_bw, d2u_af)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(out), device, dimension(:, :, :) :: du
real(kind=dp), intent(out), device, dimension(:, :, :) :: dud
real(kind=dp), intent(out), device, dimension(:, :, :) :: d2u
real(kind=dp), intent(out), device, dimension(:, :, :) :: send_du_s
real(kind=dp), intent(out), device, dimension(:, :, :) :: send_du_e
real(kind=dp), intent(out), device, dimension(:, :, :) :: send_dud_s
real(kind=dp), intent(out), device, dimension(:, :, :) :: send_dud_e
real(kind=dp), intent(out), device, dimension(:, :, :) :: send_d2u_s
real(kind=dp), intent(out), device, dimension(:, :, :) :: send_d2u_e
real(kind=dp), intent(in), device, dimension(:, :, :) :: u
real(kind=dp), intent(in), device, dimension(:, :, :) :: u_s
real(kind=dp), intent(in), device, dimension(:, :, :) :: u_e
real(kind=dp), intent(in), device, dimension(:, :, :) :: v
real(kind=dp), intent(in), device, dimension(:, :, :) :: v_s
real(kind=dp), intent(in), device, dimension(:, :, :) :: v_e
integer, intent(in), value :: n_tds
integer, intent(in), value :: n_rhs
real(kind=dp), intent(in), device :: du_coeffs_s(:,:)
real(kind=dp), intent(in), device :: du_coeffs_e(:,:)
real(kind=dp), intent(in), device :: du_coeffs(:)
real(kind=dp), intent(in), device :: du_fw(:)
real(kind=dp), intent(in), device :: du_bw(:)
real(kind=dp), intent(in), device :: du_af(:)
real(kind=dp), intent(in), device :: dud_coeffs_s(:,:)
real(kind=dp), intent(in), device :: dud_coeffs_e(:,:)
real(kind=dp), intent(in), device :: dud_coeffs(:)
real(kind=dp), intent(in), device :: dud_fw(:)
real(kind=dp), intent(in), device :: dud_bw(:)
real(kind=dp), intent(in), device :: dud_af(:)
real(kind=dp), intent(in), device :: d2u_coeffs_s(:,:)
real(kind=dp), intent(in), device :: d2u_coeffs_e(:,:)
real(kind=dp), intent(in), device :: d2u_coeffs(:)
real(kind=dp), intent(in), device :: d2u_fw(:)
real(kind=dp), intent(in), device :: d2u_bw(:)
real(kind=dp), intent(in), device :: d2u_af(:)

public subroutine transeq_3fused_subs(r_du, conv, dud, d2u, recv_du_s, recv_du_e, recv_dud_s, recv_dud_e, recv_d2u_s, recv_d2u_e, n, nu, du_sa, du_sc, du_strch, dud_sa, dud_sc, dud_strch, d2u_sa, d2u_sc, d2u_strch, d2u_strch_cor)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(inout), device, dimension(:, :, :) :: r_du

The result array, it stores 'du' first then its overwritten

real(kind=dp), intent(in), device, dimension(:, :, :) :: conv
real(kind=dp), intent(in), device, dimension(:, :, :) :: dud
real(kind=dp), intent(in), device, dimension(:, :, :) :: d2u
real(kind=dp), intent(in), device, dimension(:, :, :) :: recv_du_s
real(kind=dp), intent(in), device, dimension(:, :, :) :: recv_du_e
real(kind=dp), intent(in), device, dimension(:, :, :) :: recv_dud_s
real(kind=dp), intent(in), device, dimension(:, :, :) :: recv_dud_e
real(kind=dp), intent(in), device, dimension(:, :, :) :: recv_d2u_s
real(kind=dp), intent(in), device, dimension(:, :, :) :: recv_d2u_e
integer, intent(in), value :: n
real(kind=dp), intent(in), value :: nu
real(kind=dp), intent(in), device, dimension(:) :: du_sa
real(kind=dp), intent(in), device, dimension(:) :: du_sc
real(kind=dp), intent(in), device, dimension(:) :: du_strch
real(kind=dp), intent(in), device, dimension(:) :: dud_sa
real(kind=dp), intent(in), device, dimension(:) :: dud_sc
real(kind=dp), intent(in), device, dimension(:) :: dud_strch
real(kind=dp), intent(in), device, dimension(:) :: d2u_sa
real(kind=dp), intent(in), device, dimension(:) :: d2u_sc
real(kind=dp), intent(in), device, dimension(:) :: d2u_strch
real(kind=dp), intent(in), device, dimension(:) :: d2u_strch_cor