Index | Rundeck: E6TomaF40 | Created: Fri May 17 03:30:39 EDT 2024 |
deltasnowt | Module: | File: PBL.f |
Author :
Version:
Declaration:
real*8 function deltasnowt(qnet, qsol, snow, tg, dqnetdtg, deltatg0)
- alams : used from seaice
- alami : used from seaice
- rhos : used from seaice
- ace1i : used from seaice
- byrhoi : used from seaice
- xsi : used from seaice
- rhoi : used from seaice
- qnet :
real*8, intent(in)
- Net heat flux (not including solar, +ve dwn) (W/m2)
- qsol :
real*8, intent(in)
- Solar heat flux (W/m2)
- snow :
real*8, intent(in)
- Snow mass (kg/m2)
- dqnetdtg :
real*8, intent(in)
- derivative of Qnet w.r.t. tg
- deltatg0 :
real*8, intent(in)
- starting value of deltaSnowT
- ksext :
real*8
- solar radiation extinction coeffficent (1/m)
- ssi1 :
real*8
- salinity in upper layer ice (estimated)
Initial Value= 5d0
- dz1 :
real*8
- depth of first thermal layer (m)
- hsnow :
real*8
- depth of snow (m)
- tg :
real*8, intent(in)
- delbyk :
real*8
- fc :
real*8, parameter
- fraction of solar passing though in micro-layer (LeComte et al, 2013)
Initial Value= 0.82d0