From cc41ac6f39c592f8a24fb967ae1c8489818b7e85 Mon Sep 17 00:00:00 2001
From: Fredrik Jansson <fjansson@abo.fi>
Date: Mon, 11 Nov 2024 11:44:36 +0100
Subject: [PATCH] modgenstat: add diagnostic prints when dtav and timeav don't
 match

---
 src/modgenstat.f90 | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/modgenstat.f90 b/src/modgenstat.f90
index 66d1a1e9..4c3b1fe2 100644
--- a/src/modgenstat.f90
+++ b/src/modgenstat.f90
@@ -234,6 +234,8 @@ subroutine initgenstat
     dt_lim = min(dt_lim,tnext)
 
     if (abs(timeav/dtav-nsamples)>1e-4) then
+       write (*,*) timeav, dtav, nsamples, timeav/dtav-nsamples
+       write (*,*) itimeav, idtav, tres
       stop 'NAMGENSTAT: timeav must be a integer multiple of dtav'
     end if