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

Fix a bug that didn't show up when I compiled on the Mac.

Browse Source
This commit is contained in:
Steve Franke 2019-04-12 18:54:33 -05:00
parent cd8ea16f40
commit f296e37630
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/ft8/gen_ft8wave.f90
View File

@ -9,7 +9,7 @@ subroutine gen_ft8wave(itone,nsym,nsps,bt,fsample,f0,cwave,wave,icmplx,nwave)
real pulse(23040) real pulse(23040)
real dphi(0:(nsym+2)*nsps-1) real dphi(0:(nsym+2)*nsps-1)
integer itone(nsym) integer itone(nsym)
data first/.true./,ibt0/0/ data ibt0/0/
save pulse,twopi,dt,hmod,ibt0 save pulse,twopi,dt,hmod,ibt0
ibt=nint(10*bt) ibt=nint(10*bt)