From 8ddf3f8accdaa949d93e65ac13b795a6f50517f3 Mon Sep 17 00:00:00 2001
From: Steve Franke <s.j.franke@icloud.com>
Date: Sat, 9 Mar 2019 09:13:26 -0600
Subject: [PATCH] Change default to DT=0.14 s for simulated wav files.

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

diff --git a/lib/ft4/ft4sim.f90 b/lib/ft4/ft4sim.f90
index a8b5975a2..0a9a1dcbc 100644
--- a/lib/ft4/ft4sim.f90
+++ b/lib/ft4/ft4sim.f90
@@ -110,7 +110,7 @@ program ft4sim
   c0((NN+1)*NSPS:(NN+2)*NSPS-1)=c0((NN+1)*NSPS:(NN+2)*NSPS-1)*(1.0+cos(twopi*(/(i,i=0,NSPS-1)/)/(2.0*NSPS) ))/2.0
   c0((NN+2)*NSPS:)=0.
 
-  k=nint((xdt+0.25)/dt)
+  k=nint((xdt+0.14)/dt)
   c0=cshift(c0,-k)
   ia=k