From e4d1c1549f67d71976204420b38cc94338a348e8 Mon Sep 17 00:00:00 2001
From: Hongjian Fang <fanghj1990@gmail.com>
Date: Tue, 21 Apr 2020 06:54:49 -0400
Subject: [PATCH] disable output of lsmr

---
 src/voronoiproj.f90 | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/voronoiproj.f90 b/src/voronoiproj.f90
index 1f43bf7..b57f347 100644
--- a/src/voronoiproj.f90
+++ b/src/voronoiproj.f90
@@ -158,14 +158,14 @@ subroutine voronoiproj(leniw,lenrw,colg,nrow,rw,dres,goxd,dvxd,gozd,dvzd,depz,&
       ! using lsmr to solve for the projection coefficients
       !print*, 'LSMR beginning ...'
 
-      !nout = -1
-      nout = 36
-      open(nout,file='lsmrout_sub.txt')
+      nout = -1
+      !nout = 36
+      !open(nout,file='lsmrout_sub.txt')
 
       call LSMR(nd, ncells, leniwgp, lenrwgp,iwgp,rwgp,dres,damp,&
       atol, btol, conlim, itnlim, localSize,nout,&
       xunknown, istop, itn, anorm, acond,rnorm, arnorm, xnorm)
-      close(nout)
+      !close(nout)
       do ii = 1,ncells
         xunknown(ii) = xunknown(ii)/norm(ii)
       enddo