diff --git a/prec/psb_prec_type.f90 b/prec/psb_prec_type.f90 index 093d4c14..6d46ffa9 100644 --- a/prec/psb_prec_type.f90 +++ b/prec/psb_prec_type.f90 @@ -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 diff --git a/test/pargen/ppde90.f90 b/test/pargen/ppde90.f90 index 12880a1b..dee197cc 100644 --- a/test/pargen/ppde90.f90 +++ b/test/pargen/ppde90.f90 @@ -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