Index | Rundeck: P1SoM40 | Created: Thu May 9 03:30:17 EDT 2024 |
sea_ice | Module: SEAICE | File: SEAICE.f |
Author : Gary Russell
Version:
Declaration:
subroutine sea_ice(dtsrce, snow, roice, hsil, ssil, msi2, f0dt, f1dt, evap, srox, fmoc, fhoc, fsoc, run, erun, srun, wetsnow, melt12)
- dtsrce :
real*8, intent(in)
- source time step (s)
- dsndml :
real*8, parameter
- Initial Value
= 0.
- f0dt :
real*8, intent(in)
- heat flux on the ice top surface (J/m^2)
- f1dt :
real*8, intent(in)
- heat flux between the 1st and 2nd ice layers (J/m^2)
- srox :
real*8, intent(inout), dimension(2)
- solar radiation at top and bottom ice surface (J/m^2)
- evap :
real*8, intent(in)
- evaporation/dew on the top ice surface (kg/m^2)
- fsri :
real*8, dimension(LMI)
- fraction of solar radiation that goes through the bottom
- fsoc :
real*8, intent(in)
- basal fluxes down of mass,heat,salt (J or kg/m^2)
- fhoc :
real*8, intent(in)
- basal fluxes down of mass,heat,salt (J or kg/m^2)
- fmoc :
real*8, intent(in)
- basal fluxes down of mass,heat,salt (J or kg/m^2)
- srun :
real*8, intent(out)
- runoff fluxes down of mass,heat,salt (J or kg/m^2)
- erun :
real*8, intent(out)
- runoff fluxes down of mass,heat,salt (J or kg/m^2)
- run :
real*8, intent(out)
- runoff fluxes down of mass,heat,salt (J or kg/m^2)
- wetsnow :
logical, intent(inout)
- whether snow is wet or not (Used for albedo calc)
- melt12 :
real*8, intent(out)
- save surface melt (Used for albedo calc)
- roice :
real*8, intent(in)
- sea ice fraction of open water
- hsil :
real*8, intent(inout), dimension(lmi)
- enthalpy of ice layers (J/m^2)
- ssil :
real*8, intent(inout), dimension(lmi)
- salt in ice layers (kg/m^2)
- snow :
real*8, intent(inout)
- snow mass (kg/m^2)
- msi1 :
real*8
- first layer ice mass (= SNOW + ACE1I) (kg/m^2)
- msi2 :
real*8, intent(inout)
- second layer ice mass (kg/m^2)
- tsil :
real*8, dimension(lmi)
- temperature of ice layers (C)
- mice :
real*8, dimension(lmi)
- hice :
real*8, dimension(lmi)
- sice :
real*8, dimension(lmi)
- dmsi :
real*8, dimension(lmi)
- alam :
real*8, dimension(lmi)
- melti :
real*8, dimension(lmi)
- smelti :
real*8, dimension(lmi)
- hmelti :
real*8, dimension(lmi)
- hc :
real*8, dimension(lmi)
- dfdti :
real*8, dimension(lmi)
- f :
real*8, dimension(lmi)
- snowl :
real*8, dimension(2)
- hsnow :
real*8, dimension(2)
- tsnw :
real*8, dimension(2)
- dewi :
real*8, dimension(2)
- melts :
real*8
- melts2 :
real*8
- dew :
real*8
- cmprs :
real*8
- dews :
real*8
- hcmprs :
real*8
- fmsi2 :
real*8
- fmsi3 :
real*8
- fssi2 :
real*8
- fssi3 :
real*8
- fhsi2 :
real*8
- fhsi3 :
real*8
- l :
integer