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 documentation of INTENT of arguments.

Browse Source
This commit is contained in:
Salvatore Filippone
2007-05-31 12:57:27 +00:00
parent 5982dde3de
commit 5422fda30d
15 changed files with 12229 additions and 11959 deletions
Download Patch File Download Diff File Expand all files Collapse all files
base/modules/psb_tools_mod.f90
+2 -2
View File
@@ -590,7 +590,7 @@ Module psb_tools_mod
subroutine psb_get_ovrlap(ovrel,desc,info)
use psb_descriptor_type
implicit none
integer, allocatable :: ovrel(:)
integer, allocatable, intent(out) :: ovrel(:)
type(psb_desc_type), intent(in) :: desc
integer, intent(out) :: info
end subroutine psb_get_ovrlap
@@ -604,7 +604,7 @@ contains
use psb_descriptor_type
use psi_mod
implicit none
integer, allocatable :: bndel(:)
integer, allocatable, intent(out) :: bndel(:)
type(psb_desc_type), intent(in) :: desc
integer, intent(out) :: info