Sampling_t Derived Type

type, public :: Sampling_t


Components

Type Visibility Attributes Name Initial
character(len=LINE_LENGTH), public :: solution_file
integer, public :: no_of_surfaceSamplings = 0
integer, public :: no_of_planeSamplings = 0
integer, public :: no_of_spatialMeanNodes = 0
integer, public :: dt_restriction
logical, public :: write_dt_restriction
class(SurfaceSampling_t), public, allocatable :: surfaceSamplings(:)
class(PlaneSampling_t), public, allocatable :: planeSamplings(:)
class(SpatialMeanNode_t), public, allocatable :: spatialMeanNodes(:)

Type-Bound Procedures

procedure, public :: Construct => Samplings_Construct

  • private subroutine Samplings_Construct(Samplings, mesh, controlVariables)

    Arguments

    Type IntentOptional Attributes Name
    class(Sampling_t) :: Samplings
    class(HexMesh), intent(in) :: mesh
    class(FTValueDictionary), intent(in) :: controlVariables

procedure, public :: UpdateInterp => Samplings_UpdateLagrangeInterp

  • private subroutine Samplings_UpdateLagrangeInterp(self, mesh)

    Arguments

    Type IntentOptional Attributes Name
    class(Sampling_t) :: self
    class(HexMesh) :: mesh

procedure, public :: UpdateValues => Sampling_UpdateValues

  • private subroutine Sampling_UpdateValues(self, mesh, t)

    Arguments

    Type IntentOptional Attributes Name
    class(Sampling_t) :: self
    class(HexMesh) :: mesh
    real(kind=RP) :: t

procedure, public :: WriteToFile => Sampling_WriteToFile

  • private subroutine Sampling_WriteToFile(self, mesh, force)

    Arguments

    Type IntentOptional Attributes Name
    class(Sampling_t) :: self
    class(HexMesh) :: mesh
    logical, optional :: force

procedure, public :: destruct => Sampling_Destruct

  • private subroutine Sampling_Destruct(self)

    Arguments

    Type IntentOptional Attributes Name
    class(Sampling_t) :: self

procedure, public :: copy => Sampling_Assign

  • private impure elemental subroutine Sampling_Assign(to, from)

    Arguments

    Type IntentOptional Attributes Name
    class(Sampling_t), intent(inout) :: to
    type(Sampling_t), intent(in) :: from

generic, public :: assignment(=) => copy

  • private impure elemental subroutine Sampling_Assign(to, from)

    Arguments

    Type IntentOptional Attributes Name
    class(Sampling_t), intent(inout) :: to
    type(Sampling_t), intent(in) :: from

Source Code

   type Sampling_t
      character(len=LINE_LENGTH)           :: solution_file
      integer                              :: no_of_surfaceSamplings =0
	  integer  							   :: no_of_planeSamplings   =0
	  integer  							   :: no_of_spatialMeanNodes =0
      integer                              :: dt_restriction
      logical                              :: write_dt_restriction
      class(SurfaceSampling_t), allocatable :: surfaceSamplings(:)
	  class(PlaneSampling_t),   allocatable :: planeSamplings(:)
	  class(SpatialMeanNode_t),   allocatable :: spatialMeanNodes(:)
      contains
         procedure   :: Construct       => Samplings_Construct
		 procedure   :: UpdateInterp    => Samplings_UpdateLagrangeInterp
         procedure   :: UpdateValues    => Sampling_UpdateValues
         procedure   :: WriteToFile     => Sampling_WriteToFile
         procedure   :: destruct        => Sampling_Destruct
         procedure   :: copy            => Sampling_Assign
         generic     :: assignment(=)   => copy
   end type Sampling_t