fmt
parent
6fbf94efc8
commit
5c5dba9198
|
@ -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)
|
||||
|
|
Loading…
Reference in New Issue