calculate_gcc Module


Uses

  • module~~calculate_gcc~~UsesGraph module~calculate_gcc calculate_gcc iso_fortran_env iso_fortran_env module~calculate_gcc->iso_fortran_env module~module_core module_core module~calculate_gcc->module~module_core module~module_input module_input module~calculate_gcc->module~module_input core_check_nan core_check_nan module~module_core->core_check_nan module~core_allocate core_allocate module~module_core->module~core_allocate module~core_check_range core_check_range module~module_core->module~core_check_range module~core_deallocate core_deallocate module~module_core->module~core_deallocate module~core_error core_error module~module_core->module~core_error module~core_fortran_utils core_fortran_utils module~module_core->module~core_fortran_utils module~core_string_utils core_string_utils module~module_core->module~core_string_utils module~core_types core_types module~module_core->module~core_types module~core_unique core_unique module~module_core->module~core_unique module~core_vtk core_vtk module~module_core->module~core_vtk module~core_vtk_vtk_constants core_vtk_vtk_constants module~module_core->module~core_vtk_vtk_constants module~inout_input inout_input module~module_input->module~inout_input module~core_allocate->iso_fortran_env module~core_allocate->module~core_error module~core_check_range->iso_fortran_env module~core_deallocate->iso_fortran_env module~core_deallocate->module~core_error module~core_error->iso_fortran_env stdlib_logger stdlib_logger module~core_error->stdlib_logger module~core_fortran_utils_memory_stats_wrapper core_fortran_utils_memory_stats_wrapper module~core_fortran_utils->module~core_fortran_utils_memory_stats_wrapper module~core_fortran_utils_signal_flag_wrapper core_fortran_utils_signal_flag_wrapper module~core_fortran_utils->module~core_fortran_utils_signal_flag_wrapper module~core_fortran_utils_system_info_wrapper core_fortran_utils_system_info_wrapper module~core_fortran_utils->module~core_fortran_utils_system_info_wrapper module~core_string_utils->iso_fortran_env module~core_string_utils->module~core_allocate module~core_types_array core_types_array module~core_types->module~core_types_array module~core_types_gauss core_types_gauss module~core_types->module~core_types_gauss module~core_types_pointer core_types_pointer module~core_types->module~core_types_pointer module~core_types_variable core_types_variable module~core_types->module~core_types_variable module~core_types_vector core_types_vector module~core_types->module~core_types_vector module~module_type_matrix module_type_matrix module~core_types->module~module_type_matrix module~core_unique->iso_fortran_env module~core_unique->module~core_allocate stdlib_sorting stdlib_sorting module~core_unique->stdlib_sorting module~core_vtk->iso_fortran_env module~core_vtk->module~core_allocate module~core_vtk->module~core_deallocate module~core_vtk->module~core_types module~core_vtk->module~core_unique module~core_vtk->module~core_vtk_vtk_constants iso_c_binding iso_c_binding module~core_vtk->iso_c_binding module~core_vtk_vtk_wrapper core_vtk_vtk_wrapper module~core_vtk->module~core_vtk_vtk_wrapper module~core_vtk_vtu_wrapper core_vtk_vtu_wrapper module~core_vtk->module~core_vtk_vtu_wrapper module~core_vtk->stdlib_sorting module~core_vtk_vtk_constants->iso_fortran_env module~inout_input->iso_fortran_env module~inout_input->module~module_core json_module json_module module~inout_input->json_module module~inout_project_settings inout_project_settings module~inout_input->module~inout_project_settings module~inout_input->stdlib_logger stdlib_strings stdlib_strings module~inout_input->stdlib_strings module~core_fortran_utils_memory_stats_wrapper->iso_fortran_env module~core_c_utils core_c_utils module~core_fortran_utils_memory_stats_wrapper->module~core_c_utils module~core_fortran_utils_signal_flag_wrapper->iso_fortran_env module~core_fortran_utils_signal_flag_wrapper->iso_c_binding module~core_fortran_utils_signal_flag_wrapper->stdlib_logger module~core_c_utils_signal_flag core_c_utils_signal_flag module~core_fortran_utils_signal_flag_wrapper->module~core_c_utils_signal_flag module~core_fortran_utils_system_info_wrapper->iso_fortran_env module~core_fortran_utils_system_info_wrapper->iso_c_binding module~core_fortran_utils_system_info_wrapper->stdlib_strings module~core_fortran_utils_system_info_wrapper->module~core_c_utils module~core_types_array->iso_fortran_env module~core_types_array->module~core_allocate module~core_types_array->module~core_deallocate module~core_types_gauss->iso_fortran_env module~core_types_pointer->iso_fortran_env module~core_types_variable->iso_fortran_env module~core_types_variable->module~core_allocate module~core_types_vector->iso_fortran_env module~core_vtk_vtk_wrapper->iso_c_binding module~core_vtk_vtu_wrapper->iso_c_binding module~inout_project_settings->iso_fortran_env module~inout_project_settings->module~module_core module~core_types_matrix core_types_matrix module~module_type_matrix->module~core_types_matrix module~core_types_matrix_coo core_types_matrix_coo module~module_type_matrix->module~core_types_matrix_coo module~core_types_matrix_crs core_types_matrix_crs module~module_type_matrix->module~core_types_matrix_crs module~core_types_matrix_dense core_types_matrix_dense module~module_type_matrix->module~core_types_matrix_dense module~core_c_utils->iso_c_binding module~core_c_utils->module~core_c_utils_signal_flag module~core_c_utils_memory_stats core_c_utils_memory_stats module~core_c_utils->module~core_c_utils_memory_stats module~core_c_utils_system_info core_c_utils_system_info module~core_c_utils->module~core_c_utils_system_info module~core_c_utils_signal_flag->iso_c_binding module~core_types_matrix->iso_fortran_env module~core_types_matrix_coo->iso_fortran_env module~core_types_matrix_coo->module~core_allocate module~core_types_matrix_coo->module~core_deallocate module~core_types_matrix_coo->module~core_types_matrix module~core_types_matrix_crs->iso_fortran_env module~core_types_matrix_crs->module~core_allocate module~core_types_matrix_crs->module~core_deallocate module~core_types_matrix_crs->module~core_types_matrix module~core_types_matrix_dense->iso_fortran_env module~core_types_matrix_dense->module~core_allocate module~core_types_matrix_dense->module~core_deallocate module~core_types_matrix_dense->module~core_types_matrix module~core_c_utils_memory_stats->iso_c_binding module~core_c_utils_system_info->iso_c_binding

