get_group Function

private pure function get_group(self) result(group)

Type Bound

abst_mesh

Arguments

Type IntentOptional Attributes Name
class(abst_mesh), intent(in) :: self

Return Value integer(kind=int32)


Called by

proc~~get_group~~CalledByGraph proc~get_group abst_mesh%get_group proc~find_target_edges_by_group find_target_edges_by_group proc~find_target_edges_by_group->proc~get_group proc~get_observations_si get_observations_si proc~get_observations_si->proc~get_group proc~get_observations_thc get_observations_thc proc~get_observations_thc->proc~get_group proc~get_observations_vhc get_observations_vhc proc~get_observations_vhc->proc~get_group proc~interpolate_observations_si interpolate_observations_si proc~interpolate_observations_si->proc~get_group proc~interpolate_observations_thc interpolate_observations_thc proc~interpolate_observations_thc->proc~get_group proc~interpolate_observations_vhc interpolate_observations_vhc proc~interpolate_observations_vhc->proc~get_group proc~process_element_hydraulic_linear_1 process_element_hydraulic_linear_1 proc~process_element_hydraulic_linear_1->proc~get_group proc~update_type_thermal_crs update_type_thermal_crs proc~update_type_thermal_crs->proc~get_group interface~find_target_edges_by_group find_target_edges_by_group interface~find_target_edges_by_group->proc~find_target_edges_by_group interface~update_type_thermal_crs type_thermal_crs%update_type_thermal_crs interface~update_type_thermal_crs->proc~update_type_thermal_crs 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 proc~initialize_type_bc_thermal_adiabatic initialize_type_bc_thermal_adiabatic proc~initialize_type_bc_thermal_adiabatic->interface~find_target_edges_by_group proc~initialize_type_bc_thermal_dirichlet initialize_type_bc_thermal_dirichlet proc~initialize_type_bc_thermal_dirichlet->interface~find_target_edges_by_group interface~initialize_type_bc_thermal_adiabatic type_bc_thermal_adiabatic%initialize_type_bc_thermal_adiabatic interface~initialize_type_bc_thermal_adiabatic->proc~initialize_type_bc_thermal_adiabatic interface~initialize_type_bc_thermal_dirichlet type_bc_thermal_dirichlet%initialize_type_bc_thermal_dirichlet interface~initialize_type_bc_thermal_dirichlet->proc~initialize_type_bc_thermal_dirichlet

Source Code

    pure function get_group(self) result(group)
        implicit none
        class(abst_mesh), intent(in) :: self
        integer(int32) :: group

        group = self%group
    end function get_group