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

Fixed internal docs.

Browse Source
This commit is contained in:
Salvatore Filippone
2007-10-04 10:02:02 +00:00
parent 3297eb7d04
commit 624e32ed6d
44 changed files with 238 additions and 141 deletions
Download Patch File Download Diff File Expand all files Collapse all files
base/modules/psb_check_mod.f90
+3 -3
View File
@@ -62,7 +62,7 @@ contains
! jx - integer. X's global column index, which points to the beginning
! of the dense submatrix which is to be operated on.
! desc_dec - integer,dimension(:). Is the matrix_data array.
! info - integer. Eventually returns an error code.
! info - integer. Return code
! iix - integer(optional). The local rows starting index of the submatrix.
! jjx - integer(optional). The local columns starting index of the submatrix.
subroutine psb_chkvect( m, n, lldx, ix, jx, desc_dec, info, iix, jjx)
@@ -188,7 +188,7 @@ contains
! jx - integer. X's global column index, which points to the beginning
! of the dense submatrix which is to be operated on.
! desc_dec - integer,dimension(:). Is the matrix_data array.
! info - integer. Eventually returns an error code.
! info - integer. Return code
!
subroutine psb_chkglobvect( m, n, lldx, ix, jx, desc_dec, info)
@@ -309,7 +309,7 @@ contains
! ja - integer. a's global column index, which points to the beginning
! of the submatrix which is to be operated on.
! desc_dec - integer,dimension(:). Is the matrix_data array.
! info - integer. Eventually returns an error code.
! info - integer. Return code
! iia - integer(optional). The local rows starting index of the submatrix.
! jja - integer(optional). The local columns starting index of the submatrix.
!