Fix USE realloc

3 years ago · 896d7a8853
parent 49fc0f5ef7
commit 896d7a8853
7 changed files with 0 additions and 92 deletions
--- a/base/modules/penv/psi_c_collective_mod.F90
+++ b/base/modules/penv/psi_c_collective_mod.F90
@ -147,7 +147,6 @@ contains
  end subroutine psb_csums

  subroutine psb_csumv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -215,7 +214,6 @@ contains
  end subroutine psb_csumv

  subroutine psb_csumm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -354,7 +352,6 @@ contains
  end subroutine psb_camxs

  subroutine psb_camxv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -422,7 +419,6 @@ contains
  end subroutine psb_camxv

  subroutine psb_camxm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -560,7 +556,6 @@ contains
  end subroutine psb_camns

  subroutine psb_camnv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -628,7 +623,6 @@ contains
  end subroutine psb_camnv

  subroutine psb_camnm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -755,7 +749,6 @@ contains
  end subroutine psb_cbcasts

  subroutine psb_cbcastv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -811,7 +804,6 @@ contains
  end subroutine psb_cbcastv

  subroutine psb_cbcastm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -977,7 +969,6 @@ contains
  end subroutine psb_cexscan_sums

  subroutine psb_cscan_sumv(ctxt,dat,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1027,7 +1018,6 @@ contains
  end subroutine psb_cscan_sumv

  subroutine psb_cexscan_sumv(ctxt,dat,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
--- a/base/modules/penv/psi_d_collective_mod.F90
+++ b/base/modules/penv/psi_d_collective_mod.F90
@ -157,7 +157,6 @@ contains
  end subroutine psb_dmaxs

  subroutine psb_dmaxv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -226,7 +225,6 @@ contains
  end subroutine psb_dmaxv

  subroutine psb_dmaxm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -364,7 +362,6 @@ contains
  end subroutine psb_dmins

  subroutine psb_dminv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -432,7 +429,6 @@ contains
  end subroutine psb_dminv

  subroutine psb_dminm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -573,7 +569,6 @@ contains
  end subroutine psb_d_nrm2s

  subroutine psb_d_nrm2v(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -712,7 +707,6 @@ contains
  end subroutine psb_dsums

  subroutine psb_dsumv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -780,7 +774,6 @@ contains
  end subroutine psb_dsumv

  subroutine psb_dsumm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -919,7 +912,6 @@ contains
  end subroutine psb_damxs

  subroutine psb_damxv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -987,7 +979,6 @@ contains
  end subroutine psb_damxv

  subroutine psb_damxm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1125,7 +1116,6 @@ contains
  end subroutine psb_damns

  subroutine psb_damnv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1193,7 +1183,6 @@ contains
  end subroutine psb_damnv

  subroutine psb_damnm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1320,7 +1309,6 @@ contains
  end subroutine psb_dbcasts

  subroutine psb_dbcastv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1376,7 +1364,6 @@ contains
  end subroutine psb_dbcastv

  subroutine psb_dbcastm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1542,7 +1529,6 @@ contains
  end subroutine psb_dexscan_sums

  subroutine psb_dscan_sumv(ctxt,dat,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1592,7 +1578,6 @@ contains
  end subroutine psb_dscan_sumv

  subroutine psb_dexscan_sumv(ctxt,dat,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
--- a/base/modules/penv/psi_e_collective_mod.F90
+++ b/base/modules/penv/psi_e_collective_mod.F90
@ -154,7 +154,6 @@ contains
  end subroutine psb_emaxs

  subroutine psb_emaxv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -223,7 +222,6 @@ contains
  end subroutine psb_emaxv

  subroutine psb_emaxm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -361,7 +359,6 @@ contains
  end subroutine psb_emins

  subroutine psb_eminv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -429,7 +426,6 @@ contains
  end subroutine psb_eminv

  subroutine psb_eminm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -569,7 +565,6 @@ contains
  end subroutine psb_esums

  subroutine psb_esumv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -637,7 +632,6 @@ contains
  end subroutine psb_esumv

  subroutine psb_esumm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -776,7 +770,6 @@ contains
  end subroutine psb_eamxs

  subroutine psb_eamxv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -844,7 +837,6 @@ contains
  end subroutine psb_eamxv

  subroutine psb_eamxm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -982,7 +974,6 @@ contains
  end subroutine psb_eamns

  subroutine psb_eamnv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1050,7 +1041,6 @@ contains
  end subroutine psb_eamnv

  subroutine psb_eamnm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1177,7 +1167,6 @@ contains
  end subroutine psb_ebcasts

  subroutine psb_ebcastv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1233,7 +1222,6 @@ contains
  end subroutine psb_ebcastv

  subroutine psb_ebcastm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1399,7 +1387,6 @@ contains
  end subroutine psb_eexscan_sums

  subroutine psb_escan_sumv(ctxt,dat,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1449,7 +1436,6 @@ contains
  end subroutine psb_escan_sumv

  subroutine psb_eexscan_sumv(ctxt,dat,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
--- a/base/modules/penv/psi_i2_collective_mod.F90
+++ b/base/modules/penv/psi_i2_collective_mod.F90
@ -154,7 +154,6 @@ contains
  end subroutine psb_i2maxs

  subroutine psb_i2maxv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -223,7 +222,6 @@ contains
  end subroutine psb_i2maxv

  subroutine psb_i2maxm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -361,7 +359,6 @@ contains
  end subroutine psb_i2mins

  subroutine psb_i2minv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -429,7 +426,6 @@ contains
  end subroutine psb_i2minv

  subroutine psb_i2minm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -569,7 +565,6 @@ contains
  end subroutine psb_i2sums

  subroutine psb_i2sumv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -637,7 +632,6 @@ contains
  end subroutine psb_i2sumv

  subroutine psb_i2summ(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -776,7 +770,6 @@ contains
  end subroutine psb_i2amxs

  subroutine psb_i2amxv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -844,7 +837,6 @@ contains
  end subroutine psb_i2amxv

  subroutine psb_i2amxm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -982,7 +974,6 @@ contains
  end subroutine psb_i2amns

  subroutine psb_i2amnv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1050,7 +1041,6 @@ contains
  end subroutine psb_i2amnv

  subroutine psb_i2amnm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1177,7 +1167,6 @@ contains
  end subroutine psb_i2bcasts

  subroutine psb_i2bcastv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1233,7 +1222,6 @@ contains
  end subroutine psb_i2bcastv

  subroutine psb_i2bcastm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1399,7 +1387,6 @@ contains
  end subroutine psb_i2exscan_sums

  subroutine psb_i2scan_sumv(ctxt,dat,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1449,7 +1436,6 @@ contains
  end subroutine psb_i2scan_sumv

  subroutine psb_i2exscan_sumv(ctxt,dat,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
--- a/base/modules/penv/psi_m_collective_mod.F90
+++ b/base/modules/penv/psi_m_collective_mod.F90
@ -154,7 +154,6 @@ contains
  end subroutine psb_mmaxs

  subroutine psb_mmaxv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -223,7 +222,6 @@ contains
  end subroutine psb_mmaxv

  subroutine psb_mmaxm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -361,7 +359,6 @@ contains
  end subroutine psb_mmins

  subroutine psb_mminv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -429,7 +426,6 @@ contains
  end subroutine psb_mminv

  subroutine psb_mminm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -569,7 +565,6 @@ contains
  end subroutine psb_msums

  subroutine psb_msumv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -637,7 +632,6 @@ contains
  end subroutine psb_msumv

  subroutine psb_msumm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -776,7 +770,6 @@ contains
  end subroutine psb_mamxs

  subroutine psb_mamxv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -844,7 +837,6 @@ contains
  end subroutine psb_mamxv

  subroutine psb_mamxm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -982,7 +974,6 @@ contains
  end subroutine psb_mamns

  subroutine psb_mamnv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1050,7 +1041,6 @@ contains
  end subroutine psb_mamnv

  subroutine psb_mamnm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1177,7 +1167,6 @@ contains
  end subroutine psb_mbcasts

  subroutine psb_mbcastv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1233,7 +1222,6 @@ contains
  end subroutine psb_mbcastv

  subroutine psb_mbcastm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1399,7 +1387,6 @@ contains
  end subroutine psb_mexscan_sums

  subroutine psb_mscan_sumv(ctxt,dat,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1449,7 +1436,6 @@ contains
  end subroutine psb_mscan_sumv

  subroutine psb_mexscan_sumv(ctxt,dat,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
--- a/base/modules/penv/psi_s_collective_mod.F90
+++ b/base/modules/penv/psi_s_collective_mod.F90
@ -157,7 +157,6 @@ contains
  end subroutine psb_smaxs

  subroutine psb_smaxv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -226,7 +225,6 @@ contains
  end subroutine psb_smaxv

  subroutine psb_smaxm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -364,7 +362,6 @@ contains
  end subroutine psb_smins

  subroutine psb_sminv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -432,7 +429,6 @@ contains
  end subroutine psb_sminv

  subroutine psb_sminm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -573,7 +569,6 @@ contains
  end subroutine psb_s_nrm2s

  subroutine psb_s_nrm2v(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -712,7 +707,6 @@ contains
  end subroutine psb_ssums

  subroutine psb_ssumv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -780,7 +774,6 @@ contains
  end subroutine psb_ssumv

  subroutine psb_ssumm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -919,7 +912,6 @@ contains
  end subroutine psb_samxs

  subroutine psb_samxv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -987,7 +979,6 @@ contains
  end subroutine psb_samxv

  subroutine psb_samxm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1125,7 +1116,6 @@ contains
  end subroutine psb_samns

  subroutine psb_samnv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1193,7 +1183,6 @@ contains
  end subroutine psb_samnv

  subroutine psb_samnm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1320,7 +1309,6 @@ contains
  end subroutine psb_sbcasts

  subroutine psb_sbcastv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1376,7 +1364,6 @@ contains
  end subroutine psb_sbcastv

  subroutine psb_sbcastm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1542,7 +1529,6 @@ contains
  end subroutine psb_sexscan_sums

  subroutine psb_sscan_sumv(ctxt,dat,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1592,7 +1578,6 @@ contains
  end subroutine psb_sscan_sumv

  subroutine psb_sexscan_sumv(ctxt,dat,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
--- a/base/modules/penv/psi_z_collective_mod.F90
+++ b/base/modules/penv/psi_z_collective_mod.F90
@ -147,7 +147,6 @@ contains
  end subroutine psb_zsums

  subroutine psb_zsumv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -215,7 +214,6 @@ contains
  end subroutine psb_zsumv

  subroutine psb_zsumm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -354,7 +352,6 @@ contains
  end subroutine psb_zamxs

  subroutine psb_zamxv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -422,7 +419,6 @@ contains
  end subroutine psb_zamxv

  subroutine psb_zamxm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -560,7 +556,6 @@ contains
  end subroutine psb_zamns

  subroutine psb_zamnv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -628,7 +623,6 @@ contains
  end subroutine psb_zamnv

  subroutine psb_zamnm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -755,7 +749,6 @@ contains
  end subroutine psb_zbcasts

  subroutine psb_zbcastv(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -811,7 +804,6 @@ contains
  end subroutine psb_zbcastv

  subroutine psb_zbcastm(ctxt,dat,root,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -977,7 +969,6 @@ contains
  end subroutine psb_zexscan_sums

  subroutine psb_zscan_sumv(ctxt,dat,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif
@ -1027,7 +1018,6 @@ contains
  end subroutine psb_zscan_sumv

  subroutine psb_zexscan_sumv(ctxt,dat,mode,request)
-    use psb_realloc_mod
 #ifdef MPI_MOD
    use mpi
 #endif