subroutine, private noahmp_glacier_routines::glacier_flux ( integer, intent(in)  nsoil, integer, intent(in)  nsnow, real, intent(in)  emg, integer, intent(in)  isnow, real, dimension(-nsnow+1:nsoil), intent(in)  df, real, dimension(-nsnow+1:nsoil), intent(in)  dzsnso, real, intent(in)  z0m, real, intent(in)  zlvl, real, intent(in)  zpd, real, intent(in)  qair, real, intent(in)  sfctmp, real, intent(in)  rhoair, real, intent(in)  sfcprs, real, intent(in)  ur, real, intent(in)  gamma, real, intent(in)  rsurf, real, intent(in)  lwdn, real, intent(in)  rhsur, real, dimension( 1:nsoil), intent(in)  smc, real, intent(in)  eair, real, dimension(-nsnow+1:nsoil), intent(in)  stc, real, intent(in)  sag, real, intent(in)  snowh, real, intent(in)  lathea, real, dimension( 1:nsoil), intent(in)  sh2o,   ifdef,   CCPP  )

private

References noahmp_glacier_globals::cpair, esat(), noahmp_glacier_globals::opt_stc, noahmp_glacier_globals::sb, sfcdif1_glacier(), noahmp_glacier_globals::tfrz, and noahmp_glacier_globals::vkc.

Referenced by energy_glacier().

Here is the call graph for this function: