CCPP SciDoc v7.0.0  v7.0.0
Common Community Physics Package Developed at DTC
 
Loading...
Searching...
No Matches

◆ compact_glacier()

subroutine, private noahmp_glacier_routines::compact_glacier ( integer, intent(in) nsnow,
integer, intent(in) nsoil,
real (kind=kind_phys), intent(in) dt,
real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(in) stc,
real (kind=kind_phys), dimension(-nsnow+1: 0), intent(in) snice,
real (kind=kind_phys), dimension(-nsnow+1: 0), intent(in) snliq,
integer, dimension(-nsnow+1:0), intent(in) imelt,
real (kind=kind_phys), dimension(-nsnow+1: 0), intent(in) ficeold,
integer, intent(inout) isnow,
real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(inout) dzsnso )
private
Parameters
[in]nsoilno. of soil layers [ =4]
[in]nsnowmaximum no. of snow layers [ =3]
[in]imeltmelting state index [0-no melt;1-melt]
[in]dttime step (sec)
[in]stcsnow layer temperature [k]
[in]snicesnow layer ice [mm]
[in]snliqsnow layer liquid water [mm]
[in]ficeoldice fraction at last timestep
[in,out]isnowactual no. of snow layers
[in,out]dzsnsosnow layer thickness [m]

Definition at line 2767 of file module_sf_noahmp_glacier.F90.

Referenced by snowwater_glacier().

Here is the caller graph for this function: