mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2026-08-01 16:37:31 -04:00
Tweak msk144sim.f90
This commit is contained in:
+3
-3
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user