Add comment explaining the read_noscm flag

slevis-lmwg · Jan 24, 2025 · 5f8d812 · 5f8d812
1 parent af8cd54
commit 5f8d812
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/src/init_interp/initInterp.F90 b/src/init_interp/initInterp.F90
@@ -959,6 +959,10 @@ subroutine read_var_double(ncid, varname, data, dim1name, use_glob, allow_scm)
       if (allow_scm) then
          readflag='read'
       else
+         ! Flag to distinguish the times during IC interpolation when running in single column mode but
+         ! need to read the full data grid. Normally single_column means
+         ! "read the data grid and extract the closest column" but
+         ! during IC interpolation you need to read in the full grid to be interpolated regardless of the single_column flag.
          readflag='read_noscm'
       endif
 
@@ -985,6 +989,10 @@ subroutine read_var_int(ncid, varname, data, dim1name, use_glob, allow_scm)
       if (allow_scm) then
          readflag='read'
       else
+         ! Flag to distinguish the times during IC interpolation when running in single column mode but
+         ! need to read the full data grid. Normally single_column means
+         ! "read the data grid and extract the closest column" but
+         ! during IC interpolation you need to read in the full grid to be interpolated regardless of the single_column flag.
          readflag='read_noscm'
       endif