From a17a5193241c26c7c0137a0454c58bfb48557594 Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Mon, 19 Oct 2020 18:49:52 -0400
Subject: [PATCH] Send QRA65 navg to the callback routine.

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

diff --git a/lib/qra_loops.f90 b/lib/qra_loops.f90
index 3c9c2f1c3..0679e4d88 100644
--- a/lib/qra_loops.f90
+++ b/lib/qra_loops.f90
@@ -135,6 +135,7 @@ subroutine qra_loops(c00,npts2,mode,mode64,nsubmode,nFadingModel,      &
      !###  
      nsave=0
      s3avg=0.
+     irc=irc + 100*navg
   endif
   return
 end subroutine qra_loops