1 integer, parameter :: NTMAX=30*60
2 integer, parameter :: NMAX=NTMAX*12000 !Total sample intervals (one minute)
3 integer, parameter :: NDMAX=NTMAX*1500 !Sample intervals at 1500 Hz rate
4 integer, parameter :: NSMAX=6827 !Max length of saved spectra
5 integer, parameter :: MAXFFT3=16384
6