diff --git a/src/helmholtz/hfmm2d.f b/src/helmholtz/hfmm2d.f
index 0bb8666..4fcb08c 100644
--- 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