diff --git a/lib/ft8/ft8sim.f90 b/lib/ft8/ft8sim.f90
index 42931635b..fd18dff4f 100644
--- a/lib/ft8/ft8sim.f90
+++ b/lib/ft8/ft8sim.f90
@@ -91,7 +91,6 @@ program ft8sim_gfsk
 
   call sgran()
 
-  msg0=msg
   do ifile=1,nfiles
      c0=0.
      c0(0:NWAVE-1)=cwave