Particles_t Derived Type

type, public :: Particles_t

Components

Type	Visibility	Attributes		Name		Initial
integer,	public		::	no_of_particles
integer,	public		::	part_per_parcel
type(Particle_t),	public,	allocatable	::	particle(:)
type(DimensionlessParticles_t),	public		::	dimensionless
logical,	public		::	active
logical,	public		::	highordersource
type(pMesh_t),	public		::	pMesh
type(injection_t),	public		::	injection

Type-Bound Procedures

procedure, public :: Construct => ConstructParticles

private subroutine ConstructParticles(self, mesh, controlVariables, solution_file)

Arguments

Type	Intent	Optional	Attributes		Name
class(Particles_t),	intent(inout)			::	self
class(HexMesh),	intent(in)			::	mesh
class(FTValueDictionary),	intent(in)			::	controlVariables
character(len=LINE_LENGTH),	intent(in)			::	solution_file

procedure, public :: Integrate => IntegrateParticles

private subroutine IntegrateParticles(self, mesh, dt)

Arguments

Type	Intent	Optional	Attributes		Name
class(Particles_t),	intent(inout)			::	self
class(HexMesh),	intent(in)			::	mesh
real(kind=RP),	intent(in)			::	dt

procedure, public :: ExportToVTK => ExportToVTKParticles

private subroutine ExportToVTKParticles(self, iter, solution_file)

Arguments

Type	Intent	Optional	Attributes		Name
class(Particles_t),	intent(in)			::	self
integer				::	iter
character(len=LINE_LENGTH)				::	solution_file

procedure, public :: AddSource => AddSourceParticles

private subroutine AddSourceParticles(self, iP, e, time, thermodynamics_, dimensionless_, refValues_)

Arguments

Type	Intent	Optional	Attributes		Name
class(Particles_t),	intent(in)			::	self
integer,	intent(in)			::	iP
class(element),	intent(inout)			::	e
real(kind=RP),	intent(in)			::	time
type(Thermodynamics_t),	intent(in)			::	thermodynamics_
type(Dimensionless_t),	intent(in)			::	dimensionless_
type(RefValues_t),	intent(in)			::	refValues_

procedure, public :: ComputeSourceTerm => ComputeSourceTermParticles

private subroutine ComputeSourceTermParticles(self, e, iP, Source)

Arguments

Type	Intent	Optional	Attributes		Name
class(Particles_t),	intent(in)			::	self
class(element),	intent(in)			::	e
integer,	intent(in)			::	iP
real(kind=RP),	intent(out)			::	Source(:,0:,0:,0:)

procedure, public :: Inject => InjectParticles

private subroutine InjectParticles(self, mesh)

!!$omp do schedule(runtime) private(k, pos)

!!!$omp end do

Arguments

Type	Intent	Optional	Attributes		Name
class(Particles_t),	intent(inout)			::	self
class(HexMesh),	intent(in)			::	mesh