From 3be4f105f85e100a1ff4c0040de99b2feb7a3e75 Mon Sep 17 00:00:00 2001
From: Salvatore Filippone <salvatore.filippone@cranfield.ac.uk>
Date: Mon, 4 Jun 2007 14:27:31 +0000
Subject: [PATCH] *** empty log message ***

---
 base/serial/psb_getrow_mod.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/base/serial/psb_getrow_mod.f90 b/base/serial/psb_getrow_mod.f90
index 9ee0e19e..78910fb8 100644
--- a/base/serial/psb_getrow_mod.f90
+++ b/base/serial/psb_getrow_mod.f90
@@ -546,7 +546,7 @@ contains
     integer                              :: lrw,info
     integer, optional                    :: iren(:)
     integer  :: nzin_, nza, idx,ip,jp,i,j,k, nzt
-    logical, parameter :: debug=.true.
+    logical, parameter :: debug=.false.
 
     nza = a%infoa(psb_nnz_)
     if (a%pl(1) /= 0) then