Skip to content

Reg latlon update #29

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
WenMeng-NOAA merged 6 commits into from
Dec 13, 2019
Merged

Reg latlon update #29

Changes from all commits
Commits
Show all changes
6 commits
Select commit Hold shift + click to select a range
f94fbf5
update modules for jet
JiliDong-NOAA Sep 20, 2019
534e912
Merge pull request #1 from NOAA-EMC/develop
JiliDong-NOAA Sep 24, 2019
e041018
Merge branch 'develop' into develop
WenMeng-NOAA Sep 29, 2019
16c8a43
Merge remote-tracking branch 'upstream/develop' into develop
JiliDong-NOAA Oct 8, 2019
b090122
Merge remote-tracking branch 'upstream/develop' into develop
JiliDong-NOAA Dec 10, 2019
6eb4deb
update for regular lat-lon grids to FV3 output change on coordinate
JiliDong-NOAA Dec 11, 2019
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
12 changes: 12 additions & 0 deletions sorc/ncep_post.fd/INITPOST_NETCDF.f
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -531,6 +531,18 @@ SUBROUTINE INITPOST_NETCDF(ncid3d)
end do
lonstart = nint(glon1d(1)*gdsdegr)
lonlast = nint(glon1d(im)*gdsdegr)

! Jili Dong add support for regular lat lon (2019/03/22) start
if (MAPTYPE .eq. 0) then
if(lonstart<0.)then
lonstart=lonstart+360.*gdsdegr
end if
if(lonlast<0.)then
lonlast=lonlast+360.*gdsdegr
end if
end if
! Jili Dong add support for regular lat lon (2019/03/22) end

else if(numDims==2)then
Status=nf90_get_var(ncid3d,varid,dummy)
if(maxval(abs(dummy))<2.0*pi)convert_rad_to_deg=.true.
Expand Down