Compiling using
gfortran -finit-integer=-9999999 -finit-real=snan
-ffpe-trap=invalid,zero,overflow
Running
sfoxsim 750 0.0 MM K1JT 5 1 0 0 10 -15
It seems that the 1st call to watterson(...) from sfoxsim.f90 is given
uninitialized slots in the array crcvd. crcvd comes from a right circular
shift of cdat by 6000. The upper slots in cdat are uninitialized, so after
right circular shift they end up at the start of crcvd.
I can make this situation go away by explicitly initializing cdat to 0.
prior to the call to sfox_gen_gfsk. Perhaps this is sufficient, but it is
likely an overkill.
diff --git a/lib/superfox/sfoxsim.f90 b/lib/superfox/sfoxsim.f90
index 86f7019e6..27b6839e5 100644
--- a/lib/superfox/sfoxsim.f90
+++ b/lib/superfox/sfoxsim.f90
@@ -137,6 +137,7 @@ program sfoxsim
xdt=ran1(idum)-0.5
endif
! Generate cdat, the SuperFox waveform
+ cdat=(0.,0.)
call sfox_gen_gfsk(chansym,f1,isync,itone,cdat)
crcvd=0.
_______________________________________________
wsjt-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/wsjt-devel
