Add debug print within prefetch loop

Signed-off-by: Lizzie Lundgren <[email protected]>
geoschem · May 1, 2024 · 4481ed3 · 4481ed3
1 parent 850f20a
commit 4481ed3
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/gridcomps/ExtData/ExtDataGridCompMod.F90 b/gridcomps/ExtData/ExtDataGridCompMod.F90
@@ -4701,6 +4701,7 @@ subroutine MAPL_ExtDataPrefetch(IOBundles,rc)
 
      do n = 1, nfiles
         io_bundle => IOBundles%at(n)
+        call lgr%debug("prefetch loop: %i4 of %i4, %a",n, nfiles, trim(io_bundle%file_name))
         call io_bundle%cfio%request_data_from_file(io_bundle%file_name,io_bundle%time_index,rc=status)
         _VERIFY(status)
      enddo