diff --git a/examples/uniq.f90 b/examples/uniq.f90
index 63b67c8bd033d960c8ddad7c41be3634295f5bb9..7f98bacc8e34265a324d11f054ce200e10aa5fd4 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)