SurfaceMonitor_t Derived Type

type, public :: SurfaceMonitor_t


Components

Type Visibility Attributes Name Initial
logical, public :: active
logical, public :: isDimensionless
logical, public :: IBM = .false.
integer, public :: ID
real(kind=RP), public :: direction(NDIM)
integer, public :: marker
real(kind=RP), public, allocatable :: referenceSurface
real(kind=RP), public, allocatable :: values(:)
real(kind=RP), public :: dynamicPressure
character(len=STR_LEN_MONITORS), public :: monitorName
character(len=STR_LEN_MONITORS), public :: fileName
character(len=STR_LEN_MONITORS), public :: variable

Type-Bound Procedures

procedure, public :: Initialization => SurfaceMonitor_Initialization

  • private subroutine SurfaceMonitor_Initialization(self, mesh, ID, solution_file, FirstCall)

    Arguments

    Type IntentOptional Attributes Name
    class(SurfaceMonitor_t) :: self
    class(HexMesh) :: mesh
    integer :: ID
    character(len=*) :: solution_file
    logical, intent(in) :: FirstCall

procedure, public :: Update => SurfaceMonitor_Update

  • private subroutine SurfaceMonitor_Update(self, mesh, bufferPosition, iter, autosave, dt)

    Arguments

    Type IntentOptional Attributes Name
    class(SurfaceMonitor_t) :: self
    class(HexMesh) :: mesh
    integer :: bufferPosition
    integer :: iter
    logical :: autosave
    real(kind=RP) :: dt

procedure, public :: WriteLabel => SurfaceMonitor_WriteLabel

  • private subroutine SurfaceMonitor_WriteLabel(self)

    Arguments

    Type IntentOptional Attributes Name
    class(SurfaceMonitor_t), intent(in) :: self

procedure, public :: WriteValues => SurfaceMonitor_WriteValue

  • private subroutine SurfaceMonitor_WriteValue(self, bufferLine)

    Arguments

    Type IntentOptional Attributes Name
    class(SurfaceMonitor_t) :: self
    integer :: bufferLine

procedure, public :: WriteToFile => SurfaceMonitor_WriteToFile

  • private subroutine SurfaceMonitor_WriteToFile(self, iter, t, no_of_lines)

    Arguments

    Type IntentOptional Attributes Name
    class(SurfaceMonitor_t) :: self
    integer :: iter(:)
    real(kind=RP) :: t(:)
    integer :: no_of_lines

procedure, public :: destruct => SurfaceMonitor_Destruct

  • private elemental subroutine SurfaceMonitor_Destruct(self)

    Arguments

    Type IntentOptional Attributes Name
    class(SurfaceMonitor_t), intent(inout) :: self

procedure, public :: copy => SurfaceMonitor_Assign

  • private elemental subroutine SurfaceMonitor_Assign(to, from)

    Arguments

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

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

  • private elemental subroutine SurfaceMonitor_Assign(to, from)

    Arguments

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

Source Code

   type SurfaceMonitor_t
      logical                         :: active
      logical                         :: isDimensionless, IBM = .false.
      integer                         :: ID
      real(kind=RP)                   :: direction(NDIM)
      integer                         :: marker
      real(kind=RP), allocatable      :: referenceSurface
      real(kind=RP), allocatable      :: values(:)
      real(kind=RP)                   :: dynamicPressure
      character(len=STR_LEN_MONITORS) :: monitorName
      character(len=STR_LEN_MONITORS) :: fileName
      character(len=STR_LEN_MONITORS) :: variable
      contains
         procedure   :: Initialization => SurfaceMonitor_Initialization
         procedure   :: Update         => SurfaceMonitor_Update
         procedure   :: WriteLabel     => SurfaceMonitor_WriteLabel
         procedure   :: WriteValues    => SurfaceMonitor_WriteValue
         procedure   :: WriteToFile    => SurfaceMonitor_WriteToFile
         procedure   :: destruct       => SurfaceMonitor_Destruct
         procedure   :: copy           => SurfaceMonitor_Assign
         generic     :: assignment(=)  => copy
   end type SurfaceMonitor_t