mirror of
https://github.com/sfilippone/amg4psblas.git
synced 2026-10-06 22:55:12 +00:00
Fixed wrong comment.
This commit is contained in:
@@ -210,7 +210,7 @@ contains
|
||||
if (debug) write(0,*)'LUINT: input Copy done'
|
||||
! Do an elimination step on current row
|
||||
! Turns out we only need to keep track of levels
|
||||
! for the upper triangle, hence no uplevs variable.
|
||||
! for the upper triangle, hence no lowlevs variable.
|
||||
!
|
||||
call iluk_fact(fill_in,i,m,row,rowlevs,heap,&
|
||||
& d,uia1,uia2,uaspk,uplevs,nidx,idxs)
|
||||
|
||||
@@ -210,7 +210,7 @@ contains
|
||||
if (debug) write(0,*)'LUINT: input Copy done'
|
||||
! Do an elimination step on current row
|
||||
! Turns out we only need to keep track of levels
|
||||
! for the upper triangle, hence no uplevs variable.
|
||||
! for the upper triangle, hence no lowlevs variable.
|
||||
!
|
||||
call iluk_fact(fill_in,i,m,row,rowlevs,heap,&
|
||||
& d,uia1,uia2,uaspk,uplevs,nidx,idxs)
|
||||
|
||||
Reference in New Issue
Block a user