Skip to content

Commit

Permalink
fix a bug in deter_sfc_gmi (NOAA-EMC#778)
Browse files Browse the repository at this point in the history
  • Loading branch information
@xincjin-NOAA
xincjin-NOAA committed Aug 13, 2024
1 parent c1eb61c commit 4120c1e
Show file tree
Hide file tree
Showing 2 changed files with 2 additions and 2 deletions.
2 changes: 1 addition & 1 deletion fix
Submodule fix updated 13 files
+0 −1 .gitignore
+0 −20 AIRS_CLDDET.NL
+0 −53 CRIS_CLDDET.NL
+0 −31 IASI_CLDDET.NL
+0 −84 anavinfo.rrfs_conv_dbz
+4 −10 convinfo.rrfs
+4 −4 global_anavinfo.l127.txt
+0 −137 global_anavinfo_soilanal.l127.txt
+5 −5 global_convinfo.txt
+0 −262 global_convinfo_2mObs.txt
+57 −57 global_ozinfo.txt
+235 −235 global_satinfo.txt
+0 −1 gsi_binary_files.cmake
2 changes: 1 addition & 1 deletion src/gsi/deter_sfc_mod.f90
View file
Original file line number Diff line number Diff line change
Expand Up @@ -1410,7 +1410,7 @@ subroutine deter_sfc_gmi(dlat_earth,dlon_earth,isflg)
n_grid=int(40000 / grid_dist) + 1
klatn = max(klat1 - n_grid, 1)
klonn = klon1 - n_grid
if (klonn < 0) klonn = nlon_sfc - klonn
if (klonn < 1) klonn = nlon_sfc - klonn
klatpn = min((klat1 + n_grid), nlat_sfc)
klonpn = klon1 + n_grid
if (klonpn > nlon_sfc) klonpn = klonpn - nlon_sfc
Expand Down

0 comments on commit 4120c1e

Please sign in to comment.