type_gcc_non_segregation_pa Derived Type

type, public, extends(abst_gcc) :: type_gcc_non_segregation_pa


Inherits

type~~type_gcc_non_segregation_pa~~InheritsGraph type~type_gcc_non_segregation_pa type_gcc_non_segregation_pa type~abst_gcc abst_gcc type~type_gcc_non_segregation_pa->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_pa


Type-Bound Procedures

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

  • interface

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

    Arguments

    Type IntentOptional Attributes Name
    class(type_gcc_non_segregation_pa), 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_Pa_derivative

  • interface

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

    Arguments

    Type IntentOptional Attributes Name
    class(type_gcc_non_segregation_pa), 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_Pa_derivative_2nd

  • interface

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

    Arguments

    Type IntentOptional Attributes Name
    class(type_gcc_non_segregation_pa), 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_pa
    contains
        procedure, pass(self) :: calc => calc_GCC_NonSeg_Pa
        procedure, pass(self) :: deriv => calc_GCC_NonSeg_Pa_derivative
        procedure, pass(self) :: deriv2 => calc_GCC_NonSeg_Pa_derivative_2nd
    end type type_gcc_non_segregation_pa