mlprec/impl/solver/mld_c_mumps_solver_bld.F90
 mlprec/impl/solver/mld_d_mumps_solver_bld.F90
 mlprec/impl/solver/mld_s_mumps_solver_bld.F90
 mlprec/impl/solver/mld_z_mumps_solver_bld.F90

 Take out spurious "use mpi" in Mumps interface
stopcriterion
Salvatore Filippone 8 years ago
parent 727090f7cd
commit 5cbb20540d

@ -41,7 +41,6 @@
subroutine c_mumps_solver_bld(a,desc_a,sv,upd,info,b,amold,vmold,imold) subroutine c_mumps_solver_bld(a,desc_a,sv,upd,info,b,amold,vmold,imold)
use psb_base_mod use psb_base_mod
use mpi
use mld_c_mumps_solver use mld_c_mumps_solver
Implicit None Implicit None

@ -41,7 +41,6 @@
subroutine d_mumps_solver_bld(a,desc_a,sv,upd,info,b,amold,vmold,imold) subroutine d_mumps_solver_bld(a,desc_a,sv,upd,info,b,amold,vmold,imold)
use psb_base_mod use psb_base_mod
use mpi
use mld_d_mumps_solver use mld_d_mumps_solver
Implicit None Implicit None

@ -41,7 +41,6 @@
subroutine s_mumps_solver_bld(a,desc_a,sv,upd,info,b,amold,vmold,imold) subroutine s_mumps_solver_bld(a,desc_a,sv,upd,info,b,amold,vmold,imold)
use psb_base_mod use psb_base_mod
use mpi
use mld_s_mumps_solver use mld_s_mumps_solver
Implicit None Implicit None

@ -41,7 +41,6 @@
subroutine z_mumps_solver_bld(a,desc_a,sv,upd,info,b,amold,vmold,imold) subroutine z_mumps_solver_bld(a,desc_a,sv,upd,info,b,amold,vmold,imold)
use psb_base_mod use psb_base_mod
use mpi
use mld_z_mumps_solver use mld_z_mumps_solver
Implicit None Implicit None

Loading…
Cancel
Save