w4kek
/
WSJT-X
mirror of https://github.com/saitohirga/WSJT-X.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Eliminate an unnecessary variable (NN2) in fst240sim.f90.

This commit is contained in:
Steven Franke 2020-07-13 19:59:14 -05:00
parent a19d5d1556
commit c5f0187036
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lib/fst240/fst240sim.f90
View File

@ -59,8 +59,7 @@ program fst240sim
baud=12000.0/nsps !Keying rate (baud)
nmax=nsec*12000
nz=nsps*NN
nz2=nsps*NN2
txt=nz2*dt !Transmission length (s)
txt=nz*dt !Transmission length (s)
tt=nsps*dt !Duration of symbols (s)
allocate( c0(0:nmax-1) )
allocate( c(0:nmax-1) )