From d68ef69e9e333207137353a688bc2208498a4c3f Mon Sep 17 00:00:00 2001
From: Steven Franke <s.j.franke@icloud.com>
Date: Fri, 7 Jun 2024 16:19:57 -0500
Subject: [PATCH] Change lower case nsps to upper case NSPS in
 sfox_wave_gfsk.f90.

---
 lib/superfox/sfox_wave_gfsk.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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.