Fix the starting frequency for multiple simulated signals.

This commit is contained in:
Joe Taylor 2023-02-15 15:50:26 -05:00
parent 6877a87fe4
commit b5f9e0ff03

View File

@ -152,7 +152,7 @@ program q65sim
n=65.0*baud*mode65/100.0 + 0.9999
nfstep=100*n
nf1=1500 - nfstep*nsig/2
nf1=1500 - nfstep*(nsig-1)/2
do n=1,nsig
if(nsig.ge.2) then
f0=nf1 + (n-1)*nfstep