type_den_3phase Derived Type

type, public, extends(abst_den) :: type_den_3phase


Inherits

type~~type_den_3phase~~InheritsGraph type~type_den_3phase type_den_3phase type~abst_den abst_den type~type_den_3phase->type~abst_den

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_den_3phase


Type-Bound Procedures

procedure, public :: Calc_GaussPoint => calc_den_gauss_point_3phase

  • interface

    private module function calc_den_gauss_point_3phase(self, state) result(density)

    Arguments

    Type IntentOptional Attributes Name
    class(type_den_3phase), intent(in) :: self
    type(type_gauss_point_state), intent(in) :: state

    Return Value real(kind=real64)

Source Code

    type, extends(abst_den) :: type_den_3phase
    contains
        ! Calcの具体的な実装としてcalc_den_3_Wrapをバインドする
        procedure :: Calc_GaussPoint => calc_den_gauss_point_3phase
    end type type_den_3phase