fdurastante/psblas3
1
0
Fork 0
mirror of https://github.com/sfilippone/psblas3.git synced 2026-10-20 12:52:14 +00:00
Code Issues Packages Projects Releases Wiki Activity

psblas/base/tools:

Browse Source 
psb_dcdbldext.F90
psb_zcdbldext.F90

Fixed stupid bug in the copying of the input overlap index list.
This commit is contained in:
Salvatore Filippone
2008-02-15 15:22:53 +00:00
parent 4e43d48f5f
commit d7275f218d
2 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
base/tools/psb_dcdbldext.F90
+1 -1
View File
@@ -272,7 +272,7 @@ Subroutine psb_dcdbldext(a,desc_a,novr,desc_ov,info, extype)
orig_ovr(cntov_o+3)=-1
cntov_o=cntov_o+3
end Do
counter=counter+n_elem_recv+n_elem_send+2
counter=counter+n_elem_recv+n_elem_send+3
end Do
base/tools/psb_zcdbldext.F90
+1 -1
View File
@@ -271,7 +271,7 @@ Subroutine psb_zcdbldext(a,desc_a,novr,desc_ov,info, extype)
orig_ovr(cntov_o+3)=-1
cntov_o=cntov_o+3
end Do
counter=counter+n_elem_recv+n_elem_send+2
counter=counter+n_elem_recv+n_elem_send+3
end Do