From 7d8896a2548fcacfedba04e7b6137f8c2108cfb2 Mon Sep 17 00:00:00 2001 From: Eric James Date: Tue, 20 Aug 2024 20:09:36 +0000 Subject: [PATCH] Updates to enable output of VEGMIN and VEGMAX from RRFS. --- parm/postxconfig-NT-rrfs.txt | 86 ++++++++++++++++++++++++++++- parm/rrfs_postcntrl.xml | 10 ++++ sorc/ncep_post.fd/INITPOST_NETCDF.f | 12 +++- 3 files changed, 106 insertions(+), 2 deletions(-) diff --git a/parm/postxconfig-NT-rrfs.txt b/parm/postxconfig-NT-rrfs.txt index 152ff9b2c..8e1b47fe7 100644 --- a/parm/postxconfig-NT-rrfs.txt +++ b/parm/postxconfig-NT-rrfs.txt @@ -1,7 +1,7 @@ 4 5 3 -229 +231 278 PRSLEV 32769 @@ -20237,6 +20237,90 @@ surface ? ? ? +726 +VEG_MIN_ON_SURFACE +? +1 +tmpl4_0 +VEGMIN +NCEP +? +surface +0 +? +0 +? +? +0 +? +0 +? +? +? +? +0 +0.0 +0 +0.0 +? +0 +0.0 +0 +0.0 +0 +0.0 +0 +0.0 +1 +3.0 +0 +0 +0 +? +? +? +729 +VEG_MAX_ON_SURFACE +? +1 +tmpl4_0 +VEGMAX +NCEP +? +surface +0 +? +0 +? +? +0 +? +0 +? +? +? +? +0 +0.0 +0 +0.0 +? +0 +0.0 +0 +0.0 +0 +0.0 +0 +0.0 +1 +3.0 +0 +0 +0 +? +? +? 262 INST_CSDSF_ON_SURFACE ? diff --git a/parm/rrfs_postcntrl.xml b/parm/rrfs_postcntrl.xml index 6d47e84ee..139ac97a7 100755 --- a/parm/rrfs_postcntrl.xml +++ b/parm/rrfs_postcntrl.xml @@ -3198,6 +3198,16 @@ -3.0 + + VEG_MIN_ON_SURFACE + 3.0 + + + + VEG_MAX_ON_SURFACE + 3.0 + + INST_CSDSF_ON_SURFACE CSDSF diff --git a/sorc/ncep_post.fd/INITPOST_NETCDF.f b/sorc/ncep_post.fd/INITPOST_NETCDF.f index 38c40c395..5e61e307d 100644 --- a/sorc/ncep_post.fd/INITPOST_NETCDF.f +++ b/sorc/ncep_post.fd/INITPOST_NETCDF.f @@ -92,7 +92,7 @@ SUBROUTINE INITPOST_NETCDF(ncid2d,ncid3d) uz0, vz0, ptop, htop, pbot, hbot, ptopl, pbotl, ttopl, ptopm, pbotm, ttopm, & ptoph, pboth, pblcfr, ttoph, runoff, tecan, tetran, tedir, twa, maxtshltr, & mintshltr, maxrhshltr, fdnsst, acgraup, graup_bucket, acfrain, frzrn_bucket, & - snow_acm, snow_bkt, snownc, graupelnc, qrmax, swddif, swddni, xlaixy, & + snow_acm, snow_bkt, snownc, graupelnc, qrmax, swddif, swddni, xlaixy, shdmin, shdmax,& minrhshltr, dzice, smcwlt, suntime, fieldcapa, htopd, hbotd, htops, hbots, & cuppt, dusmass, ducmass, dusmass25, ducmass25, aswintoa,rel_vort_maxhy1, & maxqshltr, minqshltr, acond, sr, u10h, v10h,refd_max, w_up_max, w_dn_max, & @@ -2796,6 +2796,16 @@ SUBROUTINE INITPOST_NETCDF(ncid2d,ncid3d) call read_netcdf_2d_para(ncid2d,ista,ista_2l,iend,iend_2u,jsta,jsta_2l,jend,jend_2u, & spval,VarName,xlaixy) +! leaf area index + VarName='shdmin' + call read_netcdf_2d_para(ncid2d,ista,ista_2l,iend,iend_2u,jsta,jsta_2l,jend,jend_2u, & + spval,VarName,shdmin) + +! leaf area index + VarName='shdmax' + call read_netcdf_2d_para(ncid2d,ista,ista_2l,iend,iend_2u,jsta,jsta_2l,jend,jend_2u, & + spval,VarName,shdmax) + ! time averaged incoming sfc uv-b using getgb VarName='duvb_ave' call read_netcdf_2d_para(ncid2d,ista,ista_2l,iend,iend_2u,jsta,jsta_2l,jend,jend_2u, &