domain_adjacency_adjacency_node Module

@type type_node_adjacency @brief ノードの隣接関係をCOO形式とCSR形式の両方で保持する型。


Uses

  • module~~domain_adjacency_adjacency_node~~UsesGraph module~domain_adjacency_adjacency_node domain_adjacency_adjacency_node iso_fortran_env iso_fortran_env module~domain_adjacency_adjacency_node->iso_fortran_env module~module_core module_core module~domain_adjacency_adjacency_node->module~module_core module~module_mesh module_mesh module~domain_adjacency_adjacency_node->module~module_mesh stdlib_sorting stdlib_sorting module~domain_adjacency_adjacency_node->stdlib_sorting 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~domain_mesh domain_mesh module~module_mesh->module~domain_mesh module~module_mesh_element module_mesh_element module~module_mesh->module~module_mesh_element module~module_mesh_side module_mesh_side module~module_mesh->module~module_mesh_side 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->stdlib_sorting module~core_unique->module~core_allocate module~core_vtk->iso_fortran_env module~core_vtk->stdlib_sorting 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_vtk_constants->iso_fortran_env module~domain_mesh->iso_fortran_env module~domain_mesh->module~module_core module~domain_mesh->stdlib_logger module~domain_mesh_element domain_mesh_element module~module_mesh_element->module~domain_mesh_element module~domain_mesh_element_factory domain_mesh_element_factory module~module_mesh_element->module~domain_mesh_element_factory module~domain_mesh_side domain_mesh_side module~module_mesh_side->module~domain_mesh_side module~domain_mesh_side_factory domain_mesh_side_factory module~module_mesh_side->module~domain_mesh_side_factory 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->module~core_c_utils stdlib_strings stdlib_strings module~core_fortran_utils_system_info_wrapper->stdlib_strings 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~domain_mesh_element->iso_fortran_env module~domain_mesh_element->module~module_core module~domain_mesh_element->module~domain_mesh module~domain_mesh_element->stdlib_logger module~module_input module_input module~domain_mesh_element->module~module_input module~domain_mesh_element_factory->iso_fortran_env module~domain_mesh_element_factory->module~module_core module~domain_mesh_element_factory->module~domain_mesh_element module~domain_mesh_element_factory->module~module_input module~domain_mesh_side->iso_fortran_env module~domain_mesh_side->module~module_core module~domain_mesh_side->module~domain_mesh module~domain_mesh_side->stdlib_logger module~domain_mesh_side->module~module_input module~domain_mesh_side_factory->iso_fortran_env module~domain_mesh_side_factory->module~module_core module~domain_mesh_side_factory->module~domain_mesh_side module~domain_mesh_side_factory->module~module_input 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~inout_input inout_input module~module_input->module~inout_input module~core_c_utils_memory_stats->iso_c_binding module~core_c_utils_system_info->iso_c_binding module~inout_input->iso_fortran_env module~inout_input->module~module_core module~inout_input->stdlib_logger module~inout_input->stdlib_strings 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_project_settings->iso_fortran_env module~inout_project_settings->module~module_core

Used by

  • module~~domain_adjacency_adjacency_node~~UsedByGraph module~domain_adjacency_adjacency_node domain_adjacency_adjacency_node module~domain_adjacency domain_adjacency module~domain_adjacency->module~domain_adjacency_adjacency_node module~domain_reordering domain_reordering module~domain_reordering->module~domain_adjacency_adjacency_node module~domain_manager domain_manager module~domain_manager->module~domain_adjacency module~domain_manager->module~domain_reordering module~module_domain module_domain module~module_domain->module~domain_adjacency module~module_domain->module~domain_reordering module~module_domain->module~domain_manager module~reordering_methods reordering_methods module~reordering_methods->module~domain_reordering module~reordering_to_original reordering_to_original module~reordering_to_original->module~domain_reordering module~reordering_to_reordered reordering_to_reordered module~reordering_to_reordered->module~domain_reordering module~conditions_boundary conditions_boundary module~conditions_boundary->module~module_domain module~conditions_boundary_manager conditions_boundary_manager module~conditions_boundary_manager->module~module_domain module~conditions_boundary_manager->module~conditions_boundary module~conditions_initial conditions_initial module~conditions_initial->module~module_domain module~module_boundary module_boundary module~conditions_initial->module~module_boundary module~conditions_initial_manager conditions_initial_manager module~conditions_initial_manager->module~module_domain module~conditions_initial_manager->module~conditions_initial module~hydraulic_hydraulic_assemble hydraulic_hydraulic_assemble module~hydraulic_hydraulic_assemble->module~module_domain module~input_output input_output module~input_output->module~module_domain module~main_ftdss Main_FTDSS module~main_ftdss->module~module_domain module~main_ftdss->module~module_boundary module~module_hydraulic module_hydraulic module~main_ftdss->module~module_hydraulic module~module_initial module_initial module~main_ftdss->module~module_initial module~module_output module_output module~main_ftdss->module~module_output module~module_thermal module_thermal module~main_ftdss->module~module_thermal module~main_hydraulic main_hydraulic module~main_hydraulic->module~module_domain module~main_hydraulic->module~hydraulic_hydraulic_assemble module~main_hydraulic->module~module_boundary module~main_thermal main_thermal module~main_thermal->module~module_domain module~main_thermal->module~module_boundary module~conditions_boundary_adiabatic conditions_boundary_adiabatic module~conditions_boundary_adiabatic->module~conditions_boundary module~conditions_boundary_base conditions_boundary_base module~conditions_boundary_base->module~conditions_boundary module~conditions_boundary_dirichlet conditions_boundary_dirichlet module~conditions_boundary_dirichlet->module~conditions_boundary module~conditions_initial_laplace conditions_initial_laplace module~conditions_initial_laplace->module~conditions_initial module~conditions_initial_uniform conditions_initial_uniform module~conditions_initial_uniform->module~conditions_initial 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~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_boundary->module~conditions_boundary module~module_boundary->module~conditions_boundary_manager module~module_hydraulic->module~main_hydraulic module~module_initial->module~conditions_initial module~module_initial->module~conditions_initial_manager module~module_output->module~input_output module~module_thermal->module~main_thermal

