mirror of
https://github.com/sfilippone/psblas3.git
synced 2026-10-18 03:42:09 +00:00
Merged bug fix for psb_cd_inloc
This commit is contained in:
@@ -235,7 +235,7 @@ subroutine psb_cd_inloc(v, ictxt, desc, info, globalcheck,idx)
|
||||
end do
|
||||
end if
|
||||
end if
|
||||
if (idx(1) == -1) then
|
||||
if (ix(1) == -1) then
|
||||
do i=1, loc_row
|
||||
ix(i) = i
|
||||
end do
|
||||
|
||||
Reference in New Issue
Block a user