w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-11-22 04:11:16 -05:00
Code Issues Packages Projects Releases Wiki Activity

Remove a few more vestiges of ISCAT mode.

Browse Source
This commit is contained in:
Joe Taylor 2021-03-03 11:59:03 -05:00
parent 4573c78acd
commit 0e6f536d3e
2 changed files with 0 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
CMakeLists.txt
View File

@ -424,7 +424,6 @@ set (wsjt_FSRCS
lib/gen4.f90 lib/gen4.f90
lib/gen65.f90 lib/gen65.f90
lib/gen9.f90 lib/gen9.f90
lib/geniscat.f90
lib/genwave.f90 lib/genwave.f90
lib/ft8/genft8.f90 lib/ft8/genft8.f90
lib/qra/q65/genq65.f90 lib/qra/q65/genq65.f90
@ -456,7 +455,6 @@ set (wsjt_FSRCS
lib/interleave63.f90 lib/interleave63.f90
lib/interleave9.f90 lib/interleave9.f90
lib/inter_wspr.f90 lib/inter_wspr.f90
lib/iscat.f90
lib/jplsubs.f lib/jplsubs.f
lib/jt9fano.f90 lib/jt9fano.f90
lib/jtmsg.f90 lib/jtmsg.f90
@ -538,7 +536,6 @@ set (wsjt_FSRCS
lib/sync9.f90 lib/sync9.f90
lib/sync9f.f90 lib/sync9f.f90
lib/sync9w.f90 lib/sync9w.f90
lib/synciscat.f90
lib/timf2.f90 lib/timf2.f90
lib/tweak1.f90 lib/tweak1.f90
lib/twkfreq.f90 lib/twkfreq.f90

7
lib/fast_decode.f90
View File

@ -86,13 +86,6 @@ subroutine fast_decode(id2,narg,trperiod,line,mycall_12, &
endif endif
jz=ib-ia+1 jz=ib-ia+1
line(1:100)(1:1)=char(0) line(1:100)(1:1)=char(0)
if(npick.eq.2) then
call iscat(cdat2(ia),jz,3,40,t2,pick,cfile6,minsync,ntol, &
mousebutton,mode4,nafc,ndebug,psavg,nmax,nlines,line)
else
call iscat(cdat(ia),jz,3,40,t2,pick,cfile6,minsync,ntol, &
mousebutton,mode4,nafc,ndebug,psavg,maxlines,nlines,line)
endif
900 return 900 return
end subroutine fast_decode end subroutine fast_decode