From 7bd4c00cff689a161fcbb5d6f675ec7cfea005bc Mon Sep 17 00:00:00 2001 From: Salvatore Filippone Date: Mon, 13 Oct 2008 16:06:17 +0000 Subject: [PATCH] mld2p4-dev Fixed printout of multilevel preconditioner description. --- mlprec/mld_prec_type.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/mlprec/mld_prec_type.f90 b/mlprec/mld_prec_type.f90 index 80a994c8..12ee7a94 100644 --- a/mlprec/mld_prec_type.f90 +++ b/mlprec/mld_prec_type.f90 @@ -980,7 +980,7 @@ contains if (me==psb_root_) then write(iout_,*) - write(iout_,*) 'Preconditioner description' + write(iout_,'(a)') 'Preconditioner description' nlev = size(p%baseprecv) if (nlev >= 1) then !