Index

Rundeck: P1SoM40

Created: Thu May 9 03:30:17 EDT 2024

melt_si

Module:

File: SEAICE_DRV.f

Summary: MELT_SI driver for lateral melt of sea ice
Author : Gary Russell/Gavin Schmidt
Version:

---

Declaration:

subroutine melt_si(si_state, iceocn, atmocn, atmice)

Calls the following subroutines/functions:

simelt

Module: SEAICE File: SEAICE.f
SIMELT melts sea ice laterally and if it is too small Note: all amounts are with respect to the ocean/lake fraction

Variables:

tf : used from constant

kocean : used from model_com

dtsrc : used from model_com

lmi : used from seaice

simelt : used from seaice

tfrez : used from seaice

xsi : used from seaice

ti : used from seaice

ace1i : used from seaice

debug : used from seaice

iceocn_xchng_vars : used from exchange_types

atmocn_xchng_vars : used from exchange_types

atmice_xchng_vars : used from exchange_types

icestate : used from seaice_com

starttimer : used from timerpackage_mod

Initial Value = > start

stoptimer : used from timerpackage_mod

Initial Value = > stop

si_state : type(icestate)

iceocn : type(iceocn_xchng_vars)

atmocn : type(atmocn_xchng_vars)

atmice : type(atmice_xchng_vars)

hsil : real*8, dimension(lmi)

tsil : real*8, dimension(lmi)

ssil : real*8, dimension(lmi)

msi2 : real*8

roice : real*8

snow : real*8

enrgused : real*8

run0 : real*8

salt : real*8

pocean : real*8

tfo : real*8

pwater : real*8

tm : real*8

dt : real*8

enrgmax : real*8

domain : character(len=8)

dopoint : logical

i : integer

j : integer

melti : real*8, dimension(:, :), pointer

emelti : real*8, dimension(:, :), pointer

smelti : real*8, dimension(:, :), pointer

sss : real*8, dimension(:, :), pointer

mlhc : real*8, dimension(:, :), pointer

fwater : real*8, dimension(:, :), pointer

rsistart : real*8, dimension(:, :), pointer

rsi : real*8, dimension(:, :), pointer

msi : real*8, dimension(:, :), pointer

snowi : real*8, dimension(:, :), pointer

hsi : real*8, dimension(:, :, :), pointer

ssi : real*8, dimension(:, :, :), pointer

j_0 : integer

j_1 : integer

i_0 : integer

i_1 : integer