mirror of
https://github.com/sfilippone/amg4psblas.git
synced 2026-10-06 22:55:12 +00:00
Fixed comment on trans=N: we now handle trans=T correctly in multiple
Jacobi sweeps.
This commit is contained in:
@@ -214,7 +214,6 @@ subroutine mld_dsub_aply(alpha,prec,x,beta,y,desc_data,trans,work,info)
|
||||
! Apply prec%iprcparm(smooth_sweeps_) sweeps of a block-Jacobi solver
|
||||
! to compute an approximate solution of a linear system.
|
||||
!
|
||||
! Note: trans is always 'N' here.
|
||||
!
|
||||
|
||||
if (size(prec%av) < mld_ap_nd_) then
|
||||
|
||||
@@ -215,8 +215,6 @@ subroutine mld_zsub_aply(alpha,prec,x,beta,y,desc_data,trans,work,info)
|
||||
! Apply prec%iprcparm(smooth_sweeps_) sweeps of a block-Jacobi solver
|
||||
! to compute an approximate solution of a linear system.
|
||||
!
|
||||
! Note: trans is always 'N' here.
|
||||
!
|
||||
|
||||
if (size(prec%av) < mld_ap_nd_) then
|
||||
info = 4011
|
||||
|
||||
Reference in New Issue
Block a user