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

psblas3:

Browse Source 
base/modules/psb_base_tools_mod.f90
 base/tools/psb_cdcpy.f90

Recover intent(out) on cdcpy. 
Should we change cdfree???
This commit is contained in:
Salvatore Filippone
2010-12-28 15:05:56 +00:00
parent 0b97a63013
commit 2cb5d704da
2 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
base/modules/psb_base_tools_mod.f90
+1 -1
View File
@@ -341,7 +341,7 @@ module psb_cd_if_tools_mod
!....parameters...
type(psb_desc_type), intent(in) :: desc_in
type(psb_desc_type), intent(inout) :: desc_out
type(psb_desc_type), intent(out) :: desc_out
integer, intent(out) :: info
end subroutine psb_cdcpy
end interface
base/tools/psb_cdcpy.f90
+1 -1
View File
@@ -45,7 +45,7 @@ subroutine psb_cdcpy(desc_in, desc_out, info)
!....parameters...
type(psb_desc_type), intent(in) :: desc_in
type(psb_desc_type), intent(inout) :: desc_out
type(psb_desc_type), intent(out) :: desc_out
integer, intent(out) :: info
!locals