Fix some errors in test routines.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@7641 ab8295b8-cf94-4d9e-aec4-7959e3be5d79

CMakeLists.txt

@@ -334,6 +334,7 @@ set (wsjt_FSRCS
   lib/chkmsg.f90
   lib/chkss2.f90
   lib/coord.f90
+  lib/fsk4hf/cpolyfit.f90
   lib/db.f90
   lib/decode4.f90
   lib/decode65a.f90
@@ -389,6 +390,8 @@ set (wsjt_FSRCS
   lib/genmsk144.f90
   lib/genmsk40.f90
   lib/fsk4hf/genmskhf.f90
+  lib/fsk4hf/getfc1.f90
+  lib/fsk4hf/getfc2.f90
   lib/genqra64.f90
   lib/genwspr.f90
   lib/geodist.f90
@@ -437,6 +440,7 @@ set (wsjt_FSRCS
   lib/msk144sim.f90
   lib/fsk4hf/mskhfsim.f90
   lib/mskrtd.f90
+  lib/fsk4hf/msksoftsym.f90
   lib/pctile.f90
   lib/peakdt9.f90
   lib/peakup.f90

lib/fsk4hf/mskhfsim.f90

@@ -146,7 +146,8 @@ program msksim
         call cpolyfit(c,pp,id,maxn,aa,bb,zz)
         nterms=maxn
 
-        call msksoftsym(zz,aa,bb,id,nterms,ierror,rxdata)
+        call msksoftsym(zz,aa,bb,id,nterms,ierror,rxdata,nhard0,nhard,   &
+             nhardsync0,nhardsync)
         
 !---------------------------------------------------------------- Decode
         rxav=sum(rxdata)/ND
@@ -186,8 +187,3 @@ program msksim
   enddo
 
 999 end program msksim
-
-  include 'getfc1.f90'
-  include 'getfc2.f90'
-  include 'cpolyfit.f90'
-  include 'msksoftsym.f90'

lib/fsk4hf/msksoftsym.f90

@@ -1,4 +1,5 @@
-subroutine msksoftsym(zz,aa,bb,id,nterms,ierror,rxdata)
+subroutine msksoftsym(zz,aa,bb,id,nterms,ierror,rxdata,nhard0,nhard,   &
+     nhardsync0,nhardsync)
 
   parameter (KK=84)                     !Information bits (72 + CRC12)
   parameter (ND=168)                    !Data symbols: LDPC (168,84), r=1/2