From cdb3d04564c69b1c9c2ac6c2818ef266d0b1cd15 Mon Sep 17 00:00:00 2001 From: Sergey Kosukhin <sergey.kosukhin@mpimet.mpg.de> Date: Fri, 17 Jan 2025 09:44:19 +0100 Subject: [PATCH] Address a warning from gfortran 12 --- examples/uniq.f90 | 2 ++ 1 file changed, 2 insertions(+) diff --git a/examples/uniq.f90 b/examples/uniq.f90 index 63b67c8b..7f98bacc 100644 --- a/examples/uniq.f90 +++ b/examples/uniq.f90 @@ -88,6 +88,8 @@ PROGRAM output_test CALL remove_duplicate_intervals(begin_str, end_str, intvl_str, nintvls, indices_to_use, remaining_intvls) n_event_steps = 0 + n_event_steps_a = 0 + n_event_steps_b = 0 tmp_jd => newJulianday(0_i8, 0_i8) ALLOCATE (mtime_date_container_a(256), stat=ierrstat) -- GitLab