From 5f950ca05e08a80e08f22bc4279d665514c2f501 Mon Sep 17 00:00:00 2001
From: Jorn Bruggeman <jorn@bolding-bruggeman.com>
Date: Tue, 17 Oct 2023 16:09:45 +0100
Subject: [PATCH] input: initialize number of observed scalars read to 0

---
 src/input/input.F90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/input/input.F90 b/src/input/input.F90
index 6bf88eddf..bdee71de8 100644
--- a/src/input/input.F90
+++ b/src/input/input.F90
@@ -113,7 +113,7 @@ module input
       integer                             :: secs2 = 0
       integer                             :: unit = -1
       integer                             :: lines = 0
-      integer                             :: n
+      integer                             :: n = 0
       type (type_scalar_input_list)       :: variables
       type (type_timeseries_file),pointer :: next => null()
    contains