Skip to content

Commit

Permalink
UPP refactor phase 2 from Jesse Meng (#224)
Browse files Browse the repository at this point in the history
* 20200820 Jesse Meng refactor branch of remove goto remove grib1

* 20200901 Jesse Meng remove redundant LAI output in SURFCE.f

* 20200901 Jesse Meng continue merging refactor to develop

* 20200911 Jesse Meng add precisions to selected variables

* 20200911 Jesse Meng revert the precision changes

* 20200924 Jesse Meng update with EMC_post/develop

* 20201105 Jesse Meng merge with NOAA-EMC/EMC_post PR#196
eed90f5

* 20201105 Jesse Meng sync with EMC_POST/develop

* 20201106 Jesse Meng add module UPP_MATH

* 20201113 Jesse Meng add UPP_MATH and UPP_PHYSICS modules and updated with #219

* 20201113 Jesse Meng updated CMakeLists.txt with EMC_post/develop

* 20201113 Jesse Meng fix sorc/ncep_post.fd/CMakeLists.txt for added/removed files

* 20201130 Jesse Meng update modules, move GRIDAVG.f inside module UPP_MATH

* 20201215 Jesse Meng fix EXCH() options in CALVOR and UPP_MATH

* 20201215 Jesse Meng merge with EMC_post/develop

* 20201215 Jesse Meng minor clean up as suggested by reviewers

* 20201218 Jesse Meng revised RH unification
fv3, fv3r, nmmb, use CALRH_NAM
hrrr, rap, use CALRH_GSD

* 20201222 Jesse Meng convert UPP_MATH UPP_PHYSICS docblocks to doxygen format

* 20201223 Jesse Meng minor revision style tweaking

* 20201223 Jesse Meng fix redundance which costs nmmb runtime

Co-authored-by: wx22mj <Jesse.Meng@m71a1.ncep.noaa.gov>
Co-authored-by: wx22mj <Jesse.Meng@m71a3.ncep.noaa.gov>
Co-authored-by: wx22mj <Jesse.Meng@v71a1.ncep.noaa.gov>
Co-authored-by: wx22mj <Jesse.Meng@m71a2.ncep.noaa.gov>
Co-authored-by: wx22mj <Jesse.Meng@m72a1.ncep.noaa.gov>
Co-authored-by: wx22mj <Jesse.Meng@v71a3.ncep.noaa.gov>
Co-authored-by: wx22mj <Jesse.Meng@v72a1.ncep.noaa.gov>
  • Loading branch information
8 people committed Dec 29, 2020
1 parent 194d4a1 commit 29341ff
Show file tree
Hide file tree
Showing 39 changed files with 2,029 additions and 1,814 deletions.
6 changes: 6 additions & 0 deletions sorc/ncep_post.fd/ALLOCATE_ALL.f
Original file line number Diff line number Diff line change
Expand Up @@ -14,6 +14,7 @@
!! SU diagnostic fields
!! - 19-07-24 Li(Kate) Zhang - Merge and update NGAC UPP for FV3-Chem
!! - 19-11-23 Wen Meng - Add sea ice skin T
!! - 20-11-06 Jesse Meng - Add UPP_MATH module variables
!!
!! OUTPUT FILES:
!! - STDOUT - RUN TIME STANDARD OUT.
Expand All @@ -30,6 +31,7 @@ SUBROUTINE ALLOCATE_ALL()
use vrbls2d
use soil
use masks
use upp_math, only: ddvdx, ddudy, uuavg
!
!use params_mod
use ctlblk_mod
Expand Down Expand Up @@ -533,5 +535,9 @@ SUBROUTINE ALLOCATE_ALL()
allocate(acswupt(im,jsta_2l:jend_2u))
allocate(swdnt(im,jsta_2l:jend_2u))
allocate(acswdnt(im,jsta_2l:jend_2u))
! UPP_MATH MODULE DIFFERENTIAL EQUATIONS
allocate(ddvdx(im,jsta_2l:jend_2u))
allocate(ddudy(im,jsta_2l:jend_2u))
allocate(uuavg(im,jsta_2l:jend_2u))
!
end
3 changes: 2 additions & 1 deletion sorc/ncep_post.fd/BNDLYR.f
Original file line number Diff line number Diff line change
Expand Up @@ -30,6 +30,7 @@
!! 98-12-22 MIKE BALDWIN - BACK OUT RH OVER ICE
!! 00-01-04 JIM TUCCILLO - MPI VERSION
!! 02-01-15 MIKE BALDWIN - WRF VERSION
!! 20-11-10 JESSE MENG - USE UPP_PHYSICS MODULE
!!
!! USAGE: CALL BNDLYR(PBND,TBND,QBND,RHBND,UBND,VBND,
!! WBND,OMGBND,PWTBND,QCNVBND)
Expand Down Expand Up @@ -74,12 +75,12 @@ SUBROUTINE BNDLYR(PBND,TBND,QBND,RHBND,UBND,VBND, &
jsta_m, jend_m, im, nbnd
use physcons_post, only: con_rd, con_rv, con_eps, con_epsm1
use gridspec_mod, only: gridtype
use upp_physics, only: FPVSNEW
!
implicit none
!
! DECLARE VARIABLES.
!
real,external :: FPVSNEW
real,PARAMETER :: DPBND=30.E2
integer, dimension(IM,jsta:jend,NBND),intent(inout) :: LVLBND
real, dimension(IM,jsta:jend,NBND),intent(inout) :: PBND,TBND, &
Expand Down
Loading

0 comments on commit 29341ff

Please sign in to comment.