diff --git a/lib/superfox/sfox_wave_gfsk.f90 b/lib/superfox/sfox_wave_gfsk.f90 index 612a62bd3..c0bd094c9 100644 --- a/lib/superfox/sfox_wave_gfsk.f90 +++ b/lib/superfox/sfox_wave_gfsk.f90 @@ -26,7 +26,7 @@ subroutine sfox_wave_gfsk(fname) hmod=1.0 dphi_peak=twopi*hmod/real(NSPS) do i=1,3*NSPS - tt=(i-1.5*nsps)/real(nsps) + tt=(i-1.5*NSPS)/real(NSPS) pulse(i)=gfsk_pulse(BT,tt) enddo first=.false.