Fixed wrong comment.

This commit is contained in:
Salvatore Filippone
2007-10-23 09:43:49 +00:00
parent 4e91e8d2c6
commit c1778c802f
2 changed files with 2 additions and 2 deletions
+1 -1
View File
@@ -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)
+1 -1
View File
@@ -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)