fdurastante/amg4psblas
1
0
Fork 0
mirror of https://github.com/sfilippone/amg4psblas.git synced 2026-10-06 22:55:12 +00:00
Code Issues Packages Projects Releases Wiki Activity

mld2p4:

Browse Source 
mlprec/mld_c_mumps_solver.F90
 mlprec/mld_d_mumps_solver.F90
 mlprec/mld_s_mumps_solver.F90
 mlprec/mld_z_mumps_solver.F90

 Take out spurious "use mpi" in Mumps interface
This commit is contained in:
Salvatore Filippone
2016-11-16 23:39:29 +00:00
parent 0dfff39e2d
commit 727090f7cd
4 changed files with 0 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files
mlprec/mld_c_mumps_solver.F90
-1
View File
@@ -136,7 +136,6 @@ module mld_c_mumps_solver
interface
subroutine c_mumps_solver_bld(a,desc_a,sv,upd,info,b,amold,vmold,imold)
use mpi
import :: psb_desc_type, mld_c_mumps_solver_type, psb_c_vect_type, psb_spk_, &
& psb_cspmat_type, psb_c_base_sparse_mat, psb_c_base_vect_type,&
& psb_ipk_, psb_i_base_vect_type
mlprec/mld_d_mumps_solver.F90
-1
View File
@@ -136,7 +136,6 @@ module mld_d_mumps_solver
interface
subroutine d_mumps_solver_bld(a,desc_a,sv,upd,info,b,amold,vmold,imold)
use mpi
import :: psb_desc_type, mld_d_mumps_solver_type, psb_d_vect_type, psb_dpk_, &
& psb_dspmat_type, psb_d_base_sparse_mat, psb_d_base_vect_type,&
& psb_ipk_, psb_i_base_vect_type
mlprec/mld_s_mumps_solver.F90
-1
View File
@@ -136,7 +136,6 @@ module mld_s_mumps_solver
interface
subroutine s_mumps_solver_bld(a,desc_a,sv,upd,info,b,amold,vmold,imold)
use mpi
import :: psb_desc_type, mld_s_mumps_solver_type, psb_s_vect_type, psb_spk_, &
& psb_sspmat_type, psb_s_base_sparse_mat, psb_s_base_vect_type,&
& psb_ipk_, psb_i_base_vect_type
mlprec/mld_z_mumps_solver.F90
-1
View File
@@ -136,7 +136,6 @@ module mld_z_mumps_solver
interface
subroutine z_mumps_solver_bld(a,desc_a,sv,upd,info,b,amold,vmold,imold)
use mpi
import :: psb_desc_type, mld_z_mumps_solver_type, psb_z_vect_type, psb_dpk_, &
& psb_zspmat_type, psb_z_base_sparse_mat, psb_z_base_vect_type,&
& psb_ipk_, psb_i_base_vect_type