FreeSlipWallBC_t Derived Type

type, public, extends(GenericBC_t) :: FreeSlipWallBC_t


Components

Type Visibility Attributes Name Initial
logical, public :: constructed = .false.
character(len=LINE_LENGTH), public :: bname
character(len=LINE_LENGTH), public :: BCType
integer, public :: currentEqn = 1
logical, public :: isAdiabatic
real(kind=RP), public :: Twall
real(kind=RP), public :: ewall
real(kind=RP), public :: invTwall
real(kind=RP), public :: wallType
real(kind=RP), public :: thetaw

Constructor

public interface FreeSlipWallBC_t

  • private function ConstructFreeSlipWallBC(bname)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: bname

    Return Value type(FreeSlipWallBC_t)


Type-Bound Procedures

procedure, public :: GetPeriodicPair => GenericBC_GetPeriodicPair

  • private subroutine GenericBC_GetPeriodicPair(self, bname)

    Arguments

    Type IntentOptional Attributes Name
    class(GenericBC_t), intent(in) :: self
    character(len=*), intent(out) :: bname

procedure, public :: SlrState => GenericBC_SlrState

  • private subroutine GenericBC_SlrState(self, x, t, nHat, Q)

    Arguments

    Type IntentOptional Attributes Name
    class(GenericBC_t), intent(in) :: self
    real(kind=RP), intent(in) :: x(NDIM)
    real(kind=RP), intent(in) :: t
    real(kind=RP), intent(in) :: nHat(NDIM)
    real(kind=RP), intent(inout) :: Q(NCONS)

procedure, public :: SlrGradVars => GenericBC_SlrGradVars

  • private subroutine GenericBC_SlrGradVars(self, x, t, nHat, Q, U, GetGradients)

    Arguments

    Type IntentOptional Attributes Name
    class(GenericBC_t), intent(in) :: self
    real(kind=RP), intent(in) :: x(NDIM)
    real(kind=RP), intent(in) :: t
    real(kind=RP), intent(in) :: nHat(NDIM)
    real(kind=RP), intent(in) :: Q(NCONS)
    real(kind=RP), intent(inout) :: U(NGRAD)
    procedure(GetGradientValues_f) :: GetGradients

procedure, public :: SlrNeumann => GenericBC_SlrNeumann

  • private subroutine GenericBC_SlrNeumann(self, x, t, nHat, Q, U_x, U_y, U_z, flux)

    Arguments

    Type IntentOptional Attributes Name
    class(GenericBC_t), intent(in) :: self
    real(kind=RP), intent(in) :: x(NDIM)
    real(kind=RP), intent(in) :: t
    real(kind=RP), intent(in) :: nHat(NDIM)
    real(kind=RP), intent(in) :: Q(NCONS)
    real(kind=RP), intent(in) :: U_x(NGRAD)
    real(kind=RP), intent(in) :: U_y(NGRAD)
    real(kind=RP), intent(in) :: U_z(NGRAD)
    real(kind=RP), intent(inout) :: flux(NCONS)

procedure, public :: StateForEqn

  • private subroutine StateForEqn(self, nEqn, x, t, nHat, Q)

    Arguments

    Type IntentOptional Attributes Name
    class(GenericBC_t), intent(in) :: self
    integer, intent(in) :: nEqn
    real(kind=RP), intent(in) :: x(NDIM)
    real(kind=RP), intent(in) :: t
    real(kind=RP), intent(in) :: nHat(NDIM)
    real(kind=RP), intent(inout) :: Q(nEqn)

procedure, public :: GradVarsForEqn

  • private subroutine GradVarsForEqn(self, nEqn, nGradEqn, x, t, nHat, Q, U, GetGradients)

    Arguments

    Type IntentOptional Attributes Name
    class(GenericBC_t), intent(in) :: self
    integer, intent(in) :: nEqn
    integer, intent(in) :: nGradEqn
    real(kind=RP), intent(in) :: x(NDIM)
    real(kind=RP), intent(in) :: t
    real(kind=RP), intent(in) :: nHat(NDIM)
    real(kind=RP), intent(in) :: Q(nEqn)
    real(kind=RP), intent(inout) :: U(nGradEqn)
    procedure(GetGradientValues_f) :: GetGradients

procedure, public :: NeumannForEqn

  • private subroutine NeumannForEqn(self, nEqn, nGradEqn, x, t, nHat, Q, U_x, U_y, U_z, flux)

    Arguments

    Type IntentOptional Attributes Name
    class(GenericBC_t), intent(in) :: self
    integer, intent(in) :: nEqn
    integer, intent(in) :: nGradEqn
    real(kind=RP), intent(in) :: x(NDIM)
    real(kind=RP), intent(in) :: t
    real(kind=RP), intent(in) :: nHat(NDIM)
    real(kind=RP), intent(in) :: Q(nEqn)
    real(kind=RP), intent(in) :: U_x(nGradEqn)
    real(kind=RP), intent(in) :: U_y(nGradEqn)
    real(kind=RP), intent(in) :: U_z(nGradEqn)
    real(kind=RP), intent(inout) :: flux(nEqn)

