From 8a541aa0ab104d3086d0dda65df6de44289145a2 Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Thu, 20 May 2021 12:57:41 -0400
Subject: [PATCH] Initialize npasses.

---
 lib/q65_decode.f90 | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/q65_decode.f90 b/lib/q65_decode.f90
index c5704da28..a0e814995 100644
--- a/lib/q65_decode.f90
+++ b/lib/q65_decode.f90
@@ -88,6 +88,7 @@ contains
     npts=ntrperiod*12000
     nfft1=ntrperiod*12000
     nfft2=ntrperiod*6000
+    npasses=1
 
 ! Determine the T/R sequence: iseq=0 (even), or iseq=1 (odd)
     n=nutc