SimulatorClass Module

Uses

Derived Types

type, public :: Simulator_

Components

Type	Visibility	Attributes		Name		Initial
type(DiffusionEq_),	public,	allocatable	::	DiffusionEq_Array(:)
type(FiniteDeform_),	public,	allocatable	::	FiniteDeform_Array(:)
type(MultiPhysics_),	public,	allocatable	::	MultiPhysics_Array(:)
type(ContactMechanics_),	public,	allocatable	::	ContactMechanics_Array(:)

Type-Bound Procedures

procedure, public :: Deploy => DeploySimulator
procedure, public :: SetTime => SetSimulatorTime
procedure, public :: Run => RunSimulation
procedure, public :: Display => DisplaySimulation

Subroutines

public subroutine Simulator(world, OptionalStep, OptionalTime, SolverType)

Arguments

Type	Intent	Optional	Attributes		Name
class(Field_),	intent(inout),		target	::	world
integer(kind=int32),	intent(in)			::	OptionalStep
real(kind=real64),	intent(in)			::	OptionalTime
character(len=*),	intent(in),	optional		::	SolverType

public subroutine RunSimulation(sim, field, step, SolverType)

Arguments

Type	Intent	Optional	Attributes		Name
class(Simulator_),	intent(inout)			::	sim
type(Field_),	intent(inout),		target	::	field
integer(kind=int32),	intent(in)			::	step
character(len=*),	intent(in),	optional		::	SolverType

public subroutine InitializeSimulator(sim, field)

Arguments

Type	Intent	Optional	Attributes		Name
type(Simulator_),	intent(inout)			::	sim
type(Field_),	intent(inout)			::	field

public subroutine DeploySimulator(sim, field)

Arguments

Type	Intent	Optional	Attributes		Name
class(Simulator_),	intent(inout)			::	sim
type(Field_),	intent(inout),		target	::	field

public subroutine DisplaySimulation(sim, field, step)

Arguments

Type	Intent	Optional	Attributes		Name
class(Simulator_),	intent(inout)			::	sim
type(Field_),	intent(inout),		target	::	field
integer(kind=int32),	intent(in)			::	step

public subroutine SetSimulatorTime(sim, field, time, step)

Arguments

Type	Intent	Optional	Attributes		Name
class(Simulator_),	intent(inout)			::	sim
type(Field_),	intent(inout),		target	::	field
real(kind=real64),	intent(in)			::	time
integer(kind=int32),	intent(in)			::	step