diff --git a/lib/qra/q65/q65.f90 b/lib/qra/q65/q65.f90
index 0d9d09d16..349e38c91 100644
--- a/lib/qra/q65/q65.f90
+++ b/lib/qra/q65/q65.f90
@@ -9,7 +9,7 @@ module q65
   integer apmask(13),apsymbols(13)
   integer,dimension(22) ::  isync = (/1,9,12,13,15,22,23,26,27,33,35,   &
                                      38,46,50,55,60,62,66,69,74,76,85/)
-  integer codewords(63,207)
+  integer codewords(63,206)
   integer ibwa,ibwb,ncw,nsps,mode_q65,nfa,nfb,nqd
   integer idfbest,idtbest,ibw,ndistbest,maxiters,max_drift
   integer istep,nsmo,lag1,lag2,npasses,nused,iseq,ncand,nrc
diff --git a/lib/qra/q65/q65_set_list.f90 b/lib/qra/q65/q65_set_list.f90
index 2fe1269ee..22d501a5f 100644
--- a/lib/qra/q65/q65_set_list.f90
+++ b/lib/qra/q65/q65_set_list.f90
@@ -1,6 +1,6 @@
 subroutine q65_set_list(mycall,hiscall,hisgrid,codewords,ncw)
 
-  parameter (MAX_NCW=207)
+  parameter (MAX_NCW=206)
   character*12 mycall,hiscall
   character*6 hisgrid
   character*37 msg0,msg,msgsent
@@ -44,7 +44,6 @@ subroutine q65_set_list(mycall,hiscall,hisgrid,codewords,ncw)
            if(msg(j0+1:j0+1).eq.' ') msg(j0+1:j0+1)='+'
         endif
      endif
-     if(i.eq.207) msg='TNX 73 GL'
 
 10   call genq65(msg,0,msgsent,itone,i3,n3)
      i0=1