Merged changes from AIX xlf version.

psblas3-type-indexed
Salvatore Filippone 18 years ago
parent 62bd404de2
commit 211cebb87c

@ -35,7 +35,8 @@
module psb_prec_type
use psb_base_mod
! Reduces size of .mod file.
use psb_base_mod, only : psb_dspmat_type, psb_zspmat_type, psb_desc_type
integer, parameter :: min_prec_=0, noprec_=0, diagsc_=1, bja_=2,&
& max_prec_=2

@ -631,7 +631,8 @@ contains
call psb_amx(ictxt,tasb)
if(iam == psb_root_) then
write(*,'("The matrix has been generated and assembeld in ",a3," format.")')a%fida(1:3)
write(*,'("The matrix has been generated and assembeld in ",a3," format.")')&
& a%fida(1:3)
write(*,'("-pspins time : ",es10.4)')tins
write(*,'("-insert time : ",es10.4)')t2
write(*,'("-assembly time : ",es10.4)')tasb

Loading…
Cancel
Save