mirror of
https://github.com/sfilippone/amg4psblas.git
synced 2026-10-20 21:02:35 +00:00
mld2p4:
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
This commit is contained in:
@@ -41,7 +41,6 @@
|
||||
subroutine c_mumps_solver_bld(a,desc_a,sv,upd,info,b,amold,vmold,imold)
|
||||
|
||||
use psb_base_mod
|
||||
use mpi
|
||||
use mld_c_mumps_solver
|
||||
Implicit None
|
||||
|
||||
|
||||
@@ -41,7 +41,6 @@
|
||||
subroutine d_mumps_solver_bld(a,desc_a,sv,upd,info,b,amold,vmold,imold)
|
||||
|
||||
use psb_base_mod
|
||||
use mpi
|
||||
use mld_d_mumps_solver
|
||||
Implicit None
|
||||
|
||||
|
||||
@@ -41,7 +41,6 @@
|
||||
subroutine s_mumps_solver_bld(a,desc_a,sv,upd,info,b,amold,vmold,imold)
|
||||
|
||||
use psb_base_mod
|
||||
use mpi
|
||||
use mld_s_mumps_solver
|
||||
Implicit None
|
||||
|
||||
|
||||
@@ -41,7 +41,6 @@
|
||||
subroutine z_mumps_solver_bld(a,desc_a,sv,upd,info,b,amold,vmold,imold)
|
||||
|
||||
use psb_base_mod
|
||||
use mpi
|
||||
use mld_z_mumps_solver
|
||||
Implicit None
|
||||
|
||||
|
||||
Reference in New Issue
Block a user