CCPP Scientific Documentation
v5.0.0
subroutine module_sf_ruclsm::sfctmp ( logical, intent(in)  debug_print,
real, intent(in)  delt,
integer, intent(in)  ktau,
real, intent(in)  conflx,
integer, intent(in)  i,
integer, intent(in)  j,
integer, intent(in)  nzs,
integer, intent(in)  nddzs,
integer, intent(in)  nroot,
real, intent(in)  meltfactor,
integer, intent(inout)  ILAND,
integer, intent(inout)  ISOIL,
integer, intent(in)  IVGTYP,
integer, intent(in)  ISLTYP,
real  PRCPMS,
real  NEWSNMS,
real, intent(inout)  SNWE,
real, intent(inout)  SNHEI,
real, intent(inout)  SNOWFRAC,
real, intent(inout)  RHOSN,
real, intent(inout)  RHONEWSN,
real, intent(inout)  RHOSNFALL,
real, intent(inout)  snowrat,
real, intent(inout)  grauprat,
real, intent(inout)  icerat,
real, intent(inout)  curat,
real, intent(in)  PATM,
real, intent(in)  TABS,
real, intent(in)  QVATM,
real, intent(in)  QCATM,
real, intent(in)  rho,
real, intent(in)  GLW,
real, intent(in)  GSW,
real, intent(inout)  EMISS,
real, intent(in)  QKMS,
real, intent(in)  TKMS,
real, intent(in)  PC,
real, intent(inout)  MAVAIL,
real, intent(inout)  CST,
real, intent(in)  VEGFRA,
real, intent(inout)  ALB,
real, intent(inout)  ZNT,
real, intent(inout)  ALB_SNOW,
real, intent(in)  ALB_SNOW_FREE,
real, intent(in)  lai,
logical, intent(in)  MYJ,
real, intent(in)  SEAICE,
integer, intent(in)  ISICE,
real  QWRTZ,
real  rhocs,
real  dqm,
real  qmin,
real  ref,
real  wilt,
real  psis,
real  bclh,
real  ksat,
real  sat,
real, intent(in)  cn,
real, dimension(1:nzs), intent(in)  zsmain,
real, dimension(1:nzs), intent(in)  zshalf,
real, dimension(1:nddzs), intent(in)  DTDZS,
real, dimension(1:nzs), intent(in)  DTDZS2,
real, dimension(1:5001), intent(in)  tbq,
real, intent(in)  cp,
real, intent(in)  rovcp,
real, intent(in)  g0,
real, intent(in)  lv,
real, intent(in)  stbolt,
real, intent(in)  cw,
real, intent(in)  c1sn,
real, intent(in)  c2sn,
real, intent(in)  KQWRTZ,
real, intent(in)  KICE,
real, intent(in)  KWT,
real, intent(inout)  snweprint,
real, intent(inout)  snheiprint,
real, intent(inout)  rsm,
real, dimension( 1:nzs ), intent(inout)  soilm1d,
real, dimension( 1:nzs ), intent(inout)  ts1d,
real, dimension( 1:nzs ), intent(inout)  smfrkeep,
real, dimension( 1:nzs ), intent(inout)  keepfr,
real, intent(inout)  soilt,
real, intent(inout)  soilt1,
real, intent(inout)  tsnav,
real, intent(inout)  dew,
real, intent(inout)  qvg,
real, intent(inout)  qsg,
real, intent(inout)  qcg,
real, intent(inout)  SMELT,
real, intent(inout)  SNOH,
real, intent(inout)  SNFLX,
real, intent(inout)  SNOM,
real, intent(inout)  SNOWFALLAC,
real, intent(inout)  ACSNOW,
real, intent(inout)  edir1,
real, intent(inout)  ec1,
real, intent(inout)  ett1,
real, intent(inout)  eeta,
real, intent(inout)  qfx,
real, intent(inout)  hfx,
real, intent(inout)  s,
real, intent(inout)  sublim,
real, intent(inout)  evapl,
real, intent(inout)  prcpl,
real, intent(inout)  fltot,
real, intent(inout)  runoff1,
real, intent(inout)  runoff2,
real, dimension(1:nzs), intent(inout)  soilice,
real, dimension(1:nzs), intent(inout)  soiliqw,
real, intent(inout)  infiltr,
real, intent(inout)  smf 
)
private
  • It computes density of frozen precipitation from empirical dependence on temperature at the first atmospheric level.
  • Computes amount of liquid and frozen precipitation intercepted by the vegetation canopy.
  • In there is snow on the ground, the snow fraction is below 0.75, the snow "mosaic" approach is turned on.
  • Updates emissivity and albedo for patch snow.

References namelist_soilveg_ruc::lemitbl, rhowater, sice(), snowseaice(), snowsoil(), soil(), namelist_soilveg_ruc::urban, and namelist_soilveg_ruc::z0tbl.

Referenced by lsm_ruc::lsm_ruc_run(), and lsmruc().

Here is the call graph for this function: