mirror of
https://github.com/sfilippone/amg4psblas.git
synced 2026-10-06 22:55:12 +00:00
Take out use statement to compile with INTEL.
This commit is contained in:
@@ -897,7 +897,6 @@ contains
|
||||
!
|
||||
subroutine get_parms(icontxt,afmt,idim,solve,prec)
|
||||
|
||||
use psb_base_mod
|
||||
implicit none
|
||||
|
||||
integer(psb_ipk_) :: icontxt, idim
|
||||
|
||||
@@ -937,7 +937,6 @@ contains
|
||||
!
|
||||
subroutine get_parms(icontxt,afmt,idim,solve,prec)
|
||||
|
||||
use psb_base_mod
|
||||
implicit none
|
||||
|
||||
integer(psb_ipk_) :: icontxt, idim
|
||||
|
||||
@@ -897,7 +897,6 @@ contains
|
||||
!
|
||||
subroutine get_parms(icontxt,afmt,idim,solve,prec)
|
||||
|
||||
use psb_base_mod
|
||||
implicit none
|
||||
|
||||
integer(psb_ipk_) :: icontxt, idim
|
||||
|
||||
@@ -937,7 +937,6 @@ contains
|
||||
!
|
||||
subroutine get_parms(icontxt,afmt,idim,solve,prec)
|
||||
|
||||
use psb_base_mod
|
||||
implicit none
|
||||
|
||||
integer(psb_ipk_) :: icontxt, idim
|
||||
|
||||
Reference in New Issue
Block a user