From c0526dd9d22d467bb113e2adf5b035d679e7c175 Mon Sep 17 00:00:00 2001 From: Salvatore Filippone Date: Tue, 18 Apr 2006 12:27:57 +0000 Subject: [PATCH] *** empty log message *** --- src/psblas/psb_daxpby.f90 | 2 +- src/psblas/psb_zaxpby.f90 | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/psblas/psb_daxpby.f90 b/src/psblas/psb_daxpby.f90 index 0e4c1415..f124f1f6 100644 --- a/src/psblas/psb_daxpby.f90 +++ b/src/psblas/psb_daxpby.f90 @@ -224,7 +224,7 @@ subroutine psb_daxpbyv(alpha, x, beta,y,desc_a,info) integer :: int_err(5), icontxt, nprow, npcol, myrow, mycol,& & err_act, n, iix, jjx, temp(2), ix, iy, ijx, m, iiy, in, jjy character(len=20) :: name, ch_err - logical, parameter :: debug=.true. + logical, parameter :: debug=.false. name='psb_dgeaxpby' if(psb_get_errstatus().ne.0) return diff --git a/src/psblas/psb_zaxpby.f90 b/src/psblas/psb_zaxpby.f90 index 9364f827..ae252df1 100644 --- a/src/psblas/psb_zaxpby.f90 +++ b/src/psblas/psb_zaxpby.f90 @@ -223,7 +223,7 @@ subroutine psb_zaxpbyv(alpha, x, beta,y,desc_a,info) integer :: int_err(5), icontxt, nprow, npcol, myrow, mycol,& & err_act, n, iix, jjx, temp(2), ix, iy, ijx, m, iiy, in, jjy character(len=20) :: name, ch_err - logical, parameter :: debug=.true. + logical, parameter :: debug=.false. name='psb_dgeaxpby' if(psb_get_errstatus().ne.0) return