type_gcc_segregation_pa Derived Type

type, public, extends(abst_gcc) :: type_gcc_segregation_pa


Inherits

type~~type_gcc_segregation_pa~~InheritsGraph type~type_gcc_segregation_pa type_gcc_segregation_pa type~abst_gcc abst_gcc type~type_gcc_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_segregation_pa


Type-Bound Procedures

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

  • interface

    private pure elemental module function calc_gcc_seg_pa(self, state) result(suction)

    Arguments

    Type IntentOptional Attributes Name
    class(type_gcc_segregation_pa), intent(in) :: self
    type(type_state), intent(in) :: state

    Return Value real(kind=real64)

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

  • interface

    private pure elemental module function deriv_gcc_seg_pa(self, state) result(suction_derivative)

    Arguments

    Type IntentOptional Attributes Name
    class(type_gcc_segregation_pa), intent(in) :: self
    type(type_state), intent(in) :: state

    Return Value real(kind=real64)

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

  • interface

    private pure elemental module function deriv_2nd_gcc_seg_pa(self, state) result(suction_derivative)

    Arguments

    Type IntentOptional Attributes Name
    class(type_gcc_segregation_pa), intent(in) :: self
    type(type_state), intent(in) :: state

    Return Value real(kind=real64)

Source Code

    type, extends(abst_gcc) :: type_gcc_segregation_pa
    contains
        procedure, pass(self) :: calc => calc_gcc_seg_pa
        procedure, pass(self) :: deriv => deriv_gcc_seg_pa
        procedure, pass(self) :: deriv2 => deriv_2nd_gcc_seg_pa
    end type type_gcc_segregation_pa