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

New version of PSB_CDPRT. Must be called by all processes.

Browse Source
This commit is contained in:
Salvatore Filippone
2018-02-05 11:52:21 +00:00
parent e451af9621
commit 35da66299a
2 changed files with 126 additions and 194 deletions
Download Patch File Download Diff File Expand all files Collapse all files
base/modules/tools/psb_cd_tools_mod.f90
+2 -1
View File
@@ -81,12 +81,13 @@ module psb_cd_tools_mod
interface psb_cdprt
subroutine psb_cdprt(iout,desc_p,glob,short)
subroutine psb_cdprt(iout,desc_p,glob,short,verbosity)
import :: psb_ipk_, psb_desc_type
implicit none
type(psb_desc_type), intent(in) :: desc_p
integer(psb_ipk_), intent(in) :: iout
logical, intent(in), optional :: glob,short
integer(psb_ipk_), intent(in), optional :: verbosity
end subroutine psb_cdprt
end interface