add ndepth and npass to ft8d.f90

2018-03-26 08:37:27 +02:00 · 2018-03-26 08:37:27 +02:00 · 17fb21b427
parent 6dd9970544
commit 17fb21b427
1 changed files with 3 additions and 1 deletions
--- a/ft8d.f90
+++ b/ft8d.f90
@ -48,7 +48,9 @@ program ft8d
    ndecodes=0
    allmessages='                      '
    allsnrs=0
-    do ipass=1,3
+    ndepth=1
+    npass=1
+    do ipass=1,npass
      newdat=.true.
      syncmin=1.5
      if(ipass.eq.1) then