From bfc66e22d396d243e67724860c54372638359383 Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Mon, 17 May 2021 10:42:53 -0400
Subject: [PATCH] Code cleanup.

---
 map65/libm65/decode0.f90 | 6 ------
 1 file changed, 6 deletions(-)

diff --git a/map65/libm65/decode0.f90 b/map65/libm65/decode0.f90
index 029e1d0fd..7a9c3d903 100644
--- a/map65/libm65/decode0.f90
+++ b/map65/libm65/decode0.f90
@@ -16,12 +16,6 @@ subroutine decode0(dd,ss,savg,nstandalone)
   save
 
   call timer('decode0 ',0)
-
-!###
-!  npol=1 + 3*nxpol
-!  write(50) nutc,npol,ss(1:npol,:,:),savg(1:npol,:)
-!###
-
   if(newdat.ne.0) then
      nz=52*96000
      hist=0