Used by

  • module~~calculate_gcc~~UsedByGraph module~calculate_gcc calculate_gcc module~gcc_base gcc_base module~gcc_base->module~calculate_gcc module~gcc_non_segregation_m gcc_non_segregation_m module~gcc_non_segregation_m->module~calculate_gcc module~gcc_non_segregation_pa gcc_non_segregation_pa module~gcc_non_segregation_pa->module~calculate_gcc module~gcc_segregation_m gcc_segregation_m module~gcc_segregation_m->module~calculate_gcc module~gcc_segregation_pa gcc_segregation_pa module~gcc_segregation_pa->module~calculate_gcc module~module_calculate module_calculate module~module_calculate->module~calculate_gcc module~control_iteration control_iteration module~control_iteration->module~module_calculate module~hydraulic_hydraulic_assemble hydraulic_hydraulic_assemble module~hydraulic_hydraulic_assemble->module~module_calculate module~module_control module_control module~hydraulic_hydraulic_assemble->module~module_control module~module_properties module_properties module~hydraulic_hydraulic_assemble->module~module_properties module~main_hydraulic main_hydraulic module~main_hydraulic->module~module_calculate module~main_hydraulic->module~hydraulic_hydraulic_assemble module~main_hydraulic->module~module_control module~main_hydraulic->module~module_properties module~main_thermal main_thermal module~main_thermal->module~module_calculate module~main_thermal->module~module_control module~main_thermal->module~module_properties module~properties_material_manager properties_material_manager module~properties_material_manager->module~module_calculate module~properties_properties_manager properties_properties_manager module~properties_properties_manager->module~module_calculate module~properties_properties_manager->module~properties_material_manager module~properties_properties_manager->module~module_control module~main_hydraulic_crs main_hydraulic_crs module~main_hydraulic_crs->module~main_hydraulic module~main_thermal_crs main_thermal_crs module~main_thermal_crs->module~main_thermal module~module_control->module~control_iteration module~module_hydraulic module_hydraulic module~module_hydraulic->module~main_hydraulic module~module_properties->module~properties_material_manager module~module_properties->module~properties_properties_manager module~module_thermal module_thermal module~module_thermal->module~main_thermal module~input_output input_output module~input_output->module~module_control module~input_output->module~module_properties module~main_ftdss Main_FTDSS module~main_ftdss->module~module_control module~main_ftdss->module~module_hydraulic module~main_ftdss->module~module_properties module~main_ftdss->module~module_thermal module~module_output module_output module~main_ftdss->module~module_output module~input_output_base input_output_base module~input_output_base->module~input_output module~input_output_obaservation input_output_obaservation module~input_output_obaservation->module~input_output module~input_output_overall_base input_output_overall_base module~input_output_overall_base->module~input_output module~input_output_overall_vtk input_output_overall_vtk module~input_output_overall_vtk->module~input_output module~input_output_overall_vtu input_output_overall_vtu module~input_output_overall_vtu->module~input_output module~input_output_system_logger input_output_system_logger module~input_output_system_logger->module~input_output module~module_output->module~input_output

Interfaces

interface

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

    Arguments

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

    Return Value real(kind=real64)

interface

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

    Arguments

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

    Return Value real(kind=real64)