Derived Types

type, public ::  type_node_adjacency

Components

Type Visibility Attributes Name Initial
integer(kind=int32), public, allocatable :: col(:)
integer(kind=int32), public, allocatable :: ind(:)
integer(kind=int32), public :: nnz = 0
integer(kind=int32), public :: num_nodes = 0
integer(kind=int32), public, allocatable :: ptr(:)
integer(kind=int32), public, allocatable :: row(:)

Type-Bound Procedures

procedure, public, pass(self) :: destroy => destroy_hybrid
procedure, public, pass(self) :: get_coo
procedure, public, pass(self) :: get_csr
procedure, public, pass(self) :: get_degree => get_degree_csr
procedure, public, pass(self) :: get_neighbors => get_neighbors_csr
procedure, public, pass(self) :: get_nnz
procedure, public, pass(self) :: get_num_nodes
procedure, public, pass(self) :: initialize => initialize_hybrid_from_mesh

Functions

private function estimate_max_coo_size(computation_dimension, sides, elements) result(max_size)

Arguments

Type IntentOptional Attributes Name
integer(kind=int32), intent(in) :: computation_dimension
class(holder_sides), intent(in) :: sides(:)
class(holder_elements), intent(in) :: elements(:)

Return Value integer(kind=int32)

private pure function get_degree_csr(self, node_id) result(degree)

Arguments

Type IntentOptional Attributes Name
class(type_node_adjacency), intent(in) :: self
integer(kind=int32), intent(in) :: node_id

Return Value integer(kind=int32)

private pure function get_nnz(self) result(nnz)

Arguments

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

Return Value integer(kind=int32)

private pure function get_num_nodes(self) result(n_nodes)

Arguments

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

Return Value integer(kind=int32)


Subroutines

private subroutine build_csr_from_coo(self)

Arguments

Type IntentOptional Attributes Name
class(type_node_adjacency), intent(inout) :: self

private subroutine create_coo_from_mesh(computation_dimension, sides, elements, row_indices, col_indices, counter)

Arguments

Type IntentOptional Attributes Name
integer(kind=int32), intent(in) :: computation_dimension
class(holder_sides), intent(in) :: sides(:)
class(holder_elements), intent(in) :: elements(:)
integer(kind=int32), intent(out) :: row_indices(:)
integer(kind=int32), intent(out) :: col_indices(:)
integer(kind=int32), intent(out) :: counter

private subroutine create_unique_coo(self, temp_row, temp_col)

Arguments

Type IntentOptional Attributes Name
class(type_node_adjacency), intent(inout) :: self
integer(kind=int32), intent(in) :: temp_row(:)
integer(kind=int32), intent(in) :: temp_col(:)

private subroutine destroy_hybrid(self)

Arguments

Type IntentOptional Attributes Name
class(type_node_adjacency), intent(inout) :: self

private subroutine get_coo(self, row_out, col_out)

Arguments

Type IntentOptional Attributes Name
class(type_node_adjacency), intent(in) :: self
integer(kind=int32), intent(inout), allocatable :: row_out(:)
integer(kind=int32), intent(inout), allocatable :: col_out(:)

private subroutine get_csr(self, ptr_out, ind_out)

Arguments

Type IntentOptional Attributes Name
class(type_node_adjacency), intent(in) :: self
integer(kind=int32), intent(inout), allocatable :: ptr_out(:)
integer(kind=int32), intent(inout), allocatable :: ind_out(:)

private subroutine get_neighbors_csr(self, node_id, neighbors)

Arguments

Type IntentOptional Attributes Name
class(type_node_adjacency), intent(in) :: self
integer(kind=int32), intent(in) :: node_id
integer(kind=int32), intent(out), allocatable :: neighbors(:)

private subroutine initialize_hybrid_from_mesh(self, num_nodes, computation_dimension, sides, elements)

Arguments

Type IntentOptional Attributes Name
class(type_node_adjacency), intent(inout) :: self
integer(kind=int32), intent(in) :: num_nodes
integer(kind=int32), intent(in) :: computation_dimension
class(holder_sides), intent(in) :: sides(:)
class(holder_elements), intent(in) :: elements(:)