type_gcc_non_segregation_m Derived Type

type, public, extends(abst_gcc) :: type_gcc_non_segregation_m


Inherits

type~~type_gcc_non_segregation_m~~InheritsGraph type~type_gcc_non_segregation_m type_gcc_non_segregation_m type~abst_gcc abst_gcc type~type_gcc_non_segregation_m->type~abst_gcc

Components

Type Visibility Attributes Name Initial
real(kind=real64), public :: Lf

Latent heat of fusion

real(kind=real64), public :: Tf

Freezing point


Constructor

public interface type_gcc_non_segregation_m


Type-Bound Procedures

procedure, public, pass(self) :: calc => calc_GCC_NonSeg_m

  • interface

    private module function calc_GCC_NonSeg_m(self, T, Pw, rhoW, rhoI) result(Suction)

    Arguments

    Type IntentOptional Attributes Name
    class(type_gcc_non_segregation_m), intent(in) :: self
    real(kind=real64), intent(in) :: T
    real(kind=real64), intent(in), optional :: Pw
    real(kind=real64), intent(in), optional :: rhoW
    real(kind=real64), intent(in), optional :: rhoI

    Return Value real(kind=real64)

procedure, public, pass(self) :: deriv => calc_GCC_NonSeg_m_derivative

  • interface

    private module function calc_GCC_NonSeg_m_derivative(self, T, Pw, rhoW, rhoI) result(Suction_derivative)

    Arguments

    Type IntentOptional Attributes Name
    class(type_gcc_non_segregation_m), intent(in) :: self
    real(kind=real64), intent(in) :: T
    real(kind=real64), intent(in), optional :: Pw
    real(kind=real64), intent(in), optional :: rhoW
    real(kind=real64), intent(in), optional :: rhoI

    Return Value real(kind=real64)

procedure, public, pass(self) :: deriv2 => calc_GCC_NonSeg_m_derivative_2nd

  • interface

    private module function calc_GCC_NonSeg_m_derivative_2nd(self, T, Pw, rhoW, rhoI) result(Suction_derivative)

    Arguments

    Type IntentOptional Attributes Name
    class(type_gcc_non_segregation_m), intent(in) :: self
    real(kind=real64), intent(in) :: T
    real(kind=real64), intent(in), optional :: Pw
    real(kind=real64), intent(in), optional :: rhoW
    real(kind=real64), intent(in), optional :: rhoI

    Return Value real(kind=real64)

Source Code

    type, extends(abst_gcc) :: type_gcc_non_segregation_m
    contains
        procedure, pass(self) :: calc => calc_GCC_NonSeg_m
        procedure, pass(self) :: deriv => calc_GCC_NonSeg_m_derivative
        procedure, pass(self) :: deriv2 => calc_GCC_NonSeg_m_derivative_2nd
    end type type_gcc_non_segregation_m