interface

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

    Arguments

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

    Return Value real(kind=real64)

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)

interface

  • private module function construct_type_GCC_Seg_m(Tf, Lf) result(property)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=real64), intent(in) :: Tf
    real(kind=real64), intent(in) :: Lf

    Return Value class(abst_gcc), allocatable

interface

  • private module function construct_type_gcc_nonseg_m(Tf, Lf) result(property)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=real64), intent(in) :: Tf
    real(kind=real64), intent(in) :: Lf

    Return Value class(abst_gcc), allocatable

interface

  • private module function construct_type_gcc_nonseg_pa(Tf, Lf) result(property)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=real64), intent(in) :: Tf
    real(kind=real64), intent(in) :: Lf

    Return Value class(abst_gcc), allocatable

interface

  • private module function construct_type_gcc_seg_pa(Tf, Lf) result(property)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=real64), intent(in) :: Tf
    real(kind=real64), intent(in) :: Lf

    Return Value class(abst_gcc), allocatable

interface

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

    Arguments

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

    Return Value real(kind=real64)

interface

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

    Arguments

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

    Return Value real(kind=real64)

interface

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

    Arguments

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

    Return Value real(kind=real64)

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)

interface

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

    Arguments

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

    Return Value real(kind=real64)

interface

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

    Arguments

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

    Return Value real(kind=real64)

interface

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

    Arguments

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

    Return Value real(kind=real64)

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)

interface

  • private module subroutine initialize_holder_gccs(self, input, i_material)

    Arguments

    Type IntentOptional Attributes Name
    class(holder_gccs), intent(inout) :: self
    type(type_input), intent(in) :: input
    integer(kind=int32), intent(in) :: i_material

public interface type_gcc_non_segregation_m

public interface type_gcc_non_segregation_pa

public interface type_gcc_segregation_m

public interface type_gcc_segregation_pa


Abstract Interfaces

abstract interface

  • private pure elemental function abst_gcc_calc(self, state) result(suction)

    Arguments

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

    Return Value real(kind=real64)


Derived Types

type, public, abstract ::  abst_gcc

Components

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

Latent heat of fusion
real(kind=real64), public :: Tf

Freezing point
real(kind=real64), private :: TtoK = 273.15d0

Conversion from Celsius to Kelvin
real(kind=real64), private :: g = 9.80665d0

Gravitational acceleration

Type-Bound Procedures

procedure(abst_gcc_calc), public, deferred, pass(self) :: calc
procedure(abst_gcc_calc), public, deferred, pass(self) :: deriv
procedure(abst_gcc_calc), public, deferred, pass(self) :: deriv2

type, public ::  holder_gccs

Components

Type Visibility Attributes Name Initial
class(abst_gcc), public, allocatable :: p

Type-Bound Procedures

procedure, public, pass(self) :: initialize => initialize_holder_gccs

type, public, extends(abst_gcc) ::  type_gcc_non_segregation_m

Components

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

Latent heat of fusion
real(kind=real64), public :: Tf

Freezing point

Constructor

private interface construct_type_gcc_nonseg_m ()

Type-Bound Procedures

procedure, public, pass(self) :: calc => calc_gcc_nonseg_m
procedure, public, pass(self) :: deriv => deriv_gcc_nonseg_m
procedure, public, pass(self) :: deriv2 => deriv_2nd_gcc_nonseg_m

type, public, extends(abst_gcc) ::  type_gcc_non_segregation_pa

Components

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

Latent heat of fusion
real(kind=real64), public :: Tf

Freezing point

Constructor

private interface construct_type_gcc_nonseg_pa ()

Type-Bound Procedures

procedure, public, pass(self) :: calc => calc_gcc_nonseg_pa
procedure, public, pass(self) :: deriv => deriv_gcc_nonseg_pa
procedure, public, pass(self) :: deriv2 => deriv_2nd_gcc_nonseg_pa

type, public, extends(abst_gcc) ::  type_gcc_segregation_m

Components

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

Latent heat of fusion
real(kind=real64), public :: Tf

Freezing point

Constructor

private interface construct_type_GCC_Seg_m ()

Type-Bound Procedures

procedure, public, pass(self) :: calc => calc_gcc_seg_m
procedure, public, pass(self) :: deriv => deriv_gcc_seg_m
procedure, public, pass(self) :: deriv2 => deriv_2nd_gcc_seg_m

type, public, extends(abst_gcc) ::  type_gcc_segregation_pa

Components

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

Latent heat of fusion
real(kind=real64), public :: Tf

Freezing point

Constructor

private interface construct_type_gcc_seg_pa ()

Type-Bound Procedures

procedure, public, pass(self) :: calc => calc_gcc_seg_pa
procedure, public, pass(self) :: deriv => deriv_gcc_seg_pa
procedure, public, pass(self) :: deriv2 => deriv_2nd_gcc_seg_pa