opr_device Module Reference

Operators accelerator backends.

Data Types
interface	hip_cdtp
interface	hip_cfl
interface	hip_conv1
interface	hip_convect_scalar
interface	hip_dudxyz
interface	hip_lambda2
interface	hip_opgrad
interface	hip_set_convect_rst

Functions/Subroutines
subroutine, public	opr_device_dudxyz (du, u, dr, ds, dt, coef)
subroutine, public	opr_device_opgrad (ux, uy, uz, u, coef)
subroutine, public	opr_device_lambda2 (lambda2, u, v, w, coef)
subroutine, public	opr_device_cdtp (dtx, x, dr, ds, dt, coef)
subroutine, public	opr_device_conv1 (du, u, vx, vy, vz, xh, coef, nelv, gdim)
subroutine, public	opr_device_convect_scalar (du, u_d, cr_d, cs_d, ct_d, xh_gll, xh_gl, coef_gll, coef_gl, gll_to_gl)
subroutine, public	opr_device_curl (w1, w2, w3, u1, u2, u3, work1, work2, c_xh, event)
real(kind=rp) function, public	opr_device_cfl (dt, u, v, w, xh, coef, nelv, gdim)
subroutine, public	opr_device_set_convect_rst (cr_d, cs_d, ct_d, cx_d, cy_d, cz_d, xh, coef)

Function/Subroutine Documentation

opr_device_cdtp()

subroutine, public opr_device::opr_device_cdtp	(	real(kind=rp), dimension(coef%xh%lxyz, coef%msh%nelv), intent(inout)	dtx,
		real(kind=rp), dimension(coef%xh%lxyz, coef%msh%nelv), intent(inout)	x,
		real(kind=rp), dimension(coef%xh%lxyz, coef%msh%nelv), intent(in)	dr,
		real(kind=rp), dimension(coef%xh%lxyz, coef%msh%nelv), intent(in)	ds,
		real(kind=rp), dimension(coef%xh%lxyz, coef%msh%nelv), intent(in)	dt,
		type(coef_t), intent(in)	coef
	)

Definition at line 512 of file opr_device.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

opr_device_cfl()

real(kind=rp) function, public opr_device::opr_device_cfl	(	real(kind=rp)	dt,
		real(kind=rp), dimension(xh%lx, xh%ly, xh%lz, nelv)	u,
		real(kind=rp), dimension(xh%lx, xh%ly, xh%lz, nelv)	v,
		real(kind=rp), dimension(xh%lx, xh%ly, xh%lz, nelv)	w,
		type(space_t)	xh,
		type(coef_t)	coef,
		integer	nelv,
		integer	gdim
	)

Definition at line 802 of file opr_device.F90.

Here is the call graph for this function:

opr_device_conv1()

subroutine, public opr_device::opr_device_conv1	(	real(kind=rp), dimension(xh%lxyz, nelv), intent(inout)	du,
		real(kind=rp), dimension(xh%lx, xh%ly, xh%lz, nelv), intent(inout)	u,
		real(kind=rp), dimension(xh%lx, xh%ly, xh%lz, nelv), intent(inout)	vx,
		real(kind=rp), dimension(xh%lx, xh%ly, xh%lz, nelv), intent(inout)	vy,
		real(kind=rp), dimension(xh%lx, xh%ly, xh%lz, nelv), intent(inout)	vz,
		type(space_t), intent(in)	xh,
		type(coef_t), intent(in)	coef,
		integer, intent(in)	nelv,
		integer, intent(in)	gdim
	)

Definition at line 548 of file opr_device.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

opr_device_convect_scalar()

subroutine, public opr_device::opr_device_convect_scalar	(	real(kind=rp), dimension(xh_gll%lx, xh_gll%ly, xh_gll%lz, coef_gl%msh%nelv), intent(inout)	du,
		type(c_ptr)	u_d,
		type(c_ptr)	cr_d,
		type(c_ptr)	cs_d,
		type(c_ptr)	ct_d,
		type(space_t), intent(in)	xh_gll,
		type(space_t), intent(in)	xh_gl,
		type(coef_t), intent(in)	coef_gll,
		type(coef_t), intent(in)	coef_gl,
		type(interpolator_t), intent(inout)	gll_to_gl
	)

Definition at line 595 of file opr_device.F90.

Here is the call graph for this function:

opr_device_curl()

subroutine, public opr_device::opr_device_curl	(	type(field_t), intent(inout)	w1,
		type(field_t), intent(inout)	w2,
		type(field_t), intent(inout)	w3,
		type(field_t), intent(in)	u1,
		type(field_t), intent(in)	u2,
		type(field_t), intent(in)	u3,
		type(field_t), intent(inout)	work1,
		type(field_t), intent(inout)	work2,
		type(coef_t), intent(in)	c_xh,
		type(c_ptr), intent(inout), optional	event
	)

Definition at line 640 of file opr_device.F90.

Here is the call graph for this function:

opr_device_dudxyz()

subroutine, public opr_device::opr_device_dudxyz	(	real(kind=rp), dimension(coef%xh%lx, coef%xh%ly, coef%xh%lz, coef%msh%nelv), intent(inout)	du,
		real(kind=rp), dimension(coef%xh%lx, coef%xh%ly, coef%xh%lz, coef%msh%nelv), intent(in)	u,
		real(kind=rp), dimension(coef%xh%lx, coef%xh%ly, coef%xh%lz, coef%msh%nelv), intent(in)	dr,
		real(kind=rp), dimension(coef%xh%lx, coef%xh%ly, coef%xh%lz, coef%msh%nelv), intent(in)	ds,
		real(kind=rp), dimension(coef%xh%lx, coef%xh%ly, coef%xh%lz, coef%msh%nelv), intent(in)	dt,
		type(coef_t), intent(in), target	coef
	)

Definition at line 405 of file opr_device.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

opr_device_lambda2()

subroutine, public opr_device::opr_device_lambda2	(	type(field_t), intent(inout)	lambda2,
		type(field_t), intent(in)	u,
		type(field_t), intent(in)	v,
		type(field_t), intent(in)	w,
		type(coef_t), intent(in)	coef
	)

Definition at line 482 of file opr_device.F90.

Here is the call graph for this function:

opr_device_opgrad()

subroutine, public opr_device::opr_device_opgrad	(	real(kind=rp), dimension(coef%xh%lxyz, coef%msh%nelv), intent(inout)	ux,
		real(kind=rp), dimension(coef%xh%lxyz, coef%msh%nelv), intent(inout)	uy,
		real(kind=rp), dimension(coef%xh%lxyz, coef%msh%nelv), intent(inout)	uz,
		real(kind=rp), dimension(coef%xh%lxyz, coef%msh%nelv), intent(in)	u,
		type(coef_t), intent(in)	coef
	)

Definition at line 440 of file opr_device.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

opr_device_set_convect_rst()

subroutine, public opr_device::opr_device_set_convect_rst	(	type(c_ptr)	cr_d,
		type(c_ptr)	cs_d,
		type(c_ptr)	ct_d,
		type(c_ptr)	cx_d,
		type(c_ptr)	cy_d,
		type(c_ptr)	cz_d,
		type(space_t), intent(inout)	xh,
		type(coef_t), intent(inout)	coef
	)

Definition at line 842 of file opr_device.F90.

Here is the call graph for this function: