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

Merged changes from trunk for multilevel.

Browse Source
This commit is contained in:
Salvatore Filippone
2006-10-03 15:09:48 +00:00
parent 6dab2c3ab0
commit 28c6aaf358
2 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/serial/psb_dspgtblk.f90
+1 -1
View File
@@ -381,7 +381,7 @@ contains
subroutine jad_dspgtblk(irw,a,b,append,iren,lrw)
type(psb_dspmat_type), intent(in) :: a
type(psb_dspmat_type), intent(in), target :: a
integer :: irw
type(psb_dspmat_type), intent(inout) :: b
logical, intent(in) :: append
src/serial/psb_zspgtblk.f90
+1 -1
View File
@@ -382,7 +382,7 @@ contains
subroutine jad_zspgtblk(irw,a,b,append,iren,lrw)
type(psb_zspmat_type), intent(in) :: a
type(psb_zspmat_type), intent(in),target :: a
integer :: irw
type(psb_zspmat_type), intent(inout) :: b
logical, intent(in) :: append