procedure, public :: Destruct => FreeSlipWallBC_Destruct

  • private subroutine FreeSlipWallBC_Destruct(self)

    Arguments

    Type IntentOptional Attributes Name
    class(FreeSlipWallBC_t) :: self

procedure, public :: Describe => FreeSlipWallBC_Describe

  • private subroutine FreeSlipWallBC_Describe(self)

    Arguments

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

procedure, public :: FlowState => FreeSlipWallBC_FlowState

  • private subroutine FreeSlipWallBC_FlowState(self, x, t, nHat, Q)

    Arguments

    Type IntentOptional Attributes Name
    class(FreeSlipWallBC_t), intent(in) :: self
    real(kind=RP), intent(in) :: x(NDIM)
    real(kind=RP), intent(in) :: t
    real(kind=RP), intent(in) :: nHat(NDIM)
    real(kind=RP), intent(inout) :: Q(NCONS)

procedure, public :: FlowGradVars => FreeSlipWallBC_FlowGradVars

  • private subroutine FreeSlipWallBC_FlowGradVars(self, x, t, nHat, Q, U, GetGradients)

    Arguments

    Type IntentOptional Attributes Name
    class(FreeSlipWallBC_t), intent(in) :: self
    real(kind=RP), intent(in) :: x(NDIM)
    real(kind=RP), intent(in) :: t
    real(kind=RP), intent(in) :: nHat(NDIM)
    real(kind=RP), intent(in) :: Q(NCONS)
    real(kind=RP), intent(inout) :: U(NGRAD)
    procedure(GetGradientValues_f) :: GetGradients

procedure, public :: FlowNeumann => FreeSlipWallBC_FlowNeumann

  • private subroutine FreeSlipWallBC_FlowNeumann(self, x, t, nHat, Q, U_x, U_y, U_z, flux)

    Arguments

    Type IntentOptional Attributes Name
    class(FreeSlipWallBC_t), intent(in) :: self
    real(kind=RP), intent(in) :: x(NDIM)
    real(kind=RP), intent(in) :: t
    real(kind=RP), intent(in) :: nHat(NDIM)
    real(kind=RP), intent(in) :: Q(NCONS)
    real(kind=RP), intent(in) :: U_x(NCONS)
    real(kind=RP), intent(in) :: U_y(NCONS)
    real(kind=RP), intent(in) :: U_z(NCONS)
    real(kind=RP), intent(inout) :: flux(NCONS)

procedure, public :: PhaseFieldState => FreeSlipWallBC_PhaseFieldState

  • private subroutine FreeSlipWallBC_PhaseFieldState(self, x, t, nHat, Q)

    Arguments

    Type IntentOptional Attributes Name
    class(FreeSlipWallBC_t), intent(in) :: self
    real(kind=RP), intent(in) :: x(NDIM)
    real(kind=RP), intent(in) :: t
    real(kind=RP), intent(in) :: nHat(NDIM)
    real(kind=RP), intent(inout) :: Q(NCOMP)

procedure, public :: PhaseFieldNeumann => FreeSlipWallBC_PhaseFieldNeumann

  • private subroutine FreeSlipWallBC_PhaseFieldNeumann(self, x, t, nHat, Q, U_x, U_y, U_z, flux)

    Arguments

    Type IntentOptional Attributes Name
    class(FreeSlipWallBC_t), intent(in) :: self
    real(kind=RP), intent(in) :: x(NDIM)
    real(kind=RP), intent(in) :: t
    real(kind=RP), intent(in) :: nHat(NDIM)
    real(kind=RP), intent(in) :: Q(NCOMP)
    real(kind=RP), intent(in) :: U_x(NCOMP)
    real(kind=RP), intent(in) :: U_y(NCOMP)
    real(kind=RP), intent(in) :: U_z(NCOMP)
    real(kind=RP), intent(inout) :: flux(NCOMP)

procedure, public :: ChemPotState => FreeSlipWallBC_ChemPotState

  • private subroutine FreeSlipWallBC_ChemPotState(self, x, t, nHat, Q)

    Arguments

    Type IntentOptional Attributes Name
    class(FreeSlipWallBC_t), intent(in) :: self
    real(kind=RP), intent(in) :: x(NDIM)
    real(kind=RP), intent(in) :: t
    real(kind=RP), intent(in) :: nHat(NDIM)
    real(kind=RP), intent(inout) :: Q(NCOMP)

procedure, public :: ChemPotNeumann => FreeSlipWallBC_ChemPotNeumann

  • private subroutine FreeSlipWallBC_ChemPotNeumann(self, x, t, nHat, Q, U_x, U_y, U_z, flux)

    Arguments

    Type IntentOptional Attributes Name
    class(FreeSlipWallBC_t), intent(in) :: self
    real(kind=RP), intent(in) :: x(NDIM)
    real(kind=RP), intent(in) :: t
    real(kind=RP), intent(in) :: nHat(NDIM)
    real(kind=RP), intent(in) :: Q(NCOMP)
    real(kind=RP), intent(in) :: U_x(NCOMP)
    real(kind=RP), intent(in) :: U_y(NCOMP)
    real(kind=RP), intent(in) :: U_z(NCOMP)
    real(kind=RP), intent(inout) :: flux(NCOMP)