include file: em_nest_interpdown_interp.inc 1
<HTML> <BODY BGCOLOR=#ccccdd LINK=#0000aa VLINK=#0000ff ALINK=#ff0000 ><BASE TARGET="bottom_target"><PRE>
<A href='../../html_code/include/em_nest_interpdown_interp.inc.html' TARGET='top_target'><IMG SRC="../../gif/bar_grey.gif" border=0></A><a name='em_nest_interpdown_interp.inc'>
include file: em_nest_interpdown_interp.inc 1
!STARTOFREGISTRYGENERATEDINCLUDE 'inc/em_nest_interpdown_interp.inc'
!
! WARNING This file is generated automatically by use_registry
! using the data base in the file named Registry.
! Do not edit. Your changes to this file will be lost.
!
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_FCNM'>interp_fcnm</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCNM_1"> ( &
lu_index, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%lu_index, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_1"> ( &
u_2, & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( (ckde-1), ckpe ), cjps, cjpe, & ! CD dims
ngrid%em_u_2, & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( (nkde-1), nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_xstag, & ! stencil half width
.TRUE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_2"> ( &
v_2, & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( (ckde-1), ckpe ), cjps, cjpe, & ! CD dims
ngrid%em_v_2, & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( (nkde-1), nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_ystag, & ! stencil half width
.FALSE., .TRUE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_3"> ( &
w_2, & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( ckde, ckpe ), cjps, cjpe, & ! CD dims
ngrid%em_w_2, & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( nkde, nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_4"> ( &
ph_2, & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( ckde, ckpe ), cjps, cjpe, & ! CD dims
ngrid%em_ph_2, & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( nkde, nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_5"> ( &
phb, & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( ckde, ckpe ), cjps, cjpe, & ! CD dims
ngrid%em_phb, & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( nkde, nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_6"> ( &
t_2, & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( (ckde-1), ckpe ), cjps, cjpe, & ! CD dims
ngrid%em_t_2, & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( (nkde-1), nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_7"> ( &
mu_2, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%em_mu_2, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_8"> ( &
mub, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%em_mub, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_9"> ( &
mu0, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%em_mu0, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_10"> ( &
alb, & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( (ckde-1), ckpe ), cjps, cjpe, & ! CD dims
ngrid%em_alb, & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( (nkde-1), nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_11"> ( &
pb, & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( (ckde-1), ckpe ), cjps, cjpe, & ! CD dims
ngrid%em_pb, & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( (nkde-1), nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
IF ( P_qv .GE. PARAM_FIRST_SCALAR ) THEN
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_12"> ( &
moist(grid%sm31,grid%sm32,grid%sm33,P_qv), & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( (ckde-1), ckpe ), cjps, cjpe, & ! CD dims
ngrid%moist(ngrid%sm31,ngrid%sm32,ngrid%sm33,P_qv), & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( (nkde-1), nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
ENDIF
IF ( P_qc .GE. PARAM_FIRST_SCALAR ) THEN
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_13"> ( &
moist(grid%sm31,grid%sm32,grid%sm33,P_qc), & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( (ckde-1), ckpe ), cjps, cjpe, & ! CD dims
ngrid%moist(ngrid%sm31,ngrid%sm32,ngrid%sm33,P_qc), & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( (nkde-1), nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
ENDIF
IF ( P_qr .GE. PARAM_FIRST_SCALAR ) THEN
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_14"> ( &
moist(grid%sm31,grid%sm32,grid%sm33,P_qr), & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( (ckde-1), ckpe ), cjps, cjpe, & ! CD dims
ngrid%moist(ngrid%sm31,ngrid%sm32,ngrid%sm33,P_qr), & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( (nkde-1), nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
ENDIF
IF ( P_qi .GE. PARAM_FIRST_SCALAR ) THEN
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_15"> ( &
moist(grid%sm31,grid%sm32,grid%sm33,P_qi), & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( (ckde-1), ckpe ), cjps, cjpe, & ! CD dims
ngrid%moist(ngrid%sm31,ngrid%sm32,ngrid%sm33,P_qi), & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( (nkde-1), nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
ENDIF
IF ( P_qs .GE. PARAM_FIRST_SCALAR ) THEN
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_16"> ( &
moist(grid%sm31,grid%sm32,grid%sm33,P_qs), & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( (ckde-1), ckpe ), cjps, cjpe, & ! CD dims
ngrid%moist(ngrid%sm31,ngrid%sm32,ngrid%sm33,P_qs), & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( (nkde-1), nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
ENDIF
IF ( P_qg .GE. PARAM_FIRST_SCALAR ) THEN
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_17"> ( &
moist(grid%sm31,grid%sm32,grid%sm33,P_qg), & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( (ckde-1), ckpe ), cjps, cjpe, & ! CD dims
ngrid%moist(ngrid%sm31,ngrid%sm32,ngrid%sm33,P_qg), & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( (nkde-1), nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
ENDIF
IF ( P_qni .GE. PARAM_FIRST_SCALAR ) THEN
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_18"> ( &
scalar(grid%sm31,grid%sm32,grid%sm33,P_qni), & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( (ckde-1), ckpe ), cjps, cjpe, & ! CD dims
ngrid%scalar(ngrid%sm31,ngrid%sm32,ngrid%sm33,P_qni), & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( (nkde-1), nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
ENDIF
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_FCNM'>interp_fcnm</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCNM_2"> ( &
landmask, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%landmask, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_MASK_LAND_FIELD'>interp_mask_land_field</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_MASK_LAND_FIELD_1"> ( &
tslb, & ! CD field
cids, cide, 1, config_flags%num_soil_layers, cjds, cjde, & ! CD dims
cims, cime, 1, config_flags%num_soil_layers, cjms, cjme, & ! CD dims
cips, cipe, 1, config_flags%num_soil_layers, cjps, cjpe, & ! CD dims
ngrid%tslb, & ! ND field
nids, nide, 1, config_flags%num_soil_layers, njds, njde, & ! ND dims
nims, nime, 1, config_flags%num_soil_layers, njms, njme, & ! ND dims
nips, nipe, 1, config_flags%num_soil_layers, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
,lu_index,ngrid%lu_index &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_MASK_LAND_FIELD'>interp_mask_land_field</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_MASK_LAND_FIELD_2"> ( &
smois, & ! CD field
cids, cide, 1, config_flags%num_soil_layers, cjds, cjde, & ! CD dims
cims, cime, 1, config_flags%num_soil_layers, cjms, cjme, & ! CD dims
cips, cipe, 1, config_flags%num_soil_layers, cjps, cjpe, & ! CD dims
ngrid%smois, & ! ND field
nids, nide, 1, config_flags%num_soil_layers, njds, njde, & ! ND dims
nims, nime, 1, config_flags%num_soil_layers, njms, njme, & ! ND dims
nips, nipe, 1, config_flags%num_soil_layers, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
,lu_index,ngrid%lu_index &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_MASK_LAND_FIELD'>interp_mask_land_field</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_MASK_LAND_FIELD_3"> ( &
sh2o, & ! CD field
cids, cide, 1, config_flags%num_soil_layers, cjds, cjde, & ! CD dims
cims, cime, 1, config_flags%num_soil_layers, cjms, cjme, & ! CD dims
cips, cipe, 1, config_flags%num_soil_layers, cjps, cjpe, & ! CD dims
ngrid%sh2o, & ! ND field
nids, nide, 1, config_flags%num_soil_layers, njds, njde, & ! ND dims
nims, nime, 1, config_flags%num_soil_layers, njms, njme, & ! ND dims
nips, nipe, 1, config_flags%num_soil_layers, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
,lu_index,ngrid%lu_index &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_MASK_WATER_FIELD'>interp_mask_water_field</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_MASK_WATER_FIELD_1"> ( &
xice, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%xice, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
,lu_index,ngrid%lu_index &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_MASK_LAND_FIELD'>interp_mask_land_field</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_MASK_LAND_FIELD_4"> ( &
smstav, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%smstav, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
,lu_index,ngrid%lu_index &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_MASK_LAND_FIELD'>interp_mask_land_field</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_MASK_LAND_FIELD_5"> ( &
sfcrunoff, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%sfcrunoff, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
,lu_index,ngrid%lu_index &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_MASK_LAND_FIELD'>interp_mask_land_field</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_MASK_LAND_FIELD_6"> ( &
udrunoff, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%udrunoff, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
,lu_index,ngrid%lu_index &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_FCNI'>interp_fcni</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCNI_1"> ( &
ivgtyp, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%ivgtyp, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_FCNI'>interp_fcni</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCNI_2"> ( &
isltyp, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%isltyp, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_MASK_LAND_FIELD'>interp_mask_land_field</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_MASK_LAND_FIELD_7"> ( &
vegfra, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%vegfra, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
,lu_index,ngrid%lu_index &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_MASK_LAND_FIELD'>interp_mask_land_field</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_MASK_LAND_FIELD_8"> ( &
acsnow, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%acsnow, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
,lu_index,ngrid%lu_index &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_MASK_LAND_FIELD'>interp_mask_land_field</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_MASK_LAND_FIELD_9"> ( &
acsnom, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%acsnom, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
,lu_index,ngrid%lu_index &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_MASK_LAND_FIELD'>interp_mask_land_field</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_MASK_LAND_FIELD_10"> ( &
snow, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%snow, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
,lu_index,ngrid%lu_index &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_MASK_LAND_FIELD'>interp_mask_land_field</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_MASK_LAND_FIELD_11"> ( &
snowh, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%snowh, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
,lu_index,ngrid%lu_index &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_MASK_LAND_FIELD'>interp_mask_land_field</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_MASK_LAND_FIELD_12"> ( &
canwat, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%canwat, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
,lu_index,ngrid%lu_index &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_MASK_WATER_FIELD'>interp_mask_water_field</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_MASK_WATER_FIELD_2"> ( &
sst, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%sst, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
,lu_index,ngrid%lu_index &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_19"> ( &
f_ice_phy, & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( (ckde-1), ckpe ), cjps, cjpe, & ! CD dims
ngrid%f_ice_phy, & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( (nkde-1), nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_20"> ( &
f_rain_phy, & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( (ckde-1), ckpe ), cjps, cjpe, & ! CD dims
ngrid%f_rain_phy, & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( (nkde-1), nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_21"> ( &
f_rimef_phy, & ! CD field
cids, cide, ckds, ckde, cjds, cjde, & ! CD dims
cims, cime, ckms, ckme, cjms, cjme, & ! CD dims
cips, cipe, ckps, MIN( (ckde-1), ckpe ), cjps, cjpe, & ! CD dims
ngrid%f_rimef_phy, & ! ND field
nids, nide, nkds, nkde, njds, njde, & ! ND dims
nims, nime, nkms, nkme, njms, njme, & ! ND dims
nips, nipe, nkps, MIN( (nkde-1), nkpe ), njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_22"> ( &
msft, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%msft, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_23"> ( &
msfu, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%msfu, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_xstag, & ! stencil half width
.TRUE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_24"> ( &
msfv, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%msfv, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_ystag, & ! stencil half width
.FALSE., .TRUE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_25"> ( &
f, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%f, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_26"> ( &
e, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%e, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_27"> ( &
sina, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%sina, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_28"> ( &
cosa, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%cosa, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_29"> ( &
ht, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%ht, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_30"> ( &
tsk, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%tsk, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_31"> ( &
rainc, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%rainc, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_32"> ( &
rainnc, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%rainnc, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_33"> ( &
xlat, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%xlat, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/module_interp_fcn.F.html#INTERP_FCN'>interp_fcn</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCN_34"> ( &
xlong, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%xlong, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_MASK_LAND_FIELD'>interp_mask_land_field</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_MASK_LAND_FIELD_13"> ( &
tmn, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%tmn, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
,lu_index,ngrid%lu_index &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_FCNM'>interp_fcnm</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_FCNM_3"> ( &
xland, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%xland, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
)
CALL <A href='../../html_code/share/interp_fcn.F.html#INTERP_MASK_LAND_FIELD'>interp_mask_land_field</A><A href='../../html_code/include/em_nest_interpdown_interp.inc.html#em_nest_interpdown_interp.inc' TARGET='bottom_target'><IMG SRC="../../gif/cyan.gif" border=0></a><A NAME="INTERP_MASK_LAND_FIELD_14"> ( &
snowc, & ! CD field
cids, cide, 1, 1, cjds, cjde, & ! CD dims
cims, cime, 1, 1, cjms, cjme, & ! CD dims
cips, cipe, 1, 1, cjps, cjpe, & ! CD dims
ngrid%snowc, & ! ND field
nids, nide, 1, 1, njds, njde, & ! ND dims
nims, nime, 1, 1, njms, njme, & ! ND dims
nips, nipe, 1, 1, njps, njpe, & ! ND dims
shw, ngrid%imask_nostag, & ! stencil half width
.FALSE., .FALSE., & ! xstag, ystag
ngrid%i_parent_start, ngrid%j_parent_start, &
ngrid%parent_grid_ratio, ngrid%parent_grid_ratio &
,lu_index,ngrid%lu_index &
)
!ENDOFREGISTRYGENERATEDINCLUDE