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

Deactivate MINNRG

Browse Source
This commit is contained in:
Salvatore Filippone
2021-06-28 18:42:34 +02:00
parent 7319dab30f
commit 8482067b52
4 changed files with 0 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files
amgprec/impl/aggregator/amg_caggrmat_minnrg_bld.f90
-3
View File
@@ -154,9 +154,6 @@ subroutine amg_caggrmat_minnrg_bld(a,desc_a,ilaggr,nlaggr,parms,&
ctxt = desc_a%get_context()
icomm = desc_a%get_mpic()
info=psb_err_internal_error_
call psb_errpush(info,name)
goto 9999
call psb_info(ctxt, me, np)
amgprec/impl/aggregator/amg_daggrmat_minnrg_bld.f90
-3
View File
@@ -154,9 +154,6 @@ subroutine amg_daggrmat_minnrg_bld(a,desc_a,ilaggr,nlaggr,parms,&
ctxt = desc_a%get_context()
icomm = desc_a%get_mpic()
info=psb_err_internal_error_
call psb_errpush(info,name)
goto 9999
call psb_info(ctxt, me, np)
amgprec/impl/aggregator/amg_saggrmat_minnrg_bld.f90
-3
View File
@@ -154,9 +154,6 @@ subroutine amg_saggrmat_minnrg_bld(a,desc_a,ilaggr,nlaggr,parms,&
ctxt = desc_a%get_context()
icomm = desc_a%get_mpic()
info=psb_err_internal_error_
call psb_errpush(info,name)
goto 9999
call psb_info(ctxt, me, np)
amgprec/impl/aggregator/amg_zaggrmat_minnrg_bld.f90
-3
View File
@@ -154,9 +154,6 @@ subroutine amg_zaggrmat_minnrg_bld(a,desc_a,ilaggr,nlaggr,parms,&
ctxt = desc_a%get_context()
icomm = desc_a%get_mpic()
info=psb_err_internal_error_
call psb_errpush(info,name)
goto 9999
call psb_info(ctxt, me, np)