diff --git a/lib/genqra64.f90 b/lib/genqra64.f90
index b9c660ac0..79c34dfca 100644
--- a/lib/genqra64.f90
+++ b/lib/genqra64.f90
@@ -20,6 +20,9 @@ subroutine genqra64(msg0,ichk,msgsent,itone,itype)
      go to 2
 1    nfreq=1000
 2    itone(1)=nfreq
+     write(msgsent,1000) nfreq
+1000 format(i5,' Hz')
+     print*,'aa ',msgsent
   else
      message=msg0
      do i=1,22
diff --git a/lib/jt9.f90 b/lib/jt9.f90
index 922734710..7ef04c59f 100644
--- a/lib/jt9.f90
+++ b/lib/jt9.f90
@@ -259,10 +259,10 @@ program jt9
      shared_data%params%dttol=3.
 
      shared_data%params%minsync=0       !### TEST ONLY
-!     shared_data%params%nfqso=1500      !### TEST ONLY
+!     shared_data%params%nfqso=1500     !### TEST ONLY
      mycall="G3WDG       "              !### TEST ONLY
      hiscall="VK7MO       "             !### TEST ONLY
-     mycall="QE37        "              !### TEST ONLY
+     hisgrid="QE37        "             !### TEST ONLY
      if(mode.eq.164 .and. nsubmode.lt.100) nsubmode=nsubmode+100
 
      shared_data%params%naggressive=10