type_vhc_3phase_apparent Derived Type

type, public, extends(abst_vhc) :: type_vhc_3phase_apparent


Inherits

type~~type_vhc_3phase_apparent~~InheritsGraph type~type_vhc_3phase_apparent type_vhc_3phase_apparent type~abst_vhc abst_vhc type~type_vhc_3phase_apparent->type~abst_vhc

Components

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

soil, rock, concrete

real(kind=real64), public :: material2

water

real(kind=real64), public :: material3

ice

real(kind=real64), public :: material4

gas

integer(kind=int32), public :: material_id

Constructor

public interface type_vhc_3phase_apparent


Type-Bound Procedures

procedure, public :: calc_gauss_point_holder => calc_vhc_gauss_point_3phase_apparent_holder

  • interface

    private module function calc_vhc_gauss_point_3phase_apparent_holder(self, state, DEN, LatentHeat, dQi_dT) result(VHC)

    Arguments

    Type IntentOptional Attributes Name
    class(type_vhc_3phase_apparent), intent(in) :: self
    type(type_gauss_point_state), intent(in) :: state
    type(holder_dens), intent(in), optional :: DEN
    real(kind=real64), intent(in), optional :: LatentHeat
    real(kind=real64), intent(in), optional :: dQi_dT

    Return Value real(kind=real64)

procedure, public :: calc_gauss_point_ptr => calc_vhc_gauss_point_3phase_apparent_ptr

  • interface

    private module function calc_vhc_gauss_point_3phase_apparent_ptr(self, state, DEN, LatentHeat, dQi_dT) result(VHC)

    Arguments

    Type IntentOptional Attributes Name
    class(type_vhc_3phase_apparent), intent(in) :: self
    type(type_gauss_point_state), intent(in) :: state
    class(abst_den), intent(in), optional, pointer :: DEN
    real(kind=real64), intent(in), optional :: LatentHeat
    real(kind=real64), intent(in), optional :: dQi_dT

    Return Value real(kind=real64)

Source Code

    type, extends(abst_vhc) :: type_vhc_3phase_apparent
    contains
        procedure :: calc_gauss_point_holder => calc_vhc_gauss_point_3phase_apparent_holder
        procedure :: calc_gauss_point_ptr => calc_vhc_gauss_point_3phase_apparent_ptr
    end type type_vhc_3phase_apparent