sources Module

Uses

- calculus
- collisions
- phys_consts
- mesh
- grid
Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Used by

- Descendants:
- sources_mpi
Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Contents

Interfaces

srcsMomentum RK2_prep_mpi

Subroutines

srcsContinuity srcsMomentum_curv srcsEnergy

Interfaces

public interface srcsMomentum

private subroutine srcsMomentum_curv(nn, vn1, Tn, ns, vs1, vs2, vs3, Ts, E1, Q, x, Pr, Lo)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in),		dimension(:,:,:,:)	::	nn
real(kind=wp),	intent(in),		dimension(:,:,:)	::	vn1
real(kind=wp),	intent(in),		dimension(:,:,:)	::	Tn
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	ns
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	vs1
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	vs2
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	vs3
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	Ts
real(kind=wp),	intent(in),		dimension(:,:,:)	::	E1
real(kind=wp),	intent(in),		dimension(:,:,:,:)	::	Q
type(curvmesh),	intent(in)			::	x
real(kind=wp),	intent(out),		dimension(size(Ts,1)-4,size(Ts,2)-4,size(Ts,3)-4,lsp)	::	Pr
real(kind=wp),	intent(out),		dimension(size(Ts,1)-4,size(Ts,2)-4,size(Ts,3)-4,lsp)	::	Lo

interface

public module subroutine RK2_prep_mpi(isp, isperiodic, vs1, vs2, vs3)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	isp
logical,	intent(in)			::	isperiodic
real(kind=wp),	intent(inout),		dimension(-1:,-1:,-1:,:)	::	vs1
real(kind=wp),	intent(inout),		dimension(-1:,-1:,-1:,:)	::	vs2
real(kind=wp),	intent(inout),		dimension(-1:,-1:,-1:,:)	::	vs3

Subroutines

public pure subroutine srcsContinuity(nn, vn1, vn2, vn3, Tn, ns, vs1, vs2, vs3, Ts, Pr, Lo)

!!!!!!!!!!!!!!!!!!!!!!!!! O+ REACTIONS !!!!!!!!!!!!!!!!!!!!!!

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in),		dimension(:,:,:,:)	::	nn
real(kind=wp),	intent(in),		dimension(:,:,:)	::	vn1
real(kind=wp),	intent(in),		dimension(:,:,:)	::	vn2
real(kind=wp),	intent(in),		dimension(:,:,:)	::	vn3
real(kind=wp),	intent(in),		dimension(:,:,:)	::	Tn
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	ns
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	vs1
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	vs2
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	vs3
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	Ts
real(kind=wp),	intent(out),		dimension(size(Ts,1)-4,size(Ts,2)-4,size(Ts,3)-4,lsp)	::	Pr
real(kind=wp),	intent(out),		dimension(size(Ts,1)-4,size(Ts,2)-4,size(Ts,3)-4,lsp)	::	Lo

private subroutine srcsMomentum_curv(nn, vn1, Tn, ns, vs1, vs2, vs3, Ts, E1, Q, x, Pr, Lo)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in),		dimension(:,:,:,:)	::	nn
real(kind=wp),	intent(in),		dimension(:,:,:)	::	vn1
real(kind=wp),	intent(in),		dimension(:,:,:)	::	Tn
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	ns
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	vs1
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	vs2
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	vs3
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	Ts
real(kind=wp),	intent(in),		dimension(:,:,:)	::	E1
real(kind=wp),	intent(in),		dimension(:,:,:,:)	::	Q
type(curvmesh),	intent(in)			::	x
real(kind=wp),	intent(out),		dimension(size(Ts,1)-4,size(Ts,2)-4,size(Ts,3)-4,lsp)	::	Pr
real(kind=wp),	intent(out),		dimension(size(Ts,1)-4,size(Ts,2)-4,size(Ts,3)-4,lsp)	::	Lo

public subroutine srcsEnergy(nn, vn1, vn2, vn3, Tn, ns, vs1, vs2, vs3, Ts, Pr, Lo)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in),		dimension(:,:,:,:)	::	nn
real(kind=wp),	intent(in),		dimension(:,:,:)	::	vn1
real(kind=wp),	intent(in),		dimension(:,:,:)	::	vn2
real(kind=wp),	intent(in),		dimension(:,:,:)	::	vn3
real(kind=wp),	intent(in),		dimension(:,:,:)	::	Tn
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	ns
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	vs1
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	vs2
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	vs3
real(kind=wp),	intent(in),		dimension(-1:,-1:,-1:,:)	::	Ts
real(kind=wp),	intent(out),		dimension(size(Ts,1)-4,size(Ts,2)-4,size(Ts,3)-4,lsp)	::	Pr
real(kind=wp),	intent(out),		dimension(size(Ts,1)-4,size(Ts,2)-4,size(Ts,3)-4,lsp)	::	Lo