m_cuda_kernels_dist

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

Arguments

Type	Intent	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
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
integer,	intent(in),	value	::	n
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)

Arguments

Type	Intent	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

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, d1_coeffs_s, d1_coeffs_e, d1_coeffs, d1_fw, d1_bw, d1_af, d2_coeffs_s, d2_coeffs_e, d2_coeffs, d2_fw, d2_bw, d2_af)

Arguments

Type	Intent	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
real(kind=dp),	intent(in),	device	::	d1_coeffs_s(:,:)
real(kind=dp),	intent(in),	device	::	d1_coeffs_e(:,:)
real(kind=dp),	intent(in),	device	::	d1_coeffs(:)
real(kind=dp),	intent(in),	device	::	d1_fw(:)
real(kind=dp),	intent(in),	device	::	d1_bw(:)
real(kind=dp),	intent(in),	device	::	d1_af(:)
real(kind=dp),	intent(in),	device	::	d2_coeffs_s(:,:)
real(kind=dp),	intent(in),	device	::	d2_coeffs_e(:,:)
real(kind=dp),	intent(in),	device	::	d2_coeffs(:)
real(kind=dp),	intent(in),	device	::	d2_fw(:)
real(kind=dp),	intent(in),	device	::	d2_bw(:)
real(kind=dp),	intent(in),	device	::	d2_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, d1_sa, d1_sc, d2_sa, d2_sc, n, nu)

Arguments

Type	Intent	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
real(kind=dp),	intent(in),	device, dimension(:)	::	d1_sa
real(kind=dp),	intent(in),	device, dimension(:)	::	d1_sc
real(kind=dp),	intent(in),	device, dimension(:)	::	d2_sa
real(kind=dp),	intent(in),	device, dimension(:)	::	d2_sc
integer,	intent(in),	value	::	n
real(kind=dp),	intent(in),	value	::	nu

m_cuda_kernels_dist Module

Contents

Subroutines

Uses

Subroutines

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

Arguments

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

Arguments

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, d1_coeffs_s, d1_coeffs_e, d1_coeffs, d1_fw, d1_bw, d1_af, d2_coeffs_s, d2_coeffs_e, d2_coeffs, d2_fw, d2_bw, d2_af)

Arguments

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, d1_sa, d1_sc, d2_sa, d2_sc, n, nu)

Arguments