Initialize npasses.

This commit is contained in:
Joe Taylor 2021-05-20 12:57:41 -04:00
parent c78e43e960
commit 8a541aa0ab

View File

@ -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