adam_prism_fnl_rk_pml_object

Source: src/app/prism/fnl/adam_prism_fnl_rk_pml_object.F90

Dependencies

Contents

• prism_fnl_rk_pml_object
• destroy
• initialize
• initialize_stages
• reset_rhs
• compute_stage
• assign_stage
• update_q_pml
• allocate_face_buffers
• copy_face_to_stages
• compute_face_stage
• assign_face_stage
• update_face_q
• zero_face_rhs

Derived Types

prism_fnl_rk_pml_object

Components

Name	Type	Attributes	Description
enabled	logical
nrk	integer(kind=I4P)
alph_gpu	real(kind=R8P)	pointer
beta_gpu	real(kind=R8P)	pointer
gamm_gpu	real(kind=R8P)	pointer
q_pml_x_m_rk_gpu	real(kind=R8P)	pointer
q_pml_x_p_rk_gpu	real(kind=R8P)	pointer
q_pml_y_m_rk_gpu	real(kind=R8P)	pointer
q_pml_y_p_rk_gpu	real(kind=R8P)	pointer
q_pml_z_m_rk_gpu	real(kind=R8P)	pointer
q_pml_z_p_rk_gpu	real(kind=R8P)	pointer
dq_pml_x_m_gpu	real(kind=R8P)	pointer
dq_pml_x_p_gpu	real(kind=R8P)	pointer
dq_pml_y_m_gpu	real(kind=R8P)	pointer
dq_pml_y_p_gpu	real(kind=R8P)	pointer
dq_pml_z_m_gpu	real(kind=R8P)	pointer
dq_pml_z_p_gpu	real(kind=R8P)	pointer

Type-Bound Procedures

Name	Attributes	Description
destroy	pass(self)
initialize	pass(self)
initialize_stages	pass(self)
reset_rhs	pass(self)
compute_stage	pass(self)
assign_stage	pass(self)
update_q_pml	pass(self)

Subroutines

destroy

Free device data owned by the RK-PML FNL object.

subroutine destroy(self)

Arguments

Name	Type	Intent	Attributes	Description
self	class(prism_fnl_rk_pml_object)	inout

Call graph

initialize

subroutine initialize(self, rk, pml_fnl)

Arguments

Name	Type	Intent	Attributes	Description
self	class(prism_fnl_rk_pml_object)	inout
rk	type(rk_object)	in
pml_fnl	type(prism_fnl_pml_object)	in

Call graph

initialize_stages

subroutine initialize_stages(self, pml_fnl)

Arguments

Name	Type	Intent	Attributes	Description
self	class(prism_fnl_rk_pml_object)	inout
pml_fnl	type(prism_fnl_pml_object)	in

Call graph

reset_rhs

subroutine reset_rhs(self)

Arguments

Name	Type	Intent	Attributes	Description
self	class(prism_fnl_rk_pml_object)	inout

Call graph

compute_stage

subroutine compute_stage(self, s, dt)

Arguments

Name	Type	Intent	Attributes	Description
self	class(prism_fnl_rk_pml_object)	inout
s	integer(kind=I4P)	in
dt	real(kind=R8P)	in

Call graph

assign_stage

subroutine assign_stage(self, s)

Arguments

Name	Type	Intent	Attributes	Description
self	class(prism_fnl_rk_pml_object)	inout
s	integer(kind=I4P)	in

Call graph

update_q_pml

subroutine update_q_pml(self, dt, pml_fnl)

Arguments

Name	Type	Intent	Attributes	Description
self	class(prism_fnl_rk_pml_object)	in
dt	real(kind=R8P)	in
pml_fnl	type(prism_fnl_pml_object)	inout

Call graph

allocate_face_buffers

subroutine allocate_face_buffers(q_face_gpu, nrk, q_face_rk_gpu, dq_face_gpu, label)

Arguments

Name	Type	Intent	Attributes	Description
q_face_gpu	real(kind=R8P)	in	pointer
nrk	integer(kind=I4P)	in
q_face_rk_gpu	real(kind=R8P)	inout	pointer
dq_face_gpu	real(kind=R8P)	inout	pointer
label	character(len=*)	in

Call graph

copy_face_to_stages

subroutine copy_face_to_stages(q_face_gpu, q_face_rk_gpu, nrk)

Arguments

Name	Type	Intent	Attributes	Description
q_face_gpu	real(kind=R8P)	in	pointer
q_face_rk_gpu	real(kind=R8P)	inout	pointer
nrk	integer(kind=I4P)	in

Call graph

compute_face_stage

subroutine compute_face_stage(q_face_rk_gpu, alph_gpu, s, dt)

Arguments

Name	Type	Intent	Attributes	Description
q_face_rk_gpu	real(kind=R8P)	inout	pointer
alph_gpu	real(kind=R8P)	in	pointer
s	integer(kind=I4P)	in
dt	real(kind=R8P)	in

Call graph

assign_face_stage

subroutine assign_face_stage(q_face_rk_gpu, dq_face_gpu, s)

Arguments

Name	Type	Intent	Attributes	Description
q_face_rk_gpu	real(kind=R8P)	inout	pointer
dq_face_gpu	real(kind=R8P)	in	pointer
s	integer(kind=I4P)	in

Call graph

update_face_q

subroutine update_face_q(beta_gpu, dt, q_face_rk_gpu, q_face_gpu)

Arguments

Name	Type	Intent	Attributes	Description
beta_gpu	real(kind=R8P)	in	pointer
dt	real(kind=R8P)	in
q_face_rk_gpu	real(kind=R8P)	in	pointer
q_face_gpu	real(kind=R8P)	inout	pointer

Call graph

zero_face_rhs

subroutine zero_face_rhs(dq_face_gpu)

Arguments

Name	Type	Intent	Attributes	Description
dq_face_gpu	real(kind=R8P)	inout	pointer

Call graph