From f9423aa6d4ed59bc38d23b47695330207cad8aa8 Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Wed, 28 Sep 2022 10:18:42 -0400
Subject: [PATCH] Trivial updates to testfast9.f90, for distributiion to G4JNT.

---
 CMakeLists.txt    | 3 +++
 lib/testfast9.f90 | 6 +++---
 2 files changed, 6 insertions(+), 3 deletions(-)

diff --git a/CMakeLists.txt b/CMakeLists.txt
index 66f5f127f..c02d9bd35 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -1153,6 +1153,9 @@ target_link_libraries (q65_ftn_test wsjt_fort wsjt_cxx)
 add_executable (jt49sim lib/jt49sim.f90)
 target_link_libraries (jt49sim wsjt_fort wsjt_cxx)
 
+add_executable (testfast9 lib/testfast9.f90)
+target_link_libraries (testfast9 wsjt_fort wsjt_cxx)
+
 #add_executable (allsim lib/allsim.f90)
 #target_link_libraries (allsim wsjt_fort wsjt_cxx)
 
diff --git a/lib/testfast9.f90 b/lib/testfast9.f90
index 391d88e5d..0315241f0 100644
--- a/lib/testfast9.f90
+++ b/lib/testfast9.f90
@@ -1,6 +1,6 @@
 program testfast9
 
-  parameter (NMAX=359424)
+  parameter (NMAX=30*12000)
   integer*2 id2(NMAX)
   integer narg(0:11)
   character*80 line(100)
@@ -8,8 +8,8 @@ program testfast9
   
   nargs=iargc()
   if(nargs.ne.2) then
-     print*,'Usage:    testfast9 submode infile'
-     print*,'Example: testfast9 E /data/VE1SKY/K1JT/JT9E/150806_123300.wav'
+     print*,'Usage:   testfast9 submode infile'
+     print*,'Example: testfast9 E 150806_123300.wav'
      go to 999
   endif
   call getarg(1,submode)