mirror of
https://github.com/sfilippone/psblas3.git
synced 2026-10-06 22:55:08 +00:00
Fix test program
This commit is contained in:
@@ -834,7 +834,7 @@ contains
|
||||
write(psb_out_unit,'("Number of processors : ",i0)')np
|
||||
write(psb_out_unit,'("Data distribution : BLOCK")')
|
||||
write(psb_out_unit,'(" ")')
|
||||
write(psb_out_unit,'("Storage formats ",a)') acfmt,' ',agfmt
|
||||
write(psb_out_unit,'("Storage format ",a)') acfmt
|
||||
write(psb_out_unit,'("Hacksize : ",i0)')hacksize
|
||||
write(psb_out_unit,'("Testing overlap ND ",l8)') tnd
|
||||
end if
|
||||
|
||||
Reference in New Issue
Block a user