w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-04-04 10:28:33 -04:00
Code Issues Packages Projects Releases Wiki Activity

Tweak msk144sim.f90

Browse Source
This commit is contained in:
Steve Franke 2018-09-20 10:10:29 -05:00
parent e1c74fd828
commit 981c0122ae
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lib/msk144sim.f90
View File

@ -41,9 +41,9 @@ program msk144sim
write(*,*) 'Requested message: ',msg
write(*,*) 'Message sent : ',msgsent
write(*,*) 'Tones: '
write(*,'(72i1)') itone(1:72)
write(*,'(72i1)') itone(72:144)
write(*,*) itype
write(*,'(1x,72i1)') itone(1:72)
write(*,'(1x,72i1)') itone(73:144)
twopi=8.d0*atan(1.d0)
nsym=144
nsps=6*nslow