calc_hydraulic_properties_scalar Subroutine

private subroutine calc_hydraulic_properties_scalar(self, material_id, state, kflh)

Type Bound

type_properties_manager

Arguments

Type IntentOptional Attributes Name
class(type_properties_manager), intent(in) :: self
integer(kind=int32), intent(in) :: material_id
type(type_state), intent(inout) :: state
real(kind=real64), intent(inout) :: kflh

Calls

proc~~calc_hydraulic_properties_scalar~~CallsGraph proc~calc_hydraulic_properties_scalar type_properties_manager%calc_hydraulic_properties_scalar proc~calc_hydraulic_properties_impl_scalar type_properties_manager%calc_hydraulic_properties_impl_scalar proc~calc_hydraulic_properties_scalar->proc~calc_hydraulic_properties_impl_scalar proc~get_pointers_for_region type_properties_manager%get_pointers_for_region proc~calc_hydraulic_properties_scalar->proc~get_pointers_for_region calc_kflh calc_kflh proc~calc_hydraulic_properties_impl_scalar->calc_kflh proc~get_den_ptr type_material_manager%get_den_ptr proc~get_pointers_for_region->proc~get_den_ptr proc~get_gcc_ptr type_material_manager%get_gcc_ptr proc~get_pointers_for_region->proc~get_gcc_ptr proc~get_hcf_ptr type_material_manager%get_hcf_ptr proc~get_pointers_for_region->proc~get_hcf_ptr proc~get_thc_ptr type_material_manager%get_thc_ptr proc~get_pointers_for_region->proc~get_thc_ptr proc~get_vhc_ptr type_material_manager%get_vhc_ptr proc~get_pointers_for_region->proc~get_vhc_ptr proc~get_wrf_ptr type_material_manager%get_wrf_ptr proc~get_pointers_for_region->proc~get_wrf_ptr

Called by

proc~~calc_hydraulic_properties_scalar~~CalledByGraph proc~calc_hydraulic_properties_scalar type_properties_manager%calc_hydraulic_properties_scalar none~calc_hydraulic type_properties_manager%calc_hydraulic none~calc_hydraulic->proc~calc_hydraulic_properties_scalar proc~process_element_hydraulic_linear_1 process_element_hydraulic_linear_1 proc~process_element_hydraulic_linear_1->none~calc_hydraulic proc~hydraulic_assemble_system_linear_1 hydraulic_assemble_system_linear_1 proc~hydraulic_assemble_system_linear_1->proc~process_element_hydraulic_linear_1 proc~hydraulic_assemble_system_linear_1_parallel hydraulic_assemble_system_linear_1_parallel proc~hydraulic_assemble_system_linear_1_parallel->proc~process_element_hydraulic_linear_1

Source Code

    subroutine calc_hydraulic_properties_scalar(self, material_id, state, kflh)
        class(type_properties_manager), intent(in) :: self
        integer(int32), intent(in) :: material_id
        type(type_state), intent(inout) :: state
        real(real64), intent(inout) :: kflh

        type(type_material_pointers) :: ptrs

        call self%get_pointers_for_region(calc_hydraulic, material_id, ptrs)
        call self%calc_hydraulic_properties_impl_scalar(state, ptrs, kflh)
    end subroutine calc_hydraulic_properties_scalar