From d7981738fec99fa33ecb2d2ea1f0026a5f2db402 Mon Sep 17 00:00:00 2001
From: Brian Moran <brian@trucentive.com>
Date: Tue, 13 Aug 2024 18:00:38 -0700
Subject: [PATCH] use age calculation consistently

---
 lib/decoder.f90 | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lib/decoder.f90 b/lib/decoder.f90
index fe6a31676..acac2b54d 100644
--- a/lib/decoder.f90
+++ b/lib/decoder.f90
@@ -180,14 +180,15 @@ subroutine multimode_decoder(ss,id2,params,nfsample)
         else
            do i=1,nfox
               n=n30fox(i)
-              if(n30-n30fox(i).le.4) then
+              nage=min(99,mod(n30-n+288000,2880))
+              if(nage.le.4) then
                  j=j+1
                  c2fox(j)=c2fox(i)
                  g2fox(j)=g2fox(i)
                  nsnrfox(j)=nsnrfox(i)
                  nfreqfox(j)=nfreqfox(i)
                  n30fox(j)=n
-                 nage=min(99,mod(n30-n+288000,2880))
+                 ! nage=min(99,mod(n30-n+288000,2880))
                  if(len(trim(g2fox(j))).eq.4) then
                     call azdist(mygrid,g2fox(j)//'  ',0.d0,nAz,nEl,nDmiles, &
                          nDkm,nHotAz,nHotABetter)