From 3b54196206ae1a1cde2ea6a766ef9e18a4adba92 Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Thu, 7 Jan 2021 13:37:12 -0500
Subject: [PATCH] Remove two disused lines of code.

---
 lib/blanker.f90 | 5 -----
 1 file changed, 5 deletions(-)

diff --git a/lib/blanker.f90 b/lib/blanker.f90
index 65c8f8fe6..fe43931b5 100644
--- a/lib/blanker.f90
+++ b/lib/blanker.f90
@@ -48,10 +48,5 @@ subroutine blanker(iwave,nz,ndropmax,npct,c_bigfft)
      endif
   enddo
 
-  fblanked=fblanked + 0.1*(float(ndropped)/nz - fblanked)
-  fblanked=float(ndropped)/nz
-!  write(*,3001) npct,nthresh,fblanked
-!3001 format(2i5,f7.3)
-
   return
 end subroutine blanker