Index | Rundeck: E6F40 | Created: Fri May 17 03:30:27 EDT 2024 |
addice | Module: SEAICE | File: SEAICE.f |
Author : Gary Russell/Gavin Schmidt
Version:
Declaration:
subroutine addice (snow, roice, hsil, ssil, msi2, tsil, enrgfo, acefo, acefi, enrgfi, salto, salti, dmimp, dhimp, dsimp, flead, qfixr, debug)
- qfixr :
logical, intent(in)
- true if RSI and MSI2 are fixed (ie. for fixed SST run)
- flead :
real*8, intent(in)
- minimum lead fraction for ice (%)
- debug :
logical, intent(in)
- acefo :
real*8, intent(in)
- ice mass formed in ocean for open water fraction (kg/m^2)
- acefi :
real*8, intent(in)
- ice mass formed in ocean for ice covered fraction (kg/m^2)
- enrgfo :
real*8, intent(in)
- energy of ice formed in ocean for open water frac (J/m^2)
- enrgfi :
real*8, intent(in)
- energy of ice formed in ocean for ice covered frac (J/m^2)
- salto :
real*8, intent(in)
- salt in ice formed in ocean for open water frac (kg/m^2)
- salti :
real*8, intent(in)
- salt in ice formed in ocean for ice covered frac (kg/m^2)
- roice :
real*8, intent(inout)
- ice fraction over open water
- snow :
real*8, intent(inout)
- snow amount on ice (kg/m^2)
- msi2 :
real*8, intent(inout)
- second mass layer ice thickness (kg/m^2)
- 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)
- tsil :
real*8, intent(out), dimension(lmi)
- temperature of ice layers (C)
- dhimp :
real*8, intent(out)
- implicit mass,salt and heat fluxes required
- dsimp :
real*8, intent(out)
- implicit mass,salt and heat fluxes required
- dmimp :
real*8, intent(out)
- implicit mass,salt and heat fluxes required
- fri :
real*8, dimension(lmi)
- fmsi1 :
real*8
- fmsi2 :
real*8
- fmsi3 :
real*8
- fmsi4 :
real*8
- fhsi1 :
real*8
- fhsi2 :
real*8
- fhsi3 :
real*8
- fhsi4 :
real*8
- fssi1 :
real*8
- fssi2 :
real*8
- fssi3 :
real*8
- fssi4 :
real*8
- hsnow :
real*8, dimension(2)
- snowl :
real*8, dimension(2)
- tsnw :
real*8, dimension(2)
- hice :
real*8, dimension(LMI)
- sice :
real*8, dimension(LMI)
- mice :
real*8, dimension(LMI)
- roicen :
real*8
- opnocn :
real*8
- drsi :
real*8
- msi1 :
real*8
- msi2xx :
real*8
- havg :
real*8
- msi2no :
real*8
- l :
integer