abst_hcf_impedance Derived Type

type, private, abstract :: abst_hcf_impedance


Inherited by

type~~abst_hcf_impedance~~InheritedByGraph type~abst_hcf_impedance abst_hcf_impedance type~abst_hcf abst_hcf type~abst_hcf->type~abst_hcf_impedance impedance type~type_hcf_impedance_exp type_hcf_impedance_exp type~type_hcf_impedance_exp->type~abst_hcf_impedance type~holder_hcfs holder_hcfs type~holder_hcfs->type~abst_hcf p type~type_hcf_base type_hcf_base type~type_hcf_base->type~abst_hcf type~type_hcf_base_impedance type_hcf_base_impedance type~type_hcf_base_impedance->type~abst_hcf type~type_hcf_base_impedance_viscosity type_hcf_base_impedance_viscosity type~type_hcf_base_impedance_viscosity->type~abst_hcf type~type_hcf_base_viscosity type_hcf_base_viscosity type~type_hcf_base_viscosity->type~abst_hcf type~type_hcf_impedance type_hcf_impedance type~type_hcf_impedance->type~abst_hcf type~type_hcf_impedance_viscosity type_hcf_impedance_viscosity type~type_hcf_impedance_viscosity->type~abst_hcf type~type_hcf_viscosity type_hcf_viscosity type~type_hcf_viscosity->type~abst_hcf type~type_material_pointers type_material_pointers type~type_material_pointers->type~abst_hcf hcf type~type_material_manager type_material_manager type~type_material_manager->type~holder_hcfs hcf type~type_properties_manager type_properties_manager type~type_properties_manager->type~type_material_manager materials type~type_ftdss type_ftdss type~type_ftdss->type~type_properties_manager property

Components

Type Visibility Attributes Name Initial
real(kind=real64), private :: omega

Impedance factor

Type-Bound Procedures

procedure(abst_calc_impedance_kr), public, deferred, pass(self) :: calc_impedance

  • pure elemental function abst_calc_impedance_kr(self, q_ice) result(kr) Prototype

    Arguments

    Type IntentOptional Attributes Name
    class(abst_hcf_impedance), intent(in) :: self
    real(kind=real64), intent(in) :: q_ice

    Return Value real(kind=real64)

Source Code

    type, abstract :: abst_hcf_impedance
        private
        real(real64) :: omega !! Impedance factor
    contains
        procedure(abst_calc_impedance_kr), pass(self), public, deferred :: calc_impedance
    end type abst_hcf_impedance