Update utils_mod.F90

finalized
NOAA-EMC · Feb 13, 2025 · 5f48581 · 5f48581
1 parent 67c3d52
commit 5f48581
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/ocnicepost.fd/utils_mod.F90 b/src/ocnicepost.fd/utils_mod.F90
@@ -609,7 +609,7 @@ subroutine write_grib2_2d(fname, gcf, dims, nflds, field, rgmask2d, vfill)
        integer(4) :: fortime, dij, npt
        CHARACTER(len=1),allocatable,dimension(:) :: cgrib
        real(4) :: tmpfld(size(field,1))
-k
+
        ! GRIB2 metadata arrays
        integer(4) :: listsec0(2), listsec1(13)
        integer(4) :: igdtnum, ipdtnum, idrtnum