From af470427a0b9cb62637fea380a76ed022837177d Mon Sep 17 00:00:00 2001 From: Salvatore Filippone Date: Fri, 3 Jun 2016 12:39:32 +0000 Subject: [PATCH] psblas3-newdesc: base/modules/Makefile base/modules/aux base/modules/aux/psb_c_sort_mod.f90 base/modules/aux/psb_d_sort_mod.f90 base/modules/aux/psb_hash_mod.f90 base/modules/aux/psb_i_sort_mod.f90 base/modules/aux/psb_ip_reord_mod.f90 base/modules/aux/psb_s_sort_mod.f90 base/modules/aux/psb_sort_mod.f90 base/modules/aux/psb_string_mod.f90 base/modules/aux/psb_z_sort_mod.f90 base/modules/aux/psi_c_serial_mod.f90 base/modules/aux/psi_d_serial_mod.f90 base/modules/aux/psi_i_serial_mod.f90 base/modules/aux/psi_s_serial_mod.f90 base/modules/aux/psi_serial_mod.f90 base/modules/aux/psi_z_serial_mod.f90 base/modules/comm base/modules/comm/psb_base_linmap_mod.f90 base/modules/comm/psb_c_comm_mod.f90 base/modules/comm/psb_c_linmap_mod.f90 base/modules/comm/psb_comm_mod.f90 base/modules/comm/psb_d_comm_mod.f90 base/modules/comm/psb_d_linmap_mod.f90 base/modules/comm/psb_i_comm_mod.f90 base/modules/comm/psb_linmap_mod.f90 base/modules/comm/psb_s_comm_mod.f90 base/modules/comm/psb_s_linmap_mod.f90 base/modules/comm/psb_z_comm_mod.f90 base/modules/comm/psb_z_linmap_mod.f90 base/modules/desc base/modules/desc/psb_desc_const_mod.f90 base/modules/desc/psb_desc_mod.F90 base/modules/desc/psb_gen_block_map_mod.f90 base/modules/desc/psb_glist_map_mod.f90 base/modules/desc/psb_hash_map_mod.f90 base/modules/desc/psb_indx_map_mod.f90 base/modules/desc/psb_list_map_mod.f90 base/modules/desc/psb_repl_map_mod.f90 base/modules/psb_base_linmap_mod.f90 base/modules/psb_base_mat_mod.f90 base/modules/psb_c_base_mat_mod.f90 base/modules/psb_c_base_vect_mod.f90 base/modules/psb_c_comm_mod.f90 base/modules/psb_c_csc_mat_mod.f90 base/modules/psb_c_csr_mat_mod.f90 base/modules/psb_c_linmap_mod.f90 base/modules/psb_c_mat_mod.f90 base/modules/psb_c_psblas_mod.F90 base/modules/psb_c_serial_mod.f90 base/modules/psb_c_sort_mod.f90 base/modules/psb_c_tools_mod.f90 base/modules/psb_c_vect_mod.F90 base/modules/psb_cd_tools_mod.f90 base/modules/psb_comm_mod.f90 base/modules/psb_d_base_mat_mod.f90 base/modules/psb_d_base_vect_mod.f90 base/modules/psb_d_comm_mod.f90 base/modules/psb_d_csc_mat_mod.f90 base/modules/psb_d_csr_mat_mod.f90 base/modules/psb_d_linmap_mod.f90 base/modules/psb_d_mat_mod.f90 base/modules/psb_d_psblas_mod.F90 base/modules/psb_d_serial_mod.f90 base/modules/psb_d_sort_mod.f90 base/modules/psb_d_tools_mod.f90 base/modules/psb_d_vect_mod.F90 base/modules/psb_desc_const_mod.f90 base/modules/psb_desc_mod.F90 base/modules/psb_gen_block_map_mod.f90 base/modules/psb_glist_map_mod.f90 base/modules/psb_hash_map_mod.f90 base/modules/psb_hash_mod.f90 base/modules/psb_i_base_vect_mod.f90 base/modules/psb_i_comm_mod.f90 base/modules/psb_i_sort_mod.f90 base/modules/psb_i_tools_mod.f90 base/modules/psb_i_vect_mod.F90 base/modules/psb_indx_map_mod.f90 base/modules/psb_ip_reord_mod.f90 base/modules/psb_linmap_mod.f90 base/modules/psb_list_map_mod.f90 base/modules/psb_mat_mod.f90 base/modules/psb_psblas_mod.f90 base/modules/psb_repl_map_mod.f90 base/modules/psb_s_base_mat_mod.f90 base/modules/psb_s_base_vect_mod.f90 base/modules/psb_s_comm_mod.f90 base/modules/psb_s_csc_mat_mod.f90 base/modules/psb_s_csr_mat_mod.f90 base/modules/psb_s_linmap_mod.f90 base/modules/psb_s_mat_mod.f90 base/modules/psb_s_psblas_mod.F90 base/modules/psb_s_serial_mod.f90 base/modules/psb_s_sort_mod.f90 base/modules/psb_s_tools_mod.f90 base/modules/psb_s_vect_mod.F90 base/modules/psb_serial_mod.f90 base/modules/psb_sort_mod.f90 base/modules/psb_sort_mod_save.f90 base/modules/psb_string_mod.f90 base/modules/psb_tools_mod.f90 base/modules/psb_vect_mod.f90 base/modules/psb_z_base_mat_mod.f90 base/modules/psb_z_base_vect_mod.f90 base/modules/psb_z_comm_mod.f90 base/modules/psb_z_csc_mat_mod.f90 base/modules/psb_z_csr_mat_mod.f90 base/modules/psb_z_linmap_mod.f90 base/modules/psb_z_mat_mod.f90 base/modules/psb_z_psblas_mod.F90 base/modules/psb_z_serial_mod.f90 base/modules/psb_z_sort_mod.f90 base/modules/psb_z_tools_mod.f90 base/modules/psb_z_vect_mod.F90 base/modules/psblas base/modules/psblas/psb_c_psblas_mod.F90 base/modules/psblas/psb_d_psblas_mod.F90 base/modules/psblas/psb_psblas_mod.f90 base/modules/psblas/psb_s_psblas_mod.F90 base/modules/psblas/psb_z_psblas_mod.F90 base/modules/psi_c_serial_mod.f90 base/modules/psi_d_serial_mod.f90 base/modules/psi_i_serial_mod.f90 base/modules/psi_s_serial_mod.f90 base/modules/psi_serial_mod.f90 base/modules/psi_z_serial_mod.f90 base/modules/serial base/modules/serial/psb_base_mat_mod.f90 base/modules/serial/psb_c_base_mat_mod.f90 base/modules/serial/psb_c_base_vect_mod.f90 base/modules/serial/psb_c_csc_mat_mod.f90 base/modules/serial/psb_c_csr_mat_mod.f90 base/modules/serial/psb_c_mat_mod.f90 base/modules/serial/psb_c_serial_mod.f90 base/modules/serial/psb_c_vect_mod.F90 base/modules/serial/psb_d_base_mat_mod.f90 base/modules/serial/psb_d_base_vect_mod.f90 base/modules/serial/psb_d_csc_mat_mod.f90 base/modules/serial/psb_d_csr_mat_mod.f90 base/modules/serial/psb_d_mat_mod.f90 base/modules/serial/psb_d_serial_mod.f90 base/modules/serial/psb_d_vect_mod.F90 base/modules/serial/psb_i_base_vect_mod.f90 base/modules/serial/psb_i_vect_mod.F90 base/modules/serial/psb_mat_mod.f90 base/modules/serial/psb_s_base_mat_mod.f90 base/modules/serial/psb_s_base_vect_mod.f90 base/modules/serial/psb_s_csc_mat_mod.f90 base/modules/serial/psb_s_csr_mat_mod.f90 base/modules/serial/psb_s_mat_mod.f90 base/modules/serial/psb_s_serial_mod.f90 base/modules/serial/psb_s_vect_mod.F90 base/modules/serial/psb_serial_mod.f90 base/modules/serial/psb_vect_mod.f90 base/modules/serial/psb_z_base_mat_mod.f90 base/modules/serial/psb_z_base_vect_mod.f90 base/modules/serial/psb_z_csc_mat_mod.f90 base/modules/serial/psb_z_csr_mat_mod.f90 base/modules/serial/psb_z_mat_mod.f90 base/modules/serial/psb_z_serial_mod.f90 base/modules/serial/psb_z_vect_mod.F90 base/modules/tools base/modules/tools/psb_c_tools_mod.f90 base/modules/tools/psb_cd_tools_mod.f90 base/modules/tools/psb_d_tools_mod.f90 base/modules/tools/psb_i_tools_mod.f90 base/modules/tools/psb_s_tools_mod.f90 base/modules/tools/psb_tools_mod.f90 base/modules/tools/psb_z_tools_mod.f90 Reorganize the base/modules subdir. --- base/modules/Makefile | 240 +++--- base/modules/{ => aux}/psb_c_sort_mod.f90 | 0 base/modules/{ => aux}/psb_d_sort_mod.f90 | 0 base/modules/{ => aux}/psb_hash_mod.f90 | 0 base/modules/{ => aux}/psb_i_sort_mod.f90 | 0 base/modules/{ => aux}/psb_ip_reord_mod.f90 | 0 base/modules/{ => aux}/psb_s_sort_mod.f90 | 0 base/modules/{ => aux}/psb_sort_mod.f90 | 0 base/modules/{ => aux}/psb_string_mod.f90 | 0 base/modules/{ => aux}/psb_z_sort_mod.f90 | 0 base/modules/{ => aux}/psi_c_serial_mod.f90 | 0 base/modules/{ => aux}/psi_d_serial_mod.f90 | 0 base/modules/{ => aux}/psi_i_serial_mod.f90 | 0 base/modules/{ => aux}/psi_s_serial_mod.f90 | 0 base/modules/{ => aux}/psi_serial_mod.f90 | 0 base/modules/{ => aux}/psi_z_serial_mod.f90 | 0 .../{ => comm}/psb_base_linmap_mod.f90 | 0 base/modules/{ => comm}/psb_c_comm_mod.f90 | 0 base/modules/{ => comm}/psb_c_linmap_mod.f90 | 0 base/modules/{ => comm}/psb_comm_mod.f90 | 0 base/modules/{ => comm}/psb_d_comm_mod.f90 | 0 base/modules/{ => comm}/psb_d_linmap_mod.f90 | 0 base/modules/{ => comm}/psb_i_comm_mod.f90 | 0 base/modules/{ => comm}/psb_linmap_mod.f90 | 0 base/modules/{ => comm}/psb_s_comm_mod.f90 | 0 base/modules/{ => comm}/psb_s_linmap_mod.f90 | 0 base/modules/{ => comm}/psb_z_comm_mod.f90 | 0 base/modules/{ => comm}/psb_z_linmap_mod.f90 | 0 .../modules/{ => desc}/psb_desc_const_mod.f90 | 0 base/modules/{ => desc}/psb_desc_mod.F90 | 0 .../{ => desc}/psb_gen_block_map_mod.f90 | 0 base/modules/{ => desc}/psb_glist_map_mod.f90 | 0 base/modules/{ => desc}/psb_hash_map_mod.f90 | 0 base/modules/{ => desc}/psb_indx_map_mod.f90 | 0 base/modules/{ => desc}/psb_list_map_mod.f90 | 0 base/modules/{ => desc}/psb_repl_map_mod.f90 | 0 base/modules/psb_sort_mod_save.f90 | 741 ------------------ .../modules/{ => psblas}/psb_c_psblas_mod.F90 | 0 .../modules/{ => psblas}/psb_d_psblas_mod.F90 | 0 base/modules/{ => psblas}/psb_psblas_mod.f90 | 0 .../modules/{ => psblas}/psb_s_psblas_mod.F90 | 0 .../modules/{ => psblas}/psb_z_psblas_mod.F90 | 0 .../modules/{ => serial}/psb_base_mat_mod.f90 | 0 .../{ => serial}/psb_c_base_mat_mod.f90 | 0 .../{ => serial}/psb_c_base_vect_mod.f90 | 0 .../{ => serial}/psb_c_csc_mat_mod.f90 | 0 .../{ => serial}/psb_c_csr_mat_mod.f90 | 0 base/modules/{ => serial}/psb_c_mat_mod.f90 | 0 .../modules/{ => serial}/psb_c_serial_mod.f90 | 0 base/modules/{ => serial}/psb_c_vect_mod.F90 | 0 .../{ => serial}/psb_d_base_mat_mod.f90 | 0 .../{ => serial}/psb_d_base_vect_mod.f90 | 0 .../{ => serial}/psb_d_csc_mat_mod.f90 | 0 .../{ => serial}/psb_d_csr_mat_mod.f90 | 0 base/modules/{ => serial}/psb_d_mat_mod.f90 | 0 .../modules/{ => serial}/psb_d_serial_mod.f90 | 0 base/modules/{ => serial}/psb_d_vect_mod.F90 | 0 .../{ => serial}/psb_i_base_vect_mod.f90 | 0 base/modules/{ => serial}/psb_i_vect_mod.F90 | 0 base/modules/{ => serial}/psb_mat_mod.f90 | 0 .../{ => serial}/psb_s_base_mat_mod.f90 | 0 .../{ => serial}/psb_s_base_vect_mod.f90 | 0 .../{ => serial}/psb_s_csc_mat_mod.f90 | 0 .../{ => serial}/psb_s_csr_mat_mod.f90 | 0 base/modules/{ => serial}/psb_s_mat_mod.f90 | 0 .../modules/{ => serial}/psb_s_serial_mod.f90 | 0 base/modules/{ => serial}/psb_s_vect_mod.F90 | 0 base/modules/{ => serial}/psb_serial_mod.f90 | 0 base/modules/{ => serial}/psb_vect_mod.f90 | 0 .../{ => serial}/psb_z_base_mat_mod.f90 | 0 .../{ => serial}/psb_z_base_vect_mod.f90 | 0 .../{ => serial}/psb_z_csc_mat_mod.f90 | 0 .../{ => serial}/psb_z_csr_mat_mod.f90 | 0 base/modules/{ => serial}/psb_z_mat_mod.f90 | 0 .../modules/{ => serial}/psb_z_serial_mod.f90 | 0 base/modules/{ => serial}/psb_z_vect_mod.F90 | 0 base/modules/{ => tools}/psb_c_tools_mod.f90 | 0 base/modules/{ => tools}/psb_cd_tools_mod.f90 | 0 base/modules/{ => tools}/psb_d_tools_mod.f90 | 0 base/modules/{ => tools}/psb_i_tools_mod.f90 | 0 base/modules/{ => tools}/psb_s_tools_mod.f90 | 0 base/modules/{ => tools}/psb_tools_mod.f90 | 0 base/modules/{ => tools}/psb_z_tools_mod.f90 | 0 83 files changed, 119 insertions(+), 862 deletions(-) rename base/modules/{ => aux}/psb_c_sort_mod.f90 (100%) rename base/modules/{ => aux}/psb_d_sort_mod.f90 (100%) rename base/modules/{ => aux}/psb_hash_mod.f90 (100%) rename base/modules/{ => aux}/psb_i_sort_mod.f90 (100%) rename base/modules/{ => aux}/psb_ip_reord_mod.f90 (100%) rename base/modules/{ => aux}/psb_s_sort_mod.f90 (100%) rename base/modules/{ => aux}/psb_sort_mod.f90 (100%) rename base/modules/{ => aux}/psb_string_mod.f90 (100%) rename base/modules/{ => aux}/psb_z_sort_mod.f90 (100%) rename base/modules/{ => aux}/psi_c_serial_mod.f90 (100%) rename base/modules/{ => aux}/psi_d_serial_mod.f90 (100%) rename base/modules/{ => aux}/psi_i_serial_mod.f90 (100%) rename base/modules/{ => aux}/psi_s_serial_mod.f90 (100%) rename base/modules/{ => aux}/psi_serial_mod.f90 (100%) rename base/modules/{ => aux}/psi_z_serial_mod.f90 (100%) rename base/modules/{ => comm}/psb_base_linmap_mod.f90 (100%) rename base/modules/{ => comm}/psb_c_comm_mod.f90 (100%) rename base/modules/{ => comm}/psb_c_linmap_mod.f90 (100%) rename base/modules/{ => comm}/psb_comm_mod.f90 (100%) rename base/modules/{ => comm}/psb_d_comm_mod.f90 (100%) rename base/modules/{ => comm}/psb_d_linmap_mod.f90 (100%) rename base/modules/{ => comm}/psb_i_comm_mod.f90 (100%) rename base/modules/{ => comm}/psb_linmap_mod.f90 (100%) rename base/modules/{ => comm}/psb_s_comm_mod.f90 (100%) rename base/modules/{ => comm}/psb_s_linmap_mod.f90 (100%) rename base/modules/{ => comm}/psb_z_comm_mod.f90 (100%) rename base/modules/{ => comm}/psb_z_linmap_mod.f90 (100%) rename base/modules/{ => desc}/psb_desc_const_mod.f90 (100%) rename base/modules/{ => desc}/psb_desc_mod.F90 (100%) rename base/modules/{ => desc}/psb_gen_block_map_mod.f90 (100%) rename base/modules/{ => desc}/psb_glist_map_mod.f90 (100%) rename base/modules/{ => desc}/psb_hash_map_mod.f90 (100%) rename base/modules/{ => desc}/psb_indx_map_mod.f90 (100%) rename base/modules/{ => desc}/psb_list_map_mod.f90 (100%) rename base/modules/{ => desc}/psb_repl_map_mod.f90 (100%) delete mode 100644 base/modules/psb_sort_mod_save.f90 rename base/modules/{ => psblas}/psb_c_psblas_mod.F90 (100%) rename base/modules/{ => psblas}/psb_d_psblas_mod.F90 (100%) rename base/modules/{ => psblas}/psb_psblas_mod.f90 (100%) rename base/modules/{ => psblas}/psb_s_psblas_mod.F90 (100%) rename base/modules/{ => psblas}/psb_z_psblas_mod.F90 (100%) rename base/modules/{ => serial}/psb_base_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_c_base_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_c_base_vect_mod.f90 (100%) rename base/modules/{ => serial}/psb_c_csc_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_c_csr_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_c_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_c_serial_mod.f90 (100%) rename base/modules/{ => serial}/psb_c_vect_mod.F90 (100%) rename base/modules/{ => serial}/psb_d_base_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_d_base_vect_mod.f90 (100%) rename base/modules/{ => serial}/psb_d_csc_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_d_csr_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_d_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_d_serial_mod.f90 (100%) rename base/modules/{ => serial}/psb_d_vect_mod.F90 (100%) rename base/modules/{ => serial}/psb_i_base_vect_mod.f90 (100%) rename base/modules/{ => serial}/psb_i_vect_mod.F90 (100%) rename base/modules/{ => serial}/psb_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_s_base_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_s_base_vect_mod.f90 (100%) rename base/modules/{ => serial}/psb_s_csc_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_s_csr_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_s_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_s_serial_mod.f90 (100%) rename base/modules/{ => serial}/psb_s_vect_mod.F90 (100%) rename base/modules/{ => serial}/psb_serial_mod.f90 (100%) rename base/modules/{ => serial}/psb_vect_mod.f90 (100%) rename base/modules/{ => serial}/psb_z_base_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_z_base_vect_mod.f90 (100%) rename base/modules/{ => serial}/psb_z_csc_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_z_csr_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_z_mat_mod.f90 (100%) rename base/modules/{ => serial}/psb_z_serial_mod.f90 (100%) rename base/modules/{ => serial}/psb_z_vect_mod.F90 (100%) rename base/modules/{ => tools}/psb_c_tools_mod.f90 (100%) rename base/modules/{ => tools}/psb_cd_tools_mod.f90 (100%) rename base/modules/{ => tools}/psb_d_tools_mod.f90 (100%) rename base/modules/{ => tools}/psb_i_tools_mod.f90 (100%) rename base/modules/{ => tools}/psb_s_tools_mod.f90 (100%) rename base/modules/{ => tools}/psb_tools_mod.f90 (100%) rename base/modules/{ => tools}/psb_z_tools_mod.f90 (100%) diff --git a/base/modules/Makefile b/base/modules/Makefile index 583a9d028..6aaaaef63 100644 --- a/base/modules/Makefile +++ b/base/modules/Makefile @@ -2,39 +2,39 @@ include ../../Make.inc BASIC_MODS= psb_const_mod.o psb_error_mod.o psb_realloc_mod.o COMMINT=psi_comm_buffers_mod.o psi_penv_mod.o psi_bcast_mod.o psi_reduce_mod.o psi_p2p_mod.o -UTIL_MODS = psb_string_mod.o psb_desc_const_mod.o psb_indx_map_mod.o\ - psb_gen_block_map_mod.o psb_list_map_mod.o psb_repl_map_mod.o\ - psb_glist_map_mod.o psb_hash_map_mod.o \ - psb_desc_mod.o psb_sort_mod.o \ - psb_s_serial_mod.o psb_d_serial_mod.o psb_c_serial_mod.o psb_z_serial_mod.o \ - psb_serial_mod.o \ - psb_cd_tools_mod.o psb_i_tools_mod.o psb_s_tools_mod.o psb_d_tools_mod.o\ - psb_c_tools_mod.o psb_z_tools_mod.o psb_tools_mod.o \ +UTIL_MODS = aux/psb_string_mod.o desc/psb_desc_const_mod.o desc/psb_indx_map_mod.o\ + desc/psb_gen_block_map_mod.o desc/psb_list_map_mod.o desc/psb_repl_map_mod.o\ + desc/psb_glist_map_mod.o desc/psb_hash_map_mod.o \ + desc/psb_desc_mod.o aux/psb_sort_mod.o \ + serial/psb_s_serial_mod.o serial/psb_d_serial_mod.o serial/psb_c_serial_mod.o serial/psb_z_serial_mod.o \ + serial/psb_serial_mod.o \ + tools/psb_cd_tools_mod.o tools/psb_i_tools_mod.o tools/psb_s_tools_mod.o tools/psb_d_tools_mod.o\ + tools/psb_c_tools_mod.o tools/psb_z_tools_mod.o tools/psb_tools_mod.o \ psb_penv_mod.o $(COMMINT) psb_error_impl.o \ - psb_base_linmap_mod.o psb_linmap_mod.o \ - psb_s_linmap_mod.o psb_d_linmap_mod.o psb_c_linmap_mod.o psb_z_linmap_mod.o \ - psb_comm_mod.o psb_i_comm_mod.o psb_s_comm_mod.o psb_d_comm_mod.o\ - psb_c_comm_mod.o psb_z_comm_mod.o \ - psb_i_base_vect_mod.o psb_i_vect_mod.o\ - psb_d_base_vect_mod.o psb_d_vect_mod.o\ - psb_s_base_vect_mod.o psb_s_vect_mod.o\ - psb_c_base_vect_mod.o psb_c_vect_mod.o\ - psb_z_base_vect_mod.o psb_z_vect_mod.o\ - psb_vect_mod.o\ - psb_s_psblas_mod.o psb_c_psblas_mod.o \ - psb_d_psblas_mod.o psb_z_psblas_mod.o psb_psblas_mod.o \ - psi_serial_mod.o psi_i_serial_mod.o \ - psi_s_serial_mod.o psi_d_serial_mod.o psi_c_serial_mod.o psi_z_serial_mod.o \ + comm/psb_base_linmap_mod.o comm/psb_linmap_mod.o \ + comm/psb_s_linmap_mod.o comm/psb_d_linmap_mod.o comm/psb_c_linmap_mod.o comm/psb_z_linmap_mod.o \ + comm/psb_comm_mod.o comm/psb_i_comm_mod.o comm/psb_s_comm_mod.o comm/psb_d_comm_mod.o\ + comm/psb_c_comm_mod.o comm/psb_z_comm_mod.o \ + serial/psb_i_base_vect_mod.o serial/psb_i_vect_mod.o\ + serial/psb_d_base_vect_mod.o serial/psb_d_vect_mod.o\ + serial/psb_s_base_vect_mod.o serial/psb_s_vect_mod.o\ + serial/psb_c_base_vect_mod.o serial/psb_c_vect_mod.o\ + serial/psb_z_base_vect_mod.o serial/psb_z_vect_mod.o\ + serial/psb_vect_mod.o\ + psblas/psb_s_psblas_mod.o psblas/psb_c_psblas_mod.o \ + psblas/psb_d_psblas_mod.o psblas/psb_z_psblas_mod.o psblas/psb_psblas_mod.o \ + aux/psi_serial_mod.o aux/psi_i_serial_mod.o \ + aux/psi_s_serial_mod.o aux/psi_d_serial_mod.o aux/psi_c_serial_mod.o aux/psi_z_serial_mod.o \ psi_mod.o psi_i_mod.o psi_s_mod.o psi_d_mod.o psi_c_mod.o psi_z_mod.o\ - psb_ip_reord_mod.o\ - psb_i_sort_mod.o psb_s_sort_mod.o psb_d_sort_mod.o \ - psb_c_sort_mod.o psb_z_sort_mod.o \ - psb_check_mod.o psb_hash_mod.o\ - psb_base_mat_mod.o psb_mat_mod.o\ - psb_s_base_mat_mod.o psb_s_csr_mat_mod.o psb_s_csc_mat_mod.o psb_s_mat_mod.o \ - psb_d_base_mat_mod.o psb_d_csr_mat_mod.o psb_d_csc_mat_mod.o psb_d_mat_mod.o \ - psb_c_base_mat_mod.o psb_c_csr_mat_mod.o psb_c_csc_mat_mod.o psb_c_mat_mod.o \ - psb_z_base_mat_mod.o psb_z_csr_mat_mod.o psb_z_csc_mat_mod.o psb_z_mat_mod.o + aux/psb_ip_reord_mod.o\ + aux/psb_i_sort_mod.o aux/psb_s_sort_mod.o aux/psb_d_sort_mod.o \ + aux/psb_c_sort_mod.o aux/psb_z_sort_mod.o \ + psb_check_mod.o aux/psb_hash_mod.o\ + serial/psb_base_mat_mod.o serial/psb_mat_mod.o\ + serial/psb_s_base_mat_mod.o serial/psb_s_csr_mat_mod.o serial/psb_s_csc_mat_mod.o serial/psb_s_mat_mod.o \ + serial/psb_d_base_mat_mod.o serial/psb_d_csr_mat_mod.o serial/psb_d_csc_mat_mod.o serial/psb_d_mat_mod.o \ + serial/psb_c_base_mat_mod.o serial/psb_c_csr_mat_mod.o serial/psb_c_csc_mat_mod.o serial/psb_c_mat_mod.o \ + serial/psb_z_base_mat_mod.o serial/psb_z_csr_mat_mod.o serial/psb_z_csc_mat_mod.o serial/psb_z_mat_mod.o MODULES=$(BASIC_MODS) $(UTIL_MODS) @@ -56,117 +56,115 @@ psb_error_mod.o: psb_const_mod.o psb_realloc_mod.o: psb_error_mod.o $(UTILS_MODS): $(BASIC_MODS) -psb_string_mod.o psb_desc_const_mod.o psi_comm_buffers_mod.o: psb_const_mod.o +aux/psb_string_mod.o desc/psb_desc_const_mod.o psi_comm_buffers_mod.o: psb_const_mod.o psi_penv_mod.o: psi_comm_buffers_mod.o psi_bcast_mod.o psi_reduce_mod.o psi_p2p_mod.o: psi_penv_mod.o -psb_i_sort_mod.o psb_s_sort_mod.o psb_d_sort_mod.o psb_c_sort_mod.o psb_z_sort_mod.o \ -psb_ip_reord_mod.o psi_serial_mod.o psb_sort_mod.o: $(BASIC_MODS) -psb_base_mat_mod.o: psi_serial_mod.o -psb_s_base_mat_mod.o psb_d_base_mat_mod.o psb_c_base_mat_mod.o psb_z_base_mat_mod.o: psb_base_mat_mod.o -psb_s_base_mat_mod.o: psb_s_base_vect_mod.o -psb_d_base_mat_mod.o: psb_d_base_vect_mod.o -psb_c_base_mat_mod.o: psb_c_base_vect_mod.o -psb_z_base_mat_mod.o: psb_z_base_vect_mod.o -psb_c_base_vect_mod.o psb_s_base_vect_mod.o psb_d_base_vect_mod.o psb_z_base_vect_mod.o: psb_i_base_vect_mod.o -psb_i_base_vect_mod.o psb_c_base_vect_mod.o psb_s_base_vect_mod.o psb_d_base_vect_mod.o psb_z_base_vect_mod.o: psi_serial_mod.o psb_realloc_mod.o -psb_s_mat_mod.o: psb_s_base_mat_mod.o psb_s_csr_mat_mod.o psb_s_csc_mat_mod.o psb_s_vect_mod.o -psb_d_mat_mod.o: psb_d_base_mat_mod.o psb_d_csr_mat_mod.o psb_d_csc_mat_mod.o psb_d_vect_mod.o psb_i_vect_mod.o -psb_c_mat_mod.o: psb_c_base_mat_mod.o psb_c_csr_mat_mod.o psb_c_csc_mat_mod.o psb_c_vect_mod.o -psb_z_mat_mod.o: psb_z_base_mat_mod.o psb_z_csr_mat_mod.o psb_z_csc_mat_mod.o psb_z_vect_mod.o -psb_s_csc_mat_mod.o psb_s_csr_mat_mod.o: psb_s_base_mat_mod.o -psb_d_csc_mat_mod.o psb_d_csr_mat_mod.o: psb_d_base_mat_mod.o -psb_c_csc_mat_mod.o psb_c_csr_mat_mod.o: psb_c_base_mat_mod.o -psb_z_csc_mat_mod.o psb_z_csr_mat_mod.o: psb_z_base_mat_mod.o -psb_mat_mod.o: psb_vect_mod.o psb_s_mat_mod.o psb_d_mat_mod.o psb_c_mat_mod.o psb_z_mat_mod.o +aux/psb_i_sort_mod.o aux/psb_s_sort_mod.o aux/psb_d_sort_mod.o aux/psb_c_sort_mod.o aux/psb_z_sort_mod.o \ +aux/psb_ip_reord_mod.o aux/psi_serial_mod.o aux/psb_sort_mod.o: $(BASIC_MODS) +serial/psb_base_mat_mod.o: aux/psi_serial_mod.o +serial/psb_s_base_mat_mod.o serial/psb_d_base_mat_mod.o serial/psb_c_base_mat_mod.o serial/psb_z_base_mat_mod.o: serial/psb_base_mat_mod.o +serial/psb_s_base_mat_mod.o: serial/psb_s_base_vect_mod.o +serial/psb_d_base_mat_mod.o: serial/psb_d_base_vect_mod.o +serial/psb_c_base_mat_mod.o: serial/psb_c_base_vect_mod.o +serial/psb_z_base_mat_mod.o: serial/psb_z_base_vect_mod.o +serial/psb_c_base_vect_mod.o serial/psb_s_base_vect_mod.o serial/psb_d_base_vect_mod.o serial/psb_z_base_vect_mod.o: serial/psb_i_base_vect_mod.o +serial/psb_i_base_vect_mod.o serial/psb_c_base_vect_mod.o serial/psb_s_base_vect_mod.o serial/psb_d_base_vect_mod.o serial/psb_z_base_vect_mod.o: aux/psi_serial_mod.o psb_realloc_mod.o +serial/psb_s_mat_mod.o: serial/psb_s_base_mat_mod.o serial/psb_s_csr_mat_mod.o serial/psb_s_csc_mat_mod.o serial/psb_s_vect_mod.o +serial/psb_d_mat_mod.o: serial/psb_d_base_mat_mod.o serial/psb_d_csr_mat_mod.o serial/psb_d_csc_mat_mod.o serial/psb_d_vect_mod.o serial/psb_i_vect_mod.o +serial/psb_c_mat_mod.o: serial/psb_c_base_mat_mod.o serial/psb_c_csr_mat_mod.o serial/psb_c_csc_mat_mod.o serial/psb_c_vect_mod.o +serial/psb_z_mat_mod.o: serial/psb_z_base_mat_mod.o serial/psb_z_csr_mat_mod.o serial/psb_z_csc_mat_mod.o serial/psb_z_vect_mod.o +serial/psb_s_csc_mat_mod.o serial/psb_s_csr_mat_mod.o: serial/psb_s_base_mat_mod.o +serial/psb_d_csc_mat_mod.o serial/psb_d_csr_mat_mod.o: serial/psb_d_base_mat_mod.o +serial/psb_c_csc_mat_mod.o serial/psb_c_csr_mat_mod.o: serial/psb_c_base_mat_mod.o +serial/psb_z_csc_mat_mod.o serial/psb_z_csr_mat_mod.o: serial/psb_z_base_mat_mod.o +serial/psb_mat_mod.o: serial/psb_vect_mod.o serial/psb_s_mat_mod.o serial/psb_d_mat_mod.o serial/psb_c_mat_mod.o serial/psb_z_mat_mod.o error.o psb_realloc_mod.o: psb_error_mod.o psb_error_impl.o: psb_penv_mod.o -psb_spmat_type.o: psb_string_mod.o psb_sort_mod.o -psi_i_mod.o: psb_desc_mod.o psb_i_vect_mod.o -psi_s_mod.o: psb_desc_mod.o psb_s_vect_mod.o -psi_d_mod.o: psb_desc_mod.o psb_d_vect_mod.o -psi_c_mod.o: psb_desc_mod.o psb_c_vect_mod.o -psi_z_mod.o: psb_desc_mod.o psb_z_vect_mod.o -psi_mod.o: psb_penv_mod.o psb_desc_mod.o psi_serial_mod.o psb_serial_mod.o\ +psb_spmat_type.o: aux/psb_string_mod.o aux/psb_sort_mod.o +psi_i_mod.o: desc/psb_desc_mod.o serial/psb_i_vect_mod.o +psi_s_mod.o: desc/psb_desc_mod.o serial/psb_s_vect_mod.o +psi_d_mod.o: desc/psb_desc_mod.o serial/psb_d_vect_mod.o +psi_c_mod.o: desc/psb_desc_mod.o serial/psb_c_vect_mod.o +psi_z_mod.o: desc/psb_desc_mod.o serial/psb_z_vect_mod.o +psi_mod.o: psb_penv_mod.o desc/psb_desc_mod.o aux/psi_serial_mod.o serial/psb_serial_mod.o\ psi_i_mod.o psi_s_mod.o psi_d_mod.o psi_c_mod.o psi_z_mod.o -psb_desc_mod.o: psb_penv_mod.o psb_realloc_mod.o\ - psb_hash_mod.o psb_hash_map_mod.o psb_list_map_mod.o \ - psb_repl_map_mod.o psb_gen_block_map_mod.o psb_desc_const_mod.o\ - psb_indx_map_mod.o psb_i_vect_mod.o -psb_indx_map_mod.o: psb_desc_const_mod.o psb_error_mod.o psb_penv_mod.o -psb_hash_map_mod.o psb_list_map_mod.o psb_repl_map_mod.o psb_gen_block_map_mod.o:\ - psb_indx_map_mod.o psb_desc_const_mod.o \ - psb_sort_mod.o psb_penv_mod.o -psb_glist_map_mod.o: psb_list_map_mod.o -psb_hash_map_mod.o: psb_hash_mod.o psb_sort_mod.o -psb_hash_mod.o: psb_realloc_mod.o psb_const_mod.o -psb_gen_block_map_mod.o: psb_hash_mod.o -psb_linmap_mod.o: psb_s_linmap_mod.o psb_d_linmap_mod.o psb_c_linmap_mod.o psb_z_linmap_mod.o -psb_s_linmap_mod.o: psb_base_linmap_mod.o psb_s_mat_mod.o psb_s_vect_mod.o -psb_d_linmap_mod.o: psb_base_linmap_mod.o psb_d_mat_mod.o psb_d_vect_mod.o -psb_c_linmap_mod.o: psb_base_linmap_mod.o psb_c_mat_mod.o psb_c_vect_mod.o -psb_z_linmap_mod.o: psb_base_linmap_mod.o psb_z_mat_mod.o psb_z_vect_mod.o -psb_base_linmap_mod.o: psb_desc_mod.o psb_serial_mod.o psb_comm_mod.o -psb_comm_mod.o: psb_desc_mod.o psb_mat_mod.o -psb_check_mod.o: psb_desc_mod.o -psb_s_serial_mod.o psb_d_serial_mod.o psb_c_serial_mod.o psb_z_serial_mod.o: psb_mat_mod.o psb_string_mod.o psb_sort_mod.o psi_serial_mod.o -psb_serial_mod.o: psb_s_serial_mod.o psb_d_serial_mod.o psb_c_serial_mod.o psb_z_serial_mod.o -psb_i_vect_mod.o: psb_i_base_vect_mod.o -psb_s_vect_mod.o: psb_s_base_vect_mod.o psb_i_vect_mod.o -psb_d_vect_mod.o: psb_d_base_vect_mod.o psb_i_vect_mod.o -psb_c_vect_mod.o: psb_c_base_vect_mod.o psb_i_vect_mod.o -psb_z_vect_mod.o: psb_z_base_vect_mod.o psb_i_vect_mod.o -psb_tools_mod.o: psb_cd_tools_mod.o psb_s_tools_mod.o psb_d_tools_mod.o\ - psb_i_tools_mod.o psb_c_tools_mod.o psb_z_tools_mod.o -psb_cd_tools_mod.o psb_i_tools_mod.o psb_s_tools_mod.o psb_d_tools_mod.o psb_c_tools_mod.o psb_z_tools_mod.o: psb_desc_mod.o psi_mod.o psb_mat_mod.o -psb_i_tools_mod.o: psb_i_vect_mod.o -psb_s_tools_mod.o: psb_s_vect_mod.o -psb_d_tools_mod.o: psb_d_vect_mod.o -psb_c_tools_mod.o: psb_c_vect_mod.o -psb_z_tools_mod.o: psb_z_vect_mod.o - -psb_s_psblas_mod.o: psb_s_vect_mod.o psb_s_mat_mod.o -psb_d_psblas_mod.o: psb_d_vect_mod.o psb_d_mat_mod.o -psb_c_psblas_mod.o: psb_c_vect_mod.o psb_c_mat_mod.o -psb_z_psblas_mod.o: psb_z_vect_mod.o psb_z_mat_mod.o -psb_psblas_mod.o: psb_s_psblas_mod.o psb_c_psblas_mod.o psb_d_psblas_mod.o psb_z_psblas_mod.o -psb_s_psblas_mod.o psb_c_psblas_mod.o psb_d_psblas_mod.o psb_z_psblas_mod.o: psb_mat_mod.o psb_desc_mod.o -psb_vect_mod.o: psb_i_vect_mod.o psb_d_vect_mod.o psb_s_vect_mod.o psb_c_vect_mod.o psb_z_vect_mod.o -psb_comm_mod.o: psb_i_comm_mod.o psb_s_comm_mod.o psb_d_comm_mod.o psb_c_comm_mod.o psb_z_comm_mod.o -psb_i_comm_mod.o: psb_i_vect_mod.o psb_desc_mod.o -psb_s_comm_mod.o: psb_s_vect_mod.o psb_desc_mod.o psb_mat_mod.o -psb_d_comm_mod.o: psb_d_vect_mod.o psb_desc_mod.o psb_mat_mod.o -psb_c_comm_mod.o: psb_c_vect_mod.o psb_desc_mod.o psb_mat_mod.o -psb_z_comm_mod.o: psb_z_vect_mod.o psb_desc_mod.o psb_mat_mod.o -psb_sort_mod.o: psb_i_sort_mod.o psb_s_sort_mod.o psb_d_sort_mod.o \ - psb_c_sort_mod.o psb_z_sort_mod.o psb_ip_reord_mod.o psi_serial_mod.o -psi_serial_mod.o: psi_i_serial_mod.o \ - psi_s_serial_mod.o psi_d_serial_mod.o psi_c_serial_mod.o psi_z_serial_mod.o - -psi_i_serial_mod.o psi_s_serial_mod.o psi_d_serial_mod.o psi_c_serial_mod.o psi_z_serial_mod.o: psb_const_mod.o +desc/psb_desc_mod.o: psb_penv_mod.o psb_realloc_mod.o\ + aux/psb_hash_mod.o desc/psb_hash_map_mod.o desc/psb_list_map_mod.o \ + desc/psb_repl_map_mod.o desc/psb_gen_block_map_mod.o desc/psb_desc_const_mod.o\ + desc/psb_indx_map_mod.o serial/psb_i_vect_mod.o +desc/psb_indx_map_mod.o: desc/psb_desc_const_mod.o psb_error_mod.o psb_penv_mod.o +desc/psb_hash_map_mod.o desc/psb_list_map_mod.o desc/psb_repl_map_mod.o desc/psb_gen_block_map_mod.o:\ + desc/psb_indx_map_mod.o desc/psb_desc_const_mod.o \ + aux/psb_sort_mod.o psb_penv_mod.o +desc/psb_glist_map_mod.o: desc/psb_list_map_mod.o +desc/psb_hash_map_mod.o: aux/psb_hash_mod.o aux/psb_sort_mod.o +aux/psb_hash_mod.o: psb_realloc_mod.o psb_const_mod.o +desc/psb_gen_block_map_mod.o: aux/psb_hash_mod.o +comm/psb_linmap_mod.o: comm/psb_s_linmap_mod.o comm/psb_d_linmap_mod.o comm/psb_c_linmap_mod.o comm/psb_z_linmap_mod.o +comm/psb_s_linmap_mod.o: comm/psb_base_linmap_mod.o serial/psb_s_mat_mod.o serial/psb_s_vect_mod.o +comm/psb_d_linmap_mod.o: comm/psb_base_linmap_mod.o serial/psb_d_mat_mod.o serial/psb_d_vect_mod.o +comm/psb_c_linmap_mod.o: comm/psb_base_linmap_mod.o serial/psb_c_mat_mod.o serial/psb_c_vect_mod.o +comm/psb_z_linmap_mod.o: comm/psb_base_linmap_mod.o serial/psb_z_mat_mod.o serial/psb_z_vect_mod.o +comm/psb_base_linmap_mod.o: desc/psb_desc_mod.o serial/psb_serial_mod.o comm/psb_comm_mod.o +comm/psb_comm_mod.o: desc/psb_desc_mod.o serial/psb_mat_mod.o +psb_check_mod.o: desc/psb_desc_mod.o +serial/psb_s_serial_mod.o serial/psb_d_serial_mod.o serial/psb_c_serial_mod.o serial/psb_z_serial_mod.o: serial/psb_mat_mod.o aux/psb_string_mod.o aux/psb_sort_mod.o aux/psi_serial_mod.o +serial/psb_serial_mod.o: serial/psb_s_serial_mod.o serial/psb_d_serial_mod.o serial/psb_c_serial_mod.o serial/psb_z_serial_mod.o +serial/psb_i_vect_mod.o: serial/psb_i_base_vect_mod.o +serial/psb_s_vect_mod.o: serial/psb_s_base_vect_mod.o serial/psb_i_vect_mod.o +serial/psb_d_vect_mod.o: serial/psb_d_base_vect_mod.o serial/psb_i_vect_mod.o +serial/psb_c_vect_mod.o: serial/psb_c_base_vect_mod.o serial/psb_i_vect_mod.o +serial/psb_z_vect_mod.o: serial/psb_z_base_vect_mod.o serial/psb_i_vect_mod.o +tools/psb_tools_mod.o: tools/psb_cd_tools_mod.o tools/psb_s_tools_mod.o tools/psb_d_tools_mod.o\ + tools/psb_i_tools_mod.o tools/psb_c_tools_mod.o tools/psb_z_tools_mod.o +tools/psb_cd_tools_mod.o tools/psb_i_tools_mod.o tools/psb_s_tools_mod.o tools/psb_d_tools_mod.o tools/psb_c_tools_mod.o tools/psb_z_tools_mod.o: desc/psb_desc_mod.o psi_mod.o serial/psb_mat_mod.o +tools/psb_i_tools_mod.o: serial/psb_i_vect_mod.o +tools/psb_s_tools_mod.o: serial/psb_s_vect_mod.o +tools/psb_d_tools_mod.o: serial/psb_d_vect_mod.o +tools/psb_c_tools_mod.o: serial/psb_c_vect_mod.o +tools/psb_z_tools_mod.o: serial/psb_z_vect_mod.o + +psblas/psb_s_psblas_mod.o: serial/psb_s_vect_mod.o serial/psb_s_mat_mod.o +psblas/psb_d_psblas_mod.o: serial/psb_d_vect_mod.o serial/psb_d_mat_mod.o +psblas/psb_c_psblas_mod.o: serial/psb_c_vect_mod.o serial/psb_c_mat_mod.o +psblas/psb_z_psblas_mod.o: serial/psb_z_vect_mod.o serial/psb_z_mat_mod.o +psblas/psb_psblas_mod.o: psblas/psb_s_psblas_mod.o psblas/psb_c_psblas_mod.o psblas/psb_d_psblas_mod.o psblas/psb_z_psblas_mod.o +psblas/psb_s_psblas_mod.o psblas/psb_c_psblas_mod.o psblas/psb_d_psblas_mod.o psblas/psb_z_psblas_mod.o: serial/psb_mat_mod.o desc/psb_desc_mod.o +serial/psb_vect_mod.o: serial/psb_i_vect_mod.o serial/psb_d_vect_mod.o serial/psb_s_vect_mod.o serial/psb_c_vect_mod.o serial/psb_z_vect_mod.o +comm/psb_comm_mod.o: comm/psb_i_comm_mod.o comm/psb_s_comm_mod.o comm/psb_d_comm_mod.o comm/psb_c_comm_mod.o comm/psb_z_comm_mod.o +comm/psb_i_comm_mod.o: serial/psb_i_vect_mod.o desc/psb_desc_mod.o +comm/psb_s_comm_mod.o: serial/psb_s_vect_mod.o desc/psb_desc_mod.o serial/psb_mat_mod.o +comm/psb_d_comm_mod.o: serial/psb_d_vect_mod.o desc/psb_desc_mod.o serial/psb_mat_mod.o +comm/psb_c_comm_mod.o: serial/psb_c_vect_mod.o desc/psb_desc_mod.o serial/psb_mat_mod.o +comm/psb_z_comm_mod.o: serial/psb_z_vect_mod.o desc/psb_desc_mod.o serial/psb_mat_mod.o +aux/psb_sort_mod.o: aux/psb_i_sort_mod.o aux/psb_s_sort_mod.o aux/psb_d_sort_mod.o \ + aux/psb_c_sort_mod.o aux/psb_z_sort_mod.o aux/psb_ip_reord_mod.o aux/psi_serial_mod.o +aux/psi_serial_mod.o: aux/psi_i_serial_mod.o \ + aux/psi_s_serial_mod.o aux/psi_d_serial_mod.o aux/psi_c_serial_mod.o aux/psi_z_serial_mod.o + +aux/psi_i_serial_mod.o aux/psi_s_serial_mod.o aux/psi_d_serial_mod.o aux/psi_c_serial_mod.o aux/psi_z_serial_mod.o: psb_const_mod.o psb_base_mod.o: $(MODULES) psi_penv_mod.o: psi_penv_mod.F90 $(BASIC_MODS) - $(F90) -c psi_penv_mod.F90 $(FINCLUDES) $(FDEFINES) $(F90COPT) $(EXTRA_OPT) + $(F90) $(FINCLUDES) $(FDEFINES) $(F90COPT) $(EXTRA_OPT) -c $< -o $@ psb_penv_mod.o: psb_penv_mod.F90 $(COMMINT) $(BASIC_MODS) - $(F90) -c psb_penv_mod.F90 $(FINCLUDES) $(FDEFINES) $(F90COPT) $(EXTRA_OPT) + $(F90) $(FINCLUDES) $(FDEFINES) $(F90COPT) $(EXTRA_OPT) -c $< -o $@ psi_comm_buffers_mod.o: psi_comm_buffers_mod.F90 $(BASIC_MODS) - $(F90) -c psi_comm_buffers_mod.F90 $(FINCLUDES) $(FDEFINES) $(F90COPT) $(EXTRA_OPT) + $(F90) $(FINCLUDES) $(FDEFINES) $(F90COPT) $(EXTRA_OPT) -c $< -o $@ psi_p2p_mod.o: psi_p2p_mod.F90 $(BASIC_MODS) - $(F90) -c psi_p2p_mod.F90 $(FINCLUDES) $(FDEFINES) $(F90COPT) $(EXTRA_OPT) + $(F90) $(FINCLUDES) $(FDEFINES) $(F90COPT) $(EXTRA_OPT) -c $< -o $@ psi_bcast_mod.o: psi_bcast_mod.F90 $(BASIC_MODS) - $(F90) -c psi_bcast_mod.F90 $(FINCLUDES) $(FDEFINES) $(F90COPT) $(EXTRA_OPT) + $(F90) $(FINCLUDES) $(FDEFINES) $(F90COPT) $(EXTRA_OPT) -c $< -o $@ psi_reduce_mod.o: psi_reduce_mod.F90 $(BASIC_MODS) - $(F90) -c psi_reduce_mod.F90 $(FINCLUDES) $(FDEFINES) $(F90COPT) $(EXTRA_OPT) - - + $(F90) $(FINCLUDES) $(FDEFINES) $(F90COPT) $(EXTRA_OPT) -c $< -o $@ clean: /bin/rm -f $(MODULES) $(OBJS) $(MPFOBJS) *$(.mod) diff --git a/base/modules/psb_c_sort_mod.f90 b/base/modules/aux/psb_c_sort_mod.f90 similarity index 100% rename from base/modules/psb_c_sort_mod.f90 rename to base/modules/aux/psb_c_sort_mod.f90 diff --git a/base/modules/psb_d_sort_mod.f90 b/base/modules/aux/psb_d_sort_mod.f90 similarity index 100% rename from base/modules/psb_d_sort_mod.f90 rename to base/modules/aux/psb_d_sort_mod.f90 diff --git a/base/modules/psb_hash_mod.f90 b/base/modules/aux/psb_hash_mod.f90 similarity index 100% rename from base/modules/psb_hash_mod.f90 rename to base/modules/aux/psb_hash_mod.f90 diff --git a/base/modules/psb_i_sort_mod.f90 b/base/modules/aux/psb_i_sort_mod.f90 similarity index 100% rename from base/modules/psb_i_sort_mod.f90 rename to base/modules/aux/psb_i_sort_mod.f90 diff --git a/base/modules/psb_ip_reord_mod.f90 b/base/modules/aux/psb_ip_reord_mod.f90 similarity index 100% rename from base/modules/psb_ip_reord_mod.f90 rename to base/modules/aux/psb_ip_reord_mod.f90 diff --git a/base/modules/psb_s_sort_mod.f90 b/base/modules/aux/psb_s_sort_mod.f90 similarity index 100% rename from base/modules/psb_s_sort_mod.f90 rename to base/modules/aux/psb_s_sort_mod.f90 diff --git a/base/modules/psb_sort_mod.f90 b/base/modules/aux/psb_sort_mod.f90 similarity index 100% rename from base/modules/psb_sort_mod.f90 rename to base/modules/aux/psb_sort_mod.f90 diff --git a/base/modules/psb_string_mod.f90 b/base/modules/aux/psb_string_mod.f90 similarity index 100% rename from base/modules/psb_string_mod.f90 rename to base/modules/aux/psb_string_mod.f90 diff --git a/base/modules/psb_z_sort_mod.f90 b/base/modules/aux/psb_z_sort_mod.f90 similarity index 100% rename from base/modules/psb_z_sort_mod.f90 rename to base/modules/aux/psb_z_sort_mod.f90 diff --git a/base/modules/psi_c_serial_mod.f90 b/base/modules/aux/psi_c_serial_mod.f90 similarity index 100% rename from base/modules/psi_c_serial_mod.f90 rename to base/modules/aux/psi_c_serial_mod.f90 diff --git a/base/modules/psi_d_serial_mod.f90 b/base/modules/aux/psi_d_serial_mod.f90 similarity index 100% rename from base/modules/psi_d_serial_mod.f90 rename to base/modules/aux/psi_d_serial_mod.f90 diff --git a/base/modules/psi_i_serial_mod.f90 b/base/modules/aux/psi_i_serial_mod.f90 similarity index 100% rename from base/modules/psi_i_serial_mod.f90 rename to base/modules/aux/psi_i_serial_mod.f90 diff --git a/base/modules/psi_s_serial_mod.f90 b/base/modules/aux/psi_s_serial_mod.f90 similarity index 100% rename from base/modules/psi_s_serial_mod.f90 rename to base/modules/aux/psi_s_serial_mod.f90 diff --git a/base/modules/psi_serial_mod.f90 b/base/modules/aux/psi_serial_mod.f90 similarity index 100% rename from base/modules/psi_serial_mod.f90 rename to base/modules/aux/psi_serial_mod.f90 diff --git a/base/modules/psi_z_serial_mod.f90 b/base/modules/aux/psi_z_serial_mod.f90 similarity index 100% rename from base/modules/psi_z_serial_mod.f90 rename to base/modules/aux/psi_z_serial_mod.f90 diff --git a/base/modules/psb_base_linmap_mod.f90 b/base/modules/comm/psb_base_linmap_mod.f90 similarity index 100% rename from base/modules/psb_base_linmap_mod.f90 rename to base/modules/comm/psb_base_linmap_mod.f90 diff --git a/base/modules/psb_c_comm_mod.f90 b/base/modules/comm/psb_c_comm_mod.f90 similarity index 100% rename from base/modules/psb_c_comm_mod.f90 rename to base/modules/comm/psb_c_comm_mod.f90 diff --git a/base/modules/psb_c_linmap_mod.f90 b/base/modules/comm/psb_c_linmap_mod.f90 similarity index 100% rename from base/modules/psb_c_linmap_mod.f90 rename to base/modules/comm/psb_c_linmap_mod.f90 diff --git a/base/modules/psb_comm_mod.f90 b/base/modules/comm/psb_comm_mod.f90 similarity index 100% rename from base/modules/psb_comm_mod.f90 rename to base/modules/comm/psb_comm_mod.f90 diff --git a/base/modules/psb_d_comm_mod.f90 b/base/modules/comm/psb_d_comm_mod.f90 similarity index 100% rename from base/modules/psb_d_comm_mod.f90 rename to base/modules/comm/psb_d_comm_mod.f90 diff --git a/base/modules/psb_d_linmap_mod.f90 b/base/modules/comm/psb_d_linmap_mod.f90 similarity index 100% rename from base/modules/psb_d_linmap_mod.f90 rename to base/modules/comm/psb_d_linmap_mod.f90 diff --git a/base/modules/psb_i_comm_mod.f90 b/base/modules/comm/psb_i_comm_mod.f90 similarity index 100% rename from base/modules/psb_i_comm_mod.f90 rename to base/modules/comm/psb_i_comm_mod.f90 diff --git a/base/modules/psb_linmap_mod.f90 b/base/modules/comm/psb_linmap_mod.f90 similarity index 100% rename from base/modules/psb_linmap_mod.f90 rename to base/modules/comm/psb_linmap_mod.f90 diff --git a/base/modules/psb_s_comm_mod.f90 b/base/modules/comm/psb_s_comm_mod.f90 similarity index 100% rename from base/modules/psb_s_comm_mod.f90 rename to base/modules/comm/psb_s_comm_mod.f90 diff --git a/base/modules/psb_s_linmap_mod.f90 b/base/modules/comm/psb_s_linmap_mod.f90 similarity index 100% rename from base/modules/psb_s_linmap_mod.f90 rename to base/modules/comm/psb_s_linmap_mod.f90 diff --git a/base/modules/psb_z_comm_mod.f90 b/base/modules/comm/psb_z_comm_mod.f90 similarity index 100% rename from base/modules/psb_z_comm_mod.f90 rename to base/modules/comm/psb_z_comm_mod.f90 diff --git a/base/modules/psb_z_linmap_mod.f90 b/base/modules/comm/psb_z_linmap_mod.f90 similarity index 100% rename from base/modules/psb_z_linmap_mod.f90 rename to base/modules/comm/psb_z_linmap_mod.f90 diff --git a/base/modules/psb_desc_const_mod.f90 b/base/modules/desc/psb_desc_const_mod.f90 similarity index 100% rename from base/modules/psb_desc_const_mod.f90 rename to base/modules/desc/psb_desc_const_mod.f90 diff --git a/base/modules/psb_desc_mod.F90 b/base/modules/desc/psb_desc_mod.F90 similarity index 100% rename from base/modules/psb_desc_mod.F90 rename to base/modules/desc/psb_desc_mod.F90 diff --git a/base/modules/psb_gen_block_map_mod.f90 b/base/modules/desc/psb_gen_block_map_mod.f90 similarity index 100% rename from base/modules/psb_gen_block_map_mod.f90 rename to base/modules/desc/psb_gen_block_map_mod.f90 diff --git a/base/modules/psb_glist_map_mod.f90 b/base/modules/desc/psb_glist_map_mod.f90 similarity index 100% rename from base/modules/psb_glist_map_mod.f90 rename to base/modules/desc/psb_glist_map_mod.f90 diff --git a/base/modules/psb_hash_map_mod.f90 b/base/modules/desc/psb_hash_map_mod.f90 similarity index 100% rename from base/modules/psb_hash_map_mod.f90 rename to base/modules/desc/psb_hash_map_mod.f90 diff --git a/base/modules/psb_indx_map_mod.f90 b/base/modules/desc/psb_indx_map_mod.f90 similarity index 100% rename from base/modules/psb_indx_map_mod.f90 rename to base/modules/desc/psb_indx_map_mod.f90 diff --git a/base/modules/psb_list_map_mod.f90 b/base/modules/desc/psb_list_map_mod.f90 similarity index 100% rename from base/modules/psb_list_map_mod.f90 rename to base/modules/desc/psb_list_map_mod.f90 diff --git a/base/modules/psb_repl_map_mod.f90 b/base/modules/desc/psb_repl_map_mod.f90 similarity index 100% rename from base/modules/psb_repl_map_mod.f90 rename to base/modules/desc/psb_repl_map_mod.f90 diff --git a/base/modules/psb_sort_mod_save.f90 b/base/modules/psb_sort_mod_save.f90 deleted file mode 100644 index edf7a85d7..000000000 --- a/base/modules/psb_sort_mod_save.f90 +++ /dev/null @@ -1,741 +0,0 @@ -!!$ -!!$ Parallel Sparse BLAS version 3.4 -!!$ (C) Copyright 2006, 2010, 2015 -!!$ Salvatore Filippone University of Rome Tor Vergata -!!$ Alfredo Buttari CNRS-IRIT, Toulouse -!!$ -!!$ Redistribution and use in source and binary forms, with or without -!!$ modification, are permitted provided that the following conditions -!!$ are met: -!!$ 1. Redistributions of source code must retain the above copyright -!!$ notice, this list of conditions and the following disclaimer. -!!$ 2. Redistributions in binary form must reproduce the above copyright -!!$ notice, this list of conditions, and the following disclaimer in the -!!$ documentation and/or other materials provided with the distribution. -!!$ 3. The name of the PSBLAS group or the names of its contributors may -!!$ not be used to endorse or promote products derived from this -!!$ software without specific written permission. -!!$ -!!$ THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS -!!$ ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED -!!$ TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR -!!$ PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE PSBLAS GROUP OR ITS CONTRIBUTORS -!!$ BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR -!!$ CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF -!!$ SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS -!!$ INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN -!!$ CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) -!!$ ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE -!!$ POSSIBILITY OF SUCH DAMAGE. -!!$ -!!$ -! -! The merge-sort and quicksort routines are implemented in the -! serial/aux directory -! References: -! D. Knuth -! The Art of Computer Programming, vol. 3 -! Addison-Wesley -! -! Aho, Hopcroft, Ullman -! Data Structures and Algorithms -! Addison-Wesley -! -module psb_sort_mod - use psb_const_mod - - - type psb_int_heap - integer(psb_ipk_) :: last, dir - integer(psb_ipk_), allocatable :: keys(:) - end type psb_int_heap - type psb_int_idx_heap - integer(psb_ipk_) :: last, dir - integer(psb_ipk_), allocatable :: keys(:) - integer(psb_ipk_), allocatable :: idxs(:) - end type psb_int_idx_heap - type psb_sreal_idx_heap - integer(psb_ipk_) :: last, dir - real(psb_spk_), allocatable :: keys(:) - integer(psb_ipk_), allocatable :: idxs(:) - end type psb_sreal_idx_heap - type psb_dreal_idx_heap - integer(psb_ipk_) :: last, dir - real(psb_dpk_), allocatable :: keys(:) - integer(psb_ipk_), allocatable :: idxs(:) - end type psb_dreal_idx_heap - type psb_scomplex_idx_heap - integer(psb_ipk_) :: last, dir - complex(psb_spk_), allocatable :: keys(:) - integer(psb_ipk_), allocatable :: idxs(:) - end type psb_scomplex_idx_heap - type psb_dcomplex_idx_heap - integer(psb_ipk_) :: last, dir - complex(psb_dpk_), allocatable :: keys(:) - integer(psb_ipk_), allocatable :: idxs(:) - end type psb_dcomplex_idx_heap - - - interface psb_iblsrch - function psb_iblsrch(key,n,v) result(ipos) - import :: psb_ipk_ - integer(psb_ipk_) :: ipos, key, n - integer(psb_ipk_) :: v(:) - end function psb_iblsrch - end interface - - interface psb_ibsrch - function psb_ibsrch(key,n,v) result(ipos) - import :: psb_ipk_ - integer(psb_ipk_) :: ipos, key, n - integer(psb_ipk_) :: v(:) - end function psb_ibsrch - end interface - - interface psb_issrch - function psb_issrch(key,n,v) result(ipos) - import :: psb_ipk_ - implicit none - integer(psb_ipk_) :: ipos, key, n - integer(psb_ipk_) :: v(:) - end function psb_issrch - end interface - - interface psb_isaperm - logical function psb_isaperm(n,eip) - import :: psb_ipk_ - integer(psb_ipk_), intent(in) :: n - integer(psb_ipk_), intent(in) :: eip(n) - end function psb_isaperm - end interface - - - interface psb_msort - subroutine imsort(x,ix,dir,flag) - import :: psb_ipk_ - integer(psb_ipk_), intent(inout) :: x(:) - integer(psb_ipk_), optional, intent(in) :: dir, flag - integer(psb_ipk_), optional, intent(inout) :: ix(:) - end subroutine imsort - subroutine smsort(x,ix,dir,flag) - import :: psb_ipk_, psb_spk_, psb_dpk_ - real(psb_spk_), intent(inout) :: x(:) - integer(psb_ipk_), optional, intent(in) :: dir, flag - integer(psb_ipk_), optional, intent(inout) :: ix(:) - end subroutine smsort - subroutine dmsort(x,ix,dir,flag) - import :: psb_ipk_, psb_spk_, psb_dpk_ - real(psb_dpk_), intent(inout) :: x(:) - integer(psb_ipk_), optional, intent(in) :: dir, flag - integer(psb_ipk_), optional, intent(inout) :: ix(:) - end subroutine dmsort - subroutine camsort(x,ix,dir,flag) - import :: psb_ipk_, psb_spk_, psb_dpk_ - complex(psb_spk_), intent(inout) :: x(:) - integer(psb_ipk_), optional, intent(in) :: dir, flag - integer(psb_ipk_), optional, intent(inout) :: ix(:) - end subroutine camsort - subroutine zamsort(x,ix,dir,flag) - import :: psb_ipk_, psb_spk_, psb_dpk_ - complex(psb_dpk_), intent(inout) :: x(:) - integer(psb_ipk_), optional, intent(in) :: dir, flag - integer(psb_ipk_), optional, intent(inout) :: ix(:) - end subroutine zamsort - end interface - - - interface psb_msort_unique - subroutine imsort_u(x,nout,dir) - import :: psb_ipk_, psb_spk_, psb_dpk_ - integer(psb_ipk_), intent(inout) :: x(:) - integer(psb_ipk_), intent(out) :: nout - integer(psb_ipk_), optional, intent(in) :: dir - end subroutine imsort_u - end interface - - interface psb_qsort - subroutine iqsort(x,ix,dir,flag) - import :: psb_ipk_, psb_spk_, psb_dpk_ - integer(psb_ipk_), intent(inout) :: x(:) - integer(psb_ipk_), optional, intent(in) :: dir, flag - integer(psb_ipk_), optional, intent(inout) :: ix(:) - end subroutine iqsort - subroutine sqsort(x,ix,dir,flag) - import :: psb_ipk_, psb_spk_, psb_dpk_ - real(psb_spk_), intent(inout) :: x(:) - integer(psb_ipk_), optional, intent(in) :: dir, flag - integer(psb_ipk_), optional, intent(inout) :: ix(:) - end subroutine sqsort - subroutine dqsort(x,ix,dir,flag) - import :: psb_ipk_, psb_spk_, psb_dpk_ - real(psb_dpk_), intent(inout) :: x(:) - integer(psb_ipk_), optional, intent(in) :: dir, flag - integer(psb_ipk_), optional, intent(inout) :: ix(:) - end subroutine dqsort - subroutine cqsort(x,ix,dir,flag) - import :: psb_ipk_, psb_spk_, psb_dpk_ - complex(psb_spk_), intent(inout) :: x(:) - integer(psb_ipk_), optional, intent(in) :: dir, flag - integer(psb_ipk_), optional, intent(inout) :: ix(:) - end subroutine cqsort - subroutine zqsort(x,ix,dir,flag) - import :: psb_ipk_, psb_spk_, psb_dpk_ - complex(psb_dpk_), intent(inout) :: x(:) - integer(psb_ipk_), optional, intent(in) :: dir, flag - integer(psb_ipk_), optional, intent(inout) :: ix(:) - end subroutine zqsort - end interface - - - interface psb_hsort - subroutine ihsort(x,ix,dir,flag) - import :: psb_ipk_, psb_spk_, psb_dpk_ - integer(psb_ipk_), intent(inout) :: x(:) - integer(psb_ipk_), optional, intent(in) :: dir, flag - integer(psb_ipk_), optional, intent(inout) :: ix(:) - end subroutine ihsort - subroutine shsort(x,ix,dir,flag) - import :: psb_ipk_, psb_spk_, psb_dpk_ - real(psb_spk_), intent(inout) :: x(:) - integer(psb_ipk_), optional, intent(in) :: dir, flag - integer(psb_ipk_), optional, intent(inout) :: ix(:) - end subroutine shsort - subroutine dhsort(x,ix,dir,flag) - import :: psb_ipk_, psb_spk_, psb_dpk_ - real(psb_dpk_), intent(inout) :: x(:) - integer(psb_ipk_), optional, intent(in) :: dir, flag - integer(psb_ipk_), optional, intent(inout) :: ix(:) - end subroutine dhsort - subroutine chsort(x,ix,dir,flag) - import :: psb_ipk_, psb_spk_, psb_dpk_ - complex(psb_spk_), intent(inout) :: x(:) - integer(psb_ipk_), optional, intent(in) :: dir, flag - integer(psb_ipk_), optional, intent(inout) :: ix(:) - end subroutine chsort - subroutine zhsort(x,ix,dir,flag) - import :: psb_ipk_, psb_spk_, psb_dpk_ - complex(psb_dpk_), intent(inout) :: x(:) - integer(psb_ipk_), optional, intent(in) :: dir, flag - integer(psb_ipk_), optional, intent(inout) :: ix(:) - end subroutine zhsort - end interface - - - interface psb_howmany_heap - function psb_howmany_int_heap(heap) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_int_heap - type(psb_int_heap), intent(in) :: heap - integer(psb_ipk_) :: psb_howmany_int_heap - end function psb_howmany_int_heap - function psb_howmany_sreal_idx_heap(heap) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_sreal_idx_heap - type(psb_sreal_idx_heap), intent(in) :: heap - integer(psb_ipk_) :: psb_howmany_sreal_idx_heap - end function psb_howmany_sreal_idx_heap - function psb_howmany_dreal_idx_heap(heap) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_dreal_idx_heap - type(psb_dreal_idx_heap), intent(in) :: heap - integer(psb_ipk_) :: psb_howmany_dreal_idx_heap - end function psb_howmany_dreal_idx_heap - function psb_howmany_int_idx_heap(heap) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_int_idx_heap - type(psb_int_idx_heap), intent(in) :: heap - integer(psb_ipk_) :: psb_howmany_int_idx_heap - end function psb_howmany_int_idx_heap - function psb_howmany_scomplex_idx_heap(heap) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_scomplex_idx_heap - type(psb_scomplex_idx_heap), intent(in) :: heap - integer(psb_ipk_) :: psb_howmany_scomplex_idx_heap - end function psb_howmany_scomplex_idx_heap - function psb_howmany_dcomplex_idx_heap(heap) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_dcomplex_idx_heap - type(psb_dcomplex_idx_heap), intent(in) :: heap - integer(psb_ipk_) :: psb_howmany_dcomplex_idx_heap - end function psb_howmany_dcomplex_idx_heap - end interface - - - interface psb_init_heap - subroutine psb_init_int_heap(heap,info,dir) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_int_heap - type(psb_int_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - integer(psb_ipk_), intent(in), optional :: dir - end subroutine psb_init_int_heap - subroutine psb_init_sreal_idx_heap(heap,info,dir) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_sreal_idx_heap - type(psb_sreal_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - integer(psb_ipk_), intent(in), optional :: dir - end subroutine psb_init_sreal_idx_heap - subroutine psb_init_int_idx_heap(heap,info,dir) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_int_idx_heap - type(psb_int_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - integer(psb_ipk_), intent(in), optional :: dir - end subroutine psb_init_int_idx_heap - subroutine psb_init_scomplex_idx_heap(heap,info,dir) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_scomplex_idx_heap - type(psb_scomplex_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - integer(psb_ipk_), intent(in), optional :: dir - end subroutine psb_init_scomplex_idx_heap - subroutine psb_init_dcomplex_idx_heap(heap,info,dir) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_dcomplex_idx_heap - type(psb_dcomplex_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - integer(psb_ipk_), intent(in), optional :: dir - end subroutine psb_init_dcomplex_idx_heap - subroutine psb_init_dreal_idx_heap(heap,info,dir) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_dreal_idx_heap - type(psb_dreal_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - integer(psb_ipk_), intent(in), optional :: dir - end subroutine psb_init_dreal_idx_heap - end interface - - - interface psb_dump_heap - subroutine psb_dump_int_heap(iout,heap,info) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_int_heap - type(psb_int_heap), intent(in) :: heap - integer(psb_ipk_), intent(out) :: info - integer(psb_ipk_), intent(in) :: iout - end subroutine psb_dump_int_heap - subroutine psb_dump_sreal_idx_heap(iout,heap,info) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_sreal_idx_heap - type(psb_sreal_idx_heap), intent(in) :: heap - integer(psb_ipk_), intent(out) :: info - integer(psb_ipk_), intent(in) :: iout - end subroutine psb_dump_sreal_idx_heap - subroutine psb_dump_dreal_idx_heap(iout,heap,info) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_dreal_idx_heap - type(psb_dreal_idx_heap), intent(in) :: heap - integer(psb_ipk_), intent(out) :: info - integer(psb_ipk_), intent(in) :: iout - end subroutine psb_dump_dreal_idx_heap - subroutine psb_dump_int_idx_heap(iout,heap,info) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_int_idx_heap - type(psb_int_idx_heap), intent(in) :: heap - integer(psb_ipk_), intent(out) :: info - integer(psb_ipk_), intent(in) :: iout - end subroutine psb_dump_int_idx_heap - subroutine psb_dump_scomplex_idx_heap(iout,heap,info) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_scomplex_idx_heap - type(psb_scomplex_idx_heap), intent(in) :: heap - integer(psb_ipk_), intent(out) :: info - integer(psb_ipk_), intent(in) :: iout - end subroutine psb_dump_scomplex_idx_heap - subroutine psb_dump_dcomplex_idx_heap(iout,heap,info) - import :: psb_ipk_, psb_spk_, psb_dpk_ - import :: psb_dcomplex_idx_heap - type(psb_dcomplex_idx_heap), intent(in) :: heap - integer(psb_ipk_), intent(out) :: info - integer(psb_ipk_), intent(in) :: iout - end subroutine psb_dump_dcomplex_idx_heap - end interface - - - interface psb_insert_heap - subroutine psb_insert_int_heap(key,heap,info) - import :: psb_int_heap, psb_ipk_ - integer(psb_ipk_), intent(in) :: key - type(psb_int_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - end subroutine psb_insert_int_heap - subroutine psb_insert_int_idx_heap(key,index,heap,info) - import :: psb_dpk_, psb_int_idx_heap, psb_ipk_ - integer(psb_ipk_), intent(in) :: key - integer(psb_ipk_), intent(in) :: index - type(psb_int_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - end subroutine psb_insert_int_idx_heap - subroutine psb_insert_sreal_idx_heap(key,index,heap,info) - import :: psb_spk_, psb_sreal_idx_heap, psb_ipk_ - real(psb_spk_), intent(in) :: key - integer(psb_ipk_), intent(in) :: index - type(psb_sreal_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - end subroutine psb_insert_sreal_idx_heap - subroutine psb_insert_dreal_idx_heap(key,index,heap,info) - import :: psb_dpk_, psb_dreal_idx_heap, psb_ipk_ - real(psb_dpk_), intent(in) :: key - integer(psb_ipk_), intent(in) :: index - type(psb_dreal_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - end subroutine psb_insert_dreal_idx_heap - subroutine psb_insert_scomplex_idx_heap(key,index,heap,info) - import :: psb_spk_, psb_scomplex_idx_heap, psb_ipk_ - complex(psb_spk_), intent(in) :: key - integer(psb_ipk_), intent(in) :: index - type(psb_scomplex_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - end subroutine psb_insert_scomplex_idx_heap - subroutine psb_insert_dcomplex_idx_heap(key,index,heap,info) - import :: psb_dpk_, psb_dcomplex_idx_heap, psb_ipk_ - complex(psb_dpk_), intent(in) :: key - integer(psb_ipk_), intent(in) :: index - type(psb_dcomplex_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - end subroutine psb_insert_dcomplex_idx_heap - end interface - - interface psb_heap_get_first - subroutine psb_int_heap_get_first(key,heap,info) - import :: psb_int_heap, psb_ipk_ - type(psb_int_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: key,info - end subroutine psb_int_heap_get_first - subroutine psb_int_idx_heap_get_first(key,index,heap,info) - import :: psb_int_idx_heap, psb_ipk_ - type(psb_int_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: index,info - integer(psb_ipk_), intent(out) :: key - end subroutine psb_int_idx_heap_get_first - subroutine psb_sreal_idx_heap_get_first(key,index,heap,info) - import :: psb_spk_, psb_sreal_idx_heap, psb_ipk_ - type(psb_sreal_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: index,info - real(psb_spk_), intent(out) :: key - end subroutine psb_sreal_idx_heap_get_first - subroutine psb_dreal_idx_heap_get_first(key,index,heap,info) - import :: psb_dpk_, psb_dreal_idx_heap, psb_ipk_ - type(psb_dreal_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: index,info - real(psb_dpk_), intent(out) :: key - end subroutine psb_dreal_idx_heap_get_first - subroutine psb_scomplex_idx_heap_get_first(key,index,heap,info) - import :: psb_spk_, psb_scomplex_idx_heap, psb_ipk_ - type(psb_scomplex_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: index,info - complex(psb_spk_), intent(out) :: key - end subroutine psb_scomplex_idx_heap_get_first - - subroutine psb_dcomplex_idx_heap_get_first(key,index,heap,info) - import :: psb_dpk_, psb_dcomplex_idx_heap, psb_ipk_ - type(psb_dcomplex_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: index,info - complex(psb_dpk_), intent(out) :: key - end subroutine psb_dcomplex_idx_heap_get_first - end interface - - interface - subroutine psi_insert_int_heap(key,last,heap,dir,info) - import :: psb_ipk_ - implicit none - - ! - ! Input: - ! key: the new value - ! last: pointer to the last occupied element in heap - ! heap: the heap - ! dir: sorting direction - - integer(psb_ipk_), intent(in) :: key,dir - integer(psb_ipk_), intent(inout) :: heap(:),last - integer(psb_ipk_), intent(out) :: info - end subroutine psi_insert_int_heap - end interface - - interface - subroutine psi_int_heap_get_first(key,last,heap,dir,info) - import :: psb_ipk_ - implicit none - - integer(psb_ipk_), intent(inout) :: key,last - integer(psb_ipk_), intent(in) :: dir - integer(psb_ipk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(out) :: info - end subroutine psi_int_heap_get_first - end interface - - interface - subroutine psi_insert_real_heap(key,last,heap,dir,info) - import :: psb_spk_, psb_ipk_ - real(psb_spk_), intent(in) :: key - integer(psb_ipk_), intent(in) :: dir - real(psb_spk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(inout) :: last - integer(psb_ipk_), intent(out) :: info - end subroutine psi_insert_real_heap - end interface - - interface - subroutine psi_real_heap_get_first(key,last,heap,dir,info) - import :: psb_spk_, psb_ipk_ - real(psb_spk_), intent(inout) :: key - integer(psb_ipk_), intent(inout) :: last - integer(psb_ipk_), intent(in) :: dir - real(psb_spk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(out) :: info - end subroutine psi_real_heap_get_first - end interface - - interface - subroutine psi_insert_double_heap(key,last,heap,dir,info) - import :: psb_dpk_, psb_ipk_ - real(psb_dpk_), intent(in) :: key - integer(psb_ipk_), intent(in) :: dir - real(psb_dpk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(inout) :: last - integer(psb_ipk_), intent(out) :: info - end subroutine psi_insert_double_heap - end interface - - interface - subroutine psi_double_heap_get_first(key,last,heap,dir,info) - import :: psb_dpk_, psb_ipk_ - real(psb_dpk_), intent(inout) :: key - integer(psb_ipk_), intent(inout) :: last - integer(psb_ipk_), intent(in) :: dir - real(psb_dpk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(out) :: info - end subroutine psi_double_heap_get_first - end interface - - interface - subroutine psi_insert_scomplex_heap(key,last,heap,dir,info) - import :: psb_spk_, psb_ipk_ - complex(psb_spk_), intent(in) :: key - integer(psb_ipk_), intent(in) :: dir - complex(psb_spk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(inout) :: last - integer(psb_ipk_), intent(out) :: info - end subroutine psi_insert_scomplex_heap - end interface - - interface - subroutine psi_scomplex_heap_get_first(key,last,heap,dir,info) - import :: psb_spk_, psb_ipk_ - complex(psb_spk_), intent(inout) :: key - integer(psb_ipk_), intent(inout) :: last - integer(psb_ipk_), intent(in) :: dir - complex(psb_spk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(out) :: info - end subroutine psi_scomplex_heap_get_first - end interface - - interface - subroutine psi_insert_dcomplex_heap(key,last,heap,dir,info) - import :: psb_dpk_, psb_ipk_ - complex(psb_dpk_), intent(in) :: key - integer(psb_ipk_), intent(in) :: dir - complex(psb_dpk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(inout) :: last - integer(psb_ipk_), intent(out) :: info - end subroutine psi_insert_dcomplex_heap - end interface - - interface - subroutine psi_dcomplex_heap_get_first(key,last,heap,dir,info) - import :: psb_dpk_, psb_ipk_ - complex(psb_dpk_), intent(inout) :: key - integer(psb_ipk_), intent(inout) :: last - integer(psb_ipk_), intent(in) :: dir - complex(psb_dpk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(out) :: info - end subroutine psi_dcomplex_heap_get_first - end interface - - interface - subroutine psi_insert_int_idx_heap(key,index,last,heap,idxs,dir,info) - import :: psb_ipk_ - integer(psb_ipk_), intent(in) :: key - integer(psb_ipk_), intent(in) :: index,dir - integer(psb_ipk_), intent(inout) :: heap(:),last - integer(psb_ipk_), intent(inout) :: idxs(:) - integer(psb_ipk_), intent(out) :: info - end subroutine psi_insert_int_idx_heap - end interface - - interface - subroutine psi_int_idx_heap_get_first(key,index,last,heap,idxs,dir,info) - import :: psb_ipk_ - integer(psb_ipk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(out) :: index,info - integer(psb_ipk_), intent(inout) :: last,idxs(:) - integer(psb_ipk_), intent(in) :: dir - integer(psb_ipk_), intent(out) :: key - end subroutine psi_int_idx_heap_get_first - end interface - - interface - subroutine psi_insert_sreal_idx_heap(key,index,last,heap,idxs,dir,info) - import :: psb_spk_, psb_ipk_ - real(psb_spk_), intent(in) :: key - integer(psb_ipk_), intent(in) :: index,dir - real(psb_spk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(inout) :: idxs(:),last - integer(psb_ipk_), intent(out) :: info - end subroutine psi_insert_sreal_idx_heap - end interface - - interface - subroutine psi_sreal_idx_heap_get_first(key,index,last,heap,idxs,dir,info) - import :: psb_spk_, psb_ipk_ - real(psb_spk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(out) :: index,info - integer(psb_ipk_), intent(inout) :: last,idxs(:) - integer(psb_ipk_), intent(in) :: dir - real(psb_spk_), intent(out) :: key - end subroutine psi_sreal_idx_heap_get_first - end interface - - interface - subroutine psi_insert_dreal_idx_heap(key,index,last,heap,idxs,dir,info) - import :: psb_dpk_, psb_ipk_ - real(psb_dpk_), intent(in) :: key - integer(psb_ipk_), intent(in) :: index,dir - real(psb_dpk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(inout) :: idxs(:),last - integer(psb_ipk_), intent(out) :: info - end subroutine psi_insert_dreal_idx_heap - end interface - - interface - subroutine psi_dreal_idx_heap_get_first(key,index,last,heap,idxs,dir,info) - import :: psb_dpk_, psb_ipk_ - real(psb_dpk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(out) :: index,info - integer(psb_ipk_), intent(inout) :: last,idxs(:) - integer(psb_ipk_), intent(in) :: dir - real(psb_dpk_), intent(out) :: key - end subroutine psi_dreal_idx_heap_get_first - end interface - - interface - subroutine psi_insert_scomplex_idx_heap(key,index,last,heap,idxs,dir,info) - import :: psb_spk_, psb_ipk_ - complex(psb_spk_), intent(in) :: key - integer(psb_ipk_), intent(in) :: index,dir - complex(psb_spk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(inout) :: idxs(:),last - integer(psb_ipk_), intent(out) :: info - end subroutine psi_insert_scomplex_idx_heap - end interface - - interface - subroutine psi_scomplex_idx_heap_get_first(key,index,last,heap,idxs,dir,info) - import :: psb_spk_, psb_ipk_ - complex(psb_spk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(out) :: index,info - integer(psb_ipk_), intent(inout) :: last,idxs(:) - integer(psb_ipk_), intent(in) :: dir - complex(psb_spk_), intent(out) :: key - end subroutine psi_scomplex_idx_heap_get_first - end interface - - interface - subroutine psi_insert_dcomplex_idx_heap(key,index,last,heap,idxs,dir,info) - import :: psb_dpk_, psb_ipk_ - complex(psb_dpk_), intent(in) :: key - integer(psb_ipk_), intent(in) :: index,dir - complex(psb_dpk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(inout) :: idxs(:),last - integer(psb_ipk_), intent(out) :: info - end subroutine psi_insert_dcomplex_idx_heap - end interface - - interface - subroutine psi_dcomplex_idx_heap_get_first(key,index,last,heap,idxs,dir,info) - import :: psb_dpk_, psb_ipk_ - complex(psb_dpk_), intent(inout) :: heap(:) - integer(psb_ipk_), intent(out) :: index,info - integer(psb_ipk_), intent(inout) :: last,idxs(:) - integer(psb_ipk_), intent(in) :: dir - complex(psb_dpk_), intent(out) :: key - end subroutine psi_dcomplex_idx_heap_get_first - end interface - - - interface psb_free_heap - module procedure psb_free_int_heap, psb_free_int_idx_heap,& - & psb_free_sreal_idx_heap, psb_free_scomplex_idx_heap, & - & psb_free_dreal_idx_heap, psb_free_dcomplex_idx_heap - end interface - -contains - - subroutine psb_free_int_heap(heap,info) - implicit none - type(psb_int_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - - info=psb_success_ - if (allocated(heap%keys)) deallocate(heap%keys,stat=info) - - end subroutine psb_free_int_heap - - subroutine psb_free_sreal_idx_heap(heap,info) - implicit none - type(psb_sreal_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - - info=psb_success_ - if (allocated(heap%keys)) deallocate(heap%keys,stat=info) - if ((info == psb_success_).and.(allocated(heap%idxs))) deallocate(heap%idxs,stat=info) - - end subroutine psb_free_sreal_idx_heap - - subroutine psb_free_dreal_idx_heap(heap,info) - implicit none - type(psb_dreal_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - - info=psb_success_ - if (allocated(heap%keys)) deallocate(heap%keys,stat=info) - if ((info == psb_success_).and.(allocated(heap%idxs))) deallocate(heap%idxs,stat=info) - - end subroutine psb_free_dreal_idx_heap - - subroutine psb_free_int_idx_heap(heap,info) - implicit none - type(psb_int_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - - info=psb_success_ - if (allocated(heap%keys)) deallocate(heap%keys,stat=info) - if ((info == psb_success_).and.(allocated(heap%idxs))) deallocate(heap%idxs,stat=info) - - end subroutine psb_free_int_idx_heap - - subroutine psb_free_scomplex_idx_heap(heap,info) - implicit none - type(psb_scomplex_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - - info=psb_success_ - if (allocated(heap%keys)) deallocate(heap%keys,stat=info) - if ((info == psb_success_).and.(allocated(heap%idxs))) deallocate(heap%idxs,stat=info) - - end subroutine psb_free_scomplex_idx_heap - - subroutine psb_free_dcomplex_idx_heap(heap,info) - implicit none - type(psb_dcomplex_idx_heap), intent(inout) :: heap - integer(psb_ipk_), intent(out) :: info - - info=psb_success_ - if (allocated(heap%keys)) deallocate(heap%keys,stat=info) - if ((info == psb_success_).and.(allocated(heap%idxs))) deallocate(heap%idxs,stat=info) - - end subroutine psb_free_dcomplex_idx_heap - -end module psb_sort_mod diff --git a/base/modules/psb_c_psblas_mod.F90 b/base/modules/psblas/psb_c_psblas_mod.F90 similarity index 100% rename from base/modules/psb_c_psblas_mod.F90 rename to base/modules/psblas/psb_c_psblas_mod.F90 diff --git a/base/modules/psb_d_psblas_mod.F90 b/base/modules/psblas/psb_d_psblas_mod.F90 similarity index 100% rename from base/modules/psb_d_psblas_mod.F90 rename to base/modules/psblas/psb_d_psblas_mod.F90 diff --git a/base/modules/psb_psblas_mod.f90 b/base/modules/psblas/psb_psblas_mod.f90 similarity index 100% rename from base/modules/psb_psblas_mod.f90 rename to base/modules/psblas/psb_psblas_mod.f90 diff --git a/base/modules/psb_s_psblas_mod.F90 b/base/modules/psblas/psb_s_psblas_mod.F90 similarity index 100% rename from base/modules/psb_s_psblas_mod.F90 rename to base/modules/psblas/psb_s_psblas_mod.F90 diff --git a/base/modules/psb_z_psblas_mod.F90 b/base/modules/psblas/psb_z_psblas_mod.F90 similarity index 100% rename from base/modules/psb_z_psblas_mod.F90 rename to base/modules/psblas/psb_z_psblas_mod.F90 diff --git a/base/modules/psb_base_mat_mod.f90 b/base/modules/serial/psb_base_mat_mod.f90 similarity index 100% rename from base/modules/psb_base_mat_mod.f90 rename to base/modules/serial/psb_base_mat_mod.f90 diff --git a/base/modules/psb_c_base_mat_mod.f90 b/base/modules/serial/psb_c_base_mat_mod.f90 similarity index 100% rename from base/modules/psb_c_base_mat_mod.f90 rename to base/modules/serial/psb_c_base_mat_mod.f90 diff --git a/base/modules/psb_c_base_vect_mod.f90 b/base/modules/serial/psb_c_base_vect_mod.f90 similarity index 100% rename from base/modules/psb_c_base_vect_mod.f90 rename to base/modules/serial/psb_c_base_vect_mod.f90 diff --git a/base/modules/psb_c_csc_mat_mod.f90 b/base/modules/serial/psb_c_csc_mat_mod.f90 similarity index 100% rename from base/modules/psb_c_csc_mat_mod.f90 rename to base/modules/serial/psb_c_csc_mat_mod.f90 diff --git a/base/modules/psb_c_csr_mat_mod.f90 b/base/modules/serial/psb_c_csr_mat_mod.f90 similarity index 100% rename from base/modules/psb_c_csr_mat_mod.f90 rename to base/modules/serial/psb_c_csr_mat_mod.f90 diff --git a/base/modules/psb_c_mat_mod.f90 b/base/modules/serial/psb_c_mat_mod.f90 similarity index 100% rename from base/modules/psb_c_mat_mod.f90 rename to base/modules/serial/psb_c_mat_mod.f90 diff --git a/base/modules/psb_c_serial_mod.f90 b/base/modules/serial/psb_c_serial_mod.f90 similarity index 100% rename from base/modules/psb_c_serial_mod.f90 rename to base/modules/serial/psb_c_serial_mod.f90 diff --git a/base/modules/psb_c_vect_mod.F90 b/base/modules/serial/psb_c_vect_mod.F90 similarity index 100% rename from base/modules/psb_c_vect_mod.F90 rename to base/modules/serial/psb_c_vect_mod.F90 diff --git a/base/modules/psb_d_base_mat_mod.f90 b/base/modules/serial/psb_d_base_mat_mod.f90 similarity index 100% rename from base/modules/psb_d_base_mat_mod.f90 rename to base/modules/serial/psb_d_base_mat_mod.f90 diff --git a/base/modules/psb_d_base_vect_mod.f90 b/base/modules/serial/psb_d_base_vect_mod.f90 similarity index 100% rename from base/modules/psb_d_base_vect_mod.f90 rename to base/modules/serial/psb_d_base_vect_mod.f90 diff --git a/base/modules/psb_d_csc_mat_mod.f90 b/base/modules/serial/psb_d_csc_mat_mod.f90 similarity index 100% rename from base/modules/psb_d_csc_mat_mod.f90 rename to base/modules/serial/psb_d_csc_mat_mod.f90 diff --git a/base/modules/psb_d_csr_mat_mod.f90 b/base/modules/serial/psb_d_csr_mat_mod.f90 similarity index 100% rename from base/modules/psb_d_csr_mat_mod.f90 rename to base/modules/serial/psb_d_csr_mat_mod.f90 diff --git a/base/modules/psb_d_mat_mod.f90 b/base/modules/serial/psb_d_mat_mod.f90 similarity index 100% rename from base/modules/psb_d_mat_mod.f90 rename to base/modules/serial/psb_d_mat_mod.f90 diff --git a/base/modules/psb_d_serial_mod.f90 b/base/modules/serial/psb_d_serial_mod.f90 similarity index 100% rename from base/modules/psb_d_serial_mod.f90 rename to base/modules/serial/psb_d_serial_mod.f90 diff --git a/base/modules/psb_d_vect_mod.F90 b/base/modules/serial/psb_d_vect_mod.F90 similarity index 100% rename from base/modules/psb_d_vect_mod.F90 rename to base/modules/serial/psb_d_vect_mod.F90 diff --git a/base/modules/psb_i_base_vect_mod.f90 b/base/modules/serial/psb_i_base_vect_mod.f90 similarity index 100% rename from base/modules/psb_i_base_vect_mod.f90 rename to base/modules/serial/psb_i_base_vect_mod.f90 diff --git a/base/modules/psb_i_vect_mod.F90 b/base/modules/serial/psb_i_vect_mod.F90 similarity index 100% rename from base/modules/psb_i_vect_mod.F90 rename to base/modules/serial/psb_i_vect_mod.F90 diff --git a/base/modules/psb_mat_mod.f90 b/base/modules/serial/psb_mat_mod.f90 similarity index 100% rename from base/modules/psb_mat_mod.f90 rename to base/modules/serial/psb_mat_mod.f90 diff --git a/base/modules/psb_s_base_mat_mod.f90 b/base/modules/serial/psb_s_base_mat_mod.f90 similarity index 100% rename from base/modules/psb_s_base_mat_mod.f90 rename to base/modules/serial/psb_s_base_mat_mod.f90 diff --git a/base/modules/psb_s_base_vect_mod.f90 b/base/modules/serial/psb_s_base_vect_mod.f90 similarity index 100% rename from base/modules/psb_s_base_vect_mod.f90 rename to base/modules/serial/psb_s_base_vect_mod.f90 diff --git a/base/modules/psb_s_csc_mat_mod.f90 b/base/modules/serial/psb_s_csc_mat_mod.f90 similarity index 100% rename from base/modules/psb_s_csc_mat_mod.f90 rename to base/modules/serial/psb_s_csc_mat_mod.f90 diff --git a/base/modules/psb_s_csr_mat_mod.f90 b/base/modules/serial/psb_s_csr_mat_mod.f90 similarity index 100% rename from base/modules/psb_s_csr_mat_mod.f90 rename to base/modules/serial/psb_s_csr_mat_mod.f90 diff --git a/base/modules/psb_s_mat_mod.f90 b/base/modules/serial/psb_s_mat_mod.f90 similarity index 100% rename from base/modules/psb_s_mat_mod.f90 rename to base/modules/serial/psb_s_mat_mod.f90 diff --git a/base/modules/psb_s_serial_mod.f90 b/base/modules/serial/psb_s_serial_mod.f90 similarity index 100% rename from base/modules/psb_s_serial_mod.f90 rename to base/modules/serial/psb_s_serial_mod.f90 diff --git a/base/modules/psb_s_vect_mod.F90 b/base/modules/serial/psb_s_vect_mod.F90 similarity index 100% rename from base/modules/psb_s_vect_mod.F90 rename to base/modules/serial/psb_s_vect_mod.F90 diff --git a/base/modules/psb_serial_mod.f90 b/base/modules/serial/psb_serial_mod.f90 similarity index 100% rename from base/modules/psb_serial_mod.f90 rename to base/modules/serial/psb_serial_mod.f90 diff --git a/base/modules/psb_vect_mod.f90 b/base/modules/serial/psb_vect_mod.f90 similarity index 100% rename from base/modules/psb_vect_mod.f90 rename to base/modules/serial/psb_vect_mod.f90 diff --git a/base/modules/psb_z_base_mat_mod.f90 b/base/modules/serial/psb_z_base_mat_mod.f90 similarity index 100% rename from base/modules/psb_z_base_mat_mod.f90 rename to base/modules/serial/psb_z_base_mat_mod.f90 diff --git a/base/modules/psb_z_base_vect_mod.f90 b/base/modules/serial/psb_z_base_vect_mod.f90 similarity index 100% rename from base/modules/psb_z_base_vect_mod.f90 rename to base/modules/serial/psb_z_base_vect_mod.f90 diff --git a/base/modules/psb_z_csc_mat_mod.f90 b/base/modules/serial/psb_z_csc_mat_mod.f90 similarity index 100% rename from base/modules/psb_z_csc_mat_mod.f90 rename to base/modules/serial/psb_z_csc_mat_mod.f90 diff --git a/base/modules/psb_z_csr_mat_mod.f90 b/base/modules/serial/psb_z_csr_mat_mod.f90 similarity index 100% rename from base/modules/psb_z_csr_mat_mod.f90 rename to base/modules/serial/psb_z_csr_mat_mod.f90 diff --git a/base/modules/psb_z_mat_mod.f90 b/base/modules/serial/psb_z_mat_mod.f90 similarity index 100% rename from base/modules/psb_z_mat_mod.f90 rename to base/modules/serial/psb_z_mat_mod.f90 diff --git a/base/modules/psb_z_serial_mod.f90 b/base/modules/serial/psb_z_serial_mod.f90 similarity index 100% rename from base/modules/psb_z_serial_mod.f90 rename to base/modules/serial/psb_z_serial_mod.f90 diff --git a/base/modules/psb_z_vect_mod.F90 b/base/modules/serial/psb_z_vect_mod.F90 similarity index 100% rename from base/modules/psb_z_vect_mod.F90 rename to base/modules/serial/psb_z_vect_mod.F90 diff --git a/base/modules/psb_c_tools_mod.f90 b/base/modules/tools/psb_c_tools_mod.f90 similarity index 100% rename from base/modules/psb_c_tools_mod.f90 rename to base/modules/tools/psb_c_tools_mod.f90 diff --git a/base/modules/psb_cd_tools_mod.f90 b/base/modules/tools/psb_cd_tools_mod.f90 similarity index 100% rename from base/modules/psb_cd_tools_mod.f90 rename to base/modules/tools/psb_cd_tools_mod.f90 diff --git a/base/modules/psb_d_tools_mod.f90 b/base/modules/tools/psb_d_tools_mod.f90 similarity index 100% rename from base/modules/psb_d_tools_mod.f90 rename to base/modules/tools/psb_d_tools_mod.f90 diff --git a/base/modules/psb_i_tools_mod.f90 b/base/modules/tools/psb_i_tools_mod.f90 similarity index 100% rename from base/modules/psb_i_tools_mod.f90 rename to base/modules/tools/psb_i_tools_mod.f90 diff --git a/base/modules/psb_s_tools_mod.f90 b/base/modules/tools/psb_s_tools_mod.f90 similarity index 100% rename from base/modules/psb_s_tools_mod.f90 rename to base/modules/tools/psb_s_tools_mod.f90 diff --git a/base/modules/psb_tools_mod.f90 b/base/modules/tools/psb_tools_mod.f90 similarity index 100% rename from base/modules/psb_tools_mod.f90 rename to base/modules/tools/psb_tools_mod.f90 diff --git a/base/modules/psb_z_tools_mod.f90 b/base/modules/tools/psb_z_tools_mod.f90 similarity index 100% rename from base/modules/psb_z_tools_mod.f90 rename to base/modules/tools/psb_z_tools_mod.f90