From 10aaec90e3309b77a6965c41193839c72ced7a3e Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Tue, 21 May 2019 12:09:17 -0400
Subject: [PATCH] FT4 decodes using jt9 from command line now use ndepth=3.

---
 lib/jt9.f90 | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/jt9.f90 b/lib/jt9.f90
index a0ffcda31..68984e33a 100644
--- a/lib/jt9.f90
+++ b/lib/jt9.f90
@@ -157,7 +157,7 @@ program jt9
      end do
      go to 999
   endif
-  
+
   iret=fftwf_init_threads()            !Initialize FFTW threading 
 
 ! Default to 1 thread, but use nthreads for the big ones
@@ -179,6 +179,7 @@ program jt9
      go to 999
   endif
 
+  if(mode.eq.5) ndepth=3
   allocate(shared_data)
   nflatten=0