Merge branch 'main' of github.com:flatironinstitute/fmm2d

flatironinstitute · Feb 1, 2024 · 4a76185 · 4a76185
2 parents b67e930 + 9779529
commit 4a76185
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/helmholtz/hfmm2d.f b/src/helmholtz/hfmm2d.f
@@ -150,7 +150,7 @@ subroutine hfmm2d(nd,eps,zk,ns,sources,ifcharge,charge,
       ifunif = 0
       iper = 0
 
-      ifprint = 1
+      ifprint = 0
 
 c
 c  turn on computation of list 1
@@ -702,7 +702,7 @@ subroutine hfmm2dmain(nd,eps,
 c     Prints timing breakdown and other things if ifprint=1.
 c     Prints timing breakdown, list information, and other things if ifprint=2.
 c      
-        ifprint=1
+        ifprint=0
 
         pi = 4*atan(1.0d0)
 c