Skip to content

Commit

Permalink
Fix bug in chgres_cube/sst_guess routine to correctly
Browse files Browse the repository at this point in the history
work for all points poleward of 60 degrees.

Part of ufs-community#279
Fixes ufs-community#441
  • Loading branch information
GeorgeGayno-NOAA committed Apr 20, 2021
1 parent 518b437 commit d69114e
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion sorc/chgres_cube.fd/search_util.F90
Original file line number Diff line number Diff line change
Expand Up @@ -230,7 +230,7 @@ subroutine sst_guess(latitude, sst)

real(esmf_kind_r8), intent(out) :: sst

if (latitude >= 60.0) then
if (abs(latitude) >= 60.0) then
sst = 273.16
elseif (abs(latitude) <= 30.0) then
sst = 300.0
Expand Down

0 comments on commit d69114e

Please sign in to comment.