From 5c5dba9198a1400587dd1f9d813db12e61aa5054 Mon Sep 17 00:00:00 2001 From: Petra Date: Wed, 6 Dec 2023 21:23:56 +1300 Subject: [PATCH] fmt --- 2023/src/day05b.f90 | 2 ++ 1 file changed, 2 insertions(+) diff --git a/2023/src/day05b.f90 b/2023/src/day05b.f90 index a184911..a3b2af9 100644 --- a/2023/src/day05b.f90 +++ b/2023/src/day05b.f90 @@ -156,6 +156,7 @@ program day5b print * print *, "Ranges after section ", sec print "(2i11)", t2_defs(1:2, 1:t2_n) + print *, "Number of ranges: ", t2_n if (is_iostat_end(istat)) then exit end if @@ -166,6 +167,7 @@ program day5b min_loc_val = t2_defs(1, t2_i) end if end do + print * print "(a, i11)", "Lowest location value: ", min_loc_val close(10)