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