diff --git a/map65/libm65/decode0.f90 b/map65/libm65/decode0.f90
index 64c6ea32a..029e1d0fd 100644
--- a/map65/libm65/decode0.f90
+++ b/map65/libm65/decode0.f90
@@ -12,7 +12,6 @@ subroutine decode0(dd,ss,savg,nstandalone)
        ndepth,ndiskdat,neme,newdat,nfa,nfb,nfcal,nfshift,                 &
        mcall3,nkeep,ntol,nxant,nrxlog,nfsample,nxpol,nmode,               &
        nfast,nsave,mycall,mygrid,hiscall,hisgrid,datetime
-  common/tracer/ limtrace,lu
   data neme0/-99/,mcall3b/1/
   save
 
diff --git a/map65/libm65/m65.f90 b/map65/libm65/m65.f90
index 0d1266d4a..9b5a8f3cc 100644
--- a/map65/libm65/m65.f90
+++ b/map65/libm65/m65.f90
@@ -33,7 +33,6 @@ program m65
   real*8 hsym
   real*4 ssz5a(NFFT)
   logical*1 lstrong(0:1023)
-  common/tracer/limtrace,lu
   real*8 fc0,fcenter
   character*80 arg,infile
   character mycall*12,hiscall*12,mygrid*6,hisgrid*6,datetime*20
@@ -83,8 +82,6 @@ program m65
   if(arg.eq.'95238') nfsample=95238
 
   ifile1=5
-  limtrace=0
-  lu=12
 
 ! Some default parameters for command-line execution, in early testing.
   mycall='K1JT'
diff --git a/map65/libm65/m65a.f90 b/map65/libm65/m65a.f90
index a8c931192..17104b2ce 100644
--- a/map65/libm65/m65a.f90
+++ b/map65/libm65/m65a.f90
@@ -17,7 +17,6 @@ subroutine m65a
   character*80 cwd
   character wisfile*256
   logical fileExists
-  common/tracer/limtrace,lu
 
   call getcwd(cwd)
   call ftninit(trim(cwd))