34 |
the lower layer has a fixed heat capacity. A zero heat capacity snow |
the lower layer has a fixed heat capacity. A zero heat capacity snow |
35 |
layer lies above the ice. Heat fluxes at the top and bottom |
layer lies above the ice. Heat fluxes at the top and bottom |
36 |
surfaces are used to calculate the change in ice and snow layer |
surfaces are used to calculate the change in ice and snow layer |
37 |
thickness. Grid cells of the ocean model are |
thickness. Grid cells of the ocean model are |
38 |
either fully covered in ice or are open water. There is |
either fully covered in ice or are open water. There is |
39 |
a provision to parametrize ice fraction (and leads) in this package. |
a provision to parametrize ice fraction (and leads) in this package. |
40 |
Modifications are discussed in small font following the |
Modifications are discussed in small font following the |
59 |
\[ |
\[ |
60 |
{\bf frzmlt} = (T_f - SST) \frac{c_{sw} \rho_{sw} \Delta z}{\Delta t} |
{\bf frzmlt} = (T_f - SST) \frac{c_{sw} \rho_{sw} \Delta z}{\Delta t} |
61 |
\] |
\] |
62 |
where $c_{sw}$ is seawater heat capacity, |
where $c_{sw}$ is seawater heat capacity, |
63 |
$\rho_{sw}$ is the seawater density, $\Delta z$ |
$\rho_{sw}$ is the seawater density, $\Delta z$ |
64 |
is the ocean model upper layer thickness and $\Delta t$ is the model (tracer) |
is the ocean model upper layer thickness and $\Delta t$ is the model (tracer) |
65 |
timestep. The freezing temperature, $T_f=\mu S$ is a function of the |
timestep. The freezing temperature, $T_f=\mu S$ is a function of the |
72 |
|
|
73 |
2) If there is ice present in the grid cell |
2) If there is ice present in the grid cell |
74 |
we call the main ice model routine {\it ice\_therm.F} (see below). |
we call the main ice model routine {\it ice\_therm.F} (see below). |
75 |
Output from this routine gives net heat and freshwater flux |
Output from this routine gives net heat and freshwater flux |
76 |
affecting the top of the ocean. |
affecting the top of the ocean. |
77 |
|
|
78 |
Subroutine {\it ice\_forcing.F} uses these values to find the |
Subroutine {\it ice\_forcing.F} uses these values to find the |
79 |
sea surface tendencies |
sea surface tendencies |
80 |
in grid cells. When there is ice present, |
in grid cells. When there is ice present, |
81 |
the surface stress tendencies are |
the surface stress tendencies are |
82 |
set to zero; the ice model is purely thermodynamic and the |
set to zero; the ice model is purely thermodynamic and the |
83 |
effect of ice motion on the sea-surface is not examined. |
effect of ice motion on the sea-surface is not examined. |
96 |
{\bf {\underline{ subroutine ICE\_FREEZE}}} |
{\bf {\underline{ subroutine ICE\_FREEZE}}} |
97 |
|
|
98 |
This routine is called from {\it thermodynamics.F} |
This routine is called from {\it thermodynamics.F} |
99 |
after the new temperature calculation, {\it calc\_gt.F}, |
after the new temperature calculation, {\it calc\_gt.F}, |
100 |
but before {\it calc\_gs.F}. |
but before {\it calc\_gs.F}. |
101 |
In {\it ice\_freeze.F}, any ocean upper layer grid cell |
In {\it ice\_freeze.F}, any ocean upper layer grid cell |
102 |
with no ice cover, but with temperature below freezing, |
with no ice cover, but with temperature below freezing, |
106 |
freezing. In this routine, any water below the surface |
freezing. In this routine, any water below the surface |
107 |
that is below freezing is set to $T_f$. |
that is below freezing is set to $T_f$. |
108 |
A call to |
A call to |
109 |
{\it ice\_start.F} is made if {\bf frzmlt} $>0$, |
{\it ice\_start.F} is made if {\bf frzmlt} $>0$, |
110 |
and salinity tendancy is updated for brine release. |
and salinity tendancy is updated for brine release. |
111 |
|
|
112 |
\noindent |
\noindent |
126 |
The enthalpy of the 2 layers of any new ice is calculated as: |
The enthalpy of the 2 layers of any new ice is calculated as: |
127 |
\begin{eqnarray} |
\begin{eqnarray} |
128 |
q_1 & = & -c_{i}*T_f + L_i \nonumber \\ |
q_1 & = & -c_{i}*T_f + L_i \nonumber \\ |
129 |
q_2 & = & -c_{f}T_{mlt}+ c_{i}(T_{mlt}-T{f}) + L_i(1-\frac{T_{mlt}}{T_f} |
q_2 & = & -c_{f}T_{mlt}+ c_{i}(T_{mlt}-T{f}) + L_i(1-\frac{T_{mlt}}{T_f}) |
130 |
\nonumber \\ |
\nonumber |
131 |
\end{eqnarray} |
\end{eqnarray} |
132 |
where $c_f$ is specific heat of liquid fresh water, $c_i$ is the |
where $c_f$ is specific heat of liquid fresh water, $c_i$ is the |
133 |
specific heat of fresh ice, $L_i$ is latent heat of freezing, |
specific heat of fresh ice, $L_i$ is latent heat of freezing, |
134 |
$\rho_i$ is density of ice and |
$\rho_i$ is density of ice and |
135 |
$T_{mlt}$ is melting temperature of ice with salinity of 1. |
$T_{mlt}$ is melting temperature of ice with salinity of 1. |
136 |
The height of a new layer of ice is |
The height of a new layer of ice is |
148 |
must have a height of {\bf himin0}; this determines the ice |
must have a height of {\bf himin0}; this determines the ice |
149 |
fraction {\bf compact}. If there is already ice in the grid cell, |
fraction {\bf compact}. If there is already ice in the grid cell, |
150 |
the new ice must have the same height and the new ice fraction |
the new ice must have the same height and the new ice fraction |
151 |
is |
is |
152 |
\[ |
\[ |
153 |
i_f=(1-\hat{i_f}) \frac{h_{i new}}{h_i} |
i_f=(1-\hat{i_f}) \frac{h_{i new}}{h_i} |
154 |
\] |
\] |
155 |
where $\hat{i_f}$ is ice fraction from previous timestep |
where $\hat{i_f}$ is ice fraction from previous timestep |
156 |
and $h_i$ is current ice height. Snow is redistributed |
and $h_i$ is current ice height. Snow is redistributed |
157 |
over the new ice fraction. The ice fraction is |
over the new ice fraction. The ice fraction is |
158 |
not allowed to become larger than {\bf iceMaskmax} and |
not allowed to become larger than {\bf iceMaskmax} and |
159 |
if the ice height is above {\bf hihig} then freezing energy |
if the ice height is above {\bf hihig} then freezing energy |
169 |
\noindent |
\noindent |
170 |
The main subroutine of this package is {\it ice\_therm.F} where the |
The main subroutine of this package is {\it ice\_therm.F} where the |
171 |
ice temperatures are calculated and the changes in ice and snow |
ice temperatures are calculated and the changes in ice and snow |
172 |
thicknesses are determined. Output provides the net heat and fresh |
thicknesses are determined. Output provides the net heat and fresh |
173 |
water fluxes that force the top layer of the ocean model. |
water fluxes that force the top layer of the ocean model. |
174 |
|
|
175 |
If the current ice height is less than {\bf himin} then |
If the current ice height is less than {\bf himin} then |
181 |
|
|
182 |
We follow the procedure |
We follow the procedure |
183 |
of Winton (1999) -- see equations 3 to 21 -- to calculate |
of Winton (1999) -- see equations 3 to 21 -- to calculate |
184 |
the surface and internal ice temperatures. |
the surface and internal ice temperatures. |
185 |
The surface temperature is found from the balance of the |
The surface temperature is found from the balance of the |
186 |
flux at the surface $F_s$, the shortwave heat flux absorbed by the ice, |
flux at the surface $F_s$, the shortwave heat flux absorbed by the ice, |
187 |
{\bf fswint}, and |
{\bf fswint}, and |
188 |
the upward conduction of heat through the snow and/or ice, $F_u$. |
the upward conduction of heat through the snow and/or ice, $F_u$. |
189 |
We linearize $F_s$ about the surface temperature, $\hat{T_s}$, |
We linearize $F_s$ about the surface temperature, $\hat{T_s}$, |
190 |
at the previous timestep (where \mbox{}$\hat{ }$ indicates the value at |
at the previous timestep (where \mbox{}$\hat{ }$ indicates the value at |
191 |
the previous timestep): |
the previous timestep): |
192 |
\[ |
\[ |
193 |
F_s (T_s) = F_s(\hat{T_s}) + \frac{\partial F_s(\hat{T_s)}}{\partial T_s} |
F_s (T_s) = F_s(\hat{T_s}) + \frac{\partial F_s(\hat{T_s)}}{\partial T_s} |
194 |
(T_s-\hat{T_s}) |
(T_s-\hat{T_s}) |
195 |
\] |
\] |
196 |
where, |
where, |
197 |
\[ |
\[ |
198 |
F_s = F_{sensible}+F_{latent}+F_{longwave}^{down}+F_{longwave}^{up}+ (1- |
F_s = F_{sensible}+F_{latent}+F_{longwave}^{down}+F_{longwave}^{up}+ (1- |
199 |
\alpha) F_{shortwave} |
\alpha) F_{shortwave} |
203 |
\frac{d F_s}{dT} = \frac{d F_{sensible}}{dT} + \frac{d F_{latent}}{dT} |
\frac{d F_s}{dT} = \frac{d F_{sensible}}{dT} + \frac{d F_{latent}}{dT} |
204 |
+\frac{d F_{longwave}^{up}}{dT}. |
+\frac{d F_{longwave}^{up}}{dT}. |
205 |
\] |
\] |
206 |
$F_s$ and $\frac{d F_s}{dT}$ are currently calculated from the {\bf BULKF} |
$F_s$ and $\frac{d F_s}{dT}$ are currently calculated from the {\bf BULKF} |
207 |
package described separately, but could also be provided by an atmospheric |
package described separately, but could also be provided by an atmospheric |
208 |
model. The surface albedo is calculated from the ice height and/or |
model. The surface albedo is calculated from the ice height and/or |
209 |
surface temperature (see below, {\it srf\_albedo.F}) and the |
surface temperature (see below, {\it srf\_albedo.F}) and the |
210 |
shortwave flux absorbed in the ice is |
shortwave flux absorbed in the ice is |
211 |
\[ |
\[ |
212 |
{\bf fswint} = (1-e^{\kappa_i h_i})(1-\alpha) F_{shortwave} |
{\bf fswint} = (1-e^{\kappa_i h_i})(1-\alpha) F_{shortwave} |
257 |
\end{eqnarray} |
\end{eqnarray} |
258 |
where $F_b$ is the heat flux at the ice bottom due to the sea surface |
where $F_b$ is the heat flux at the ice bottom due to the sea surface |
259 |
temperature variations from freezing. |
temperature variations from freezing. |
260 |
If $T_{sst}$ is above freezing, $F_b=c_{sw} \rho_{sw} |
If $T_{sst}$ is above freezing, $F_b=c_{sw} \rho_{sw} |
261 |
\gamma (T_{sst}-T_f)u^{*}$, $\gamma$ is the heat transfer coefficient |
\gamma (T_{sst}-T_f)u^{*}$, $\gamma$ is the heat transfer coefficient |
262 |
and $u^{*}=QQ$ is frictional velocity between ice |
and $u^{*}=QQ$ is frictional velocity between ice |
263 |
and water. If $T_{sst}$ is below freezing, |
and water. If $T_{sst}$ is below freezing, |
264 |
$F_b=(T_f - T_{sst})c_f \rho_f \Delta z /\Delta t$ and set $T_{sst}$ |
$F_b=(T_f - T_{sst})c_f \rho_f \Delta z /\Delta t$ and set $T_{sst}$ |
265 |
to $T_f$. We also |
to $T_f$. We also |
268 |
|
|
269 |
If $E_{top}>0$ we melt snow from the surface, if all the snow is melted |
If $E_{top}>0$ we melt snow from the surface, if all the snow is melted |
270 |
and there is energy left, we melt the ice. If the ice is all gone |
and there is energy left, we melt the ice. If the ice is all gone |
271 |
and there is still energy left, we apply the left over energy to |
and there is still energy left, we apply the left over energy to |
272 |
heating the ocean model upper layer (See Winton, 1999, equations 27-29). |
heating the ocean model upper layer (See Winton, 1999, equations 27-29). |
273 |
Similarly if $E_{bot}>0$ we melt ice from the bottom. If all the ice |
Similarly if $E_{bot}>0$ we melt ice from the bottom. If all the ice |
274 |
is melted, the snow is melted (with energy from the ocean model upper layer |
is melted, the snow is melted (with energy from the ocean model upper layer |
286 |
If there is a ice layer and the overlying air temperature is |
If there is a ice layer and the overlying air temperature is |
287 |
below 0$^o$C then any precipitation, $P$ joins the snow layer: |
below 0$^o$C then any precipitation, $P$ joins the snow layer: |
288 |
\[ |
\[ |
289 |
\Delta h_s = -P \frac{\rho_f}{\rho_s} \Delta t, |
\Delta h_s = -P \frac{\rho_f}{\rho_s} \Delta t, |
290 |
\] |
\] |
291 |
$\rho_f$ and $\rho_s$ are the fresh water and snow densities. |
$\rho_f$ and $\rho_s$ are the fresh water and snow densities. |
292 |
Any evaporation, similarly, removes snow or ice from the surface. |
Any evaporation, similarly, removes snow or ice from the surface. |
342 |
\[ \alpha = f_s \alpha_s + (1-f_s) (\alpha_{i_{min}} |
\[ \alpha = f_s \alpha_s + (1-f_s) (\alpha_{i_{min}} |
343 |
+ (\alpha_{i_{max}}- \alpha_{i_{min}}) (1-e^{-h_i/h_{\alpha}})) |
+ (\alpha_{i_{max}}- \alpha_{i_{min}}) (1-e^{-h_i/h_{\alpha}})) |
344 |
\] |
\] |
345 |
where $f_s$ is 1 if there is snow, 0 if not; the snow albedo, |
where $f_s$ is 1 if there is snow, 0 if not; the snow albedo, |
346 |
$\alpha_s$ has two values |
$\alpha_s$ has two values |
347 |
depending on whether $T_s<0$ or not; $\alpha_{i_{min}}$ and |
depending on whether $T_s<0$ or not; $\alpha_{i_{min}}$ and |
348 |
$\alpha_{i_{max}}$ are ice albedos for thin melting ice, and |
$\alpha_{i_{max}}$ are ice albedos for thin melting ice, and |
349 |
thick bare ice respectively, and $h_{\alpha}$ is a scale |
thick bare ice respectively, and $h_{\alpha}$ is a scale |
350 |
height. |
height. |
430 |
{\bf {\underline{Common Blocks}}} |
{\bf {\underline{Common Blocks}}} |
431 |
|
|
432 |
\noindent |
\noindent |
433 |
{\it ICE.h}: Ice Varibles, also |
{\it ICE.h}: Ice Varibles, also |
434 |
{\bf relaxlat} and {\bf startIceModel} |
{\bf relaxlat} and {\bf startIceModel} |
435 |
|
|
436 |
\noindent |
\noindent |
438 |
from {\it ice\_diags.F} |
from {\it ice\_diags.F} |
439 |
|
|
440 |
\noindent |
\noindent |
441 |
{\it BULKF\_ICE\_CONSTANTS.h} (in {\bf BULKF} package): |
{\it BULKF\_ICE\_CONSTANTS.h} (in {\bf BULKF} package): |
442 |
all the parameters need by the ice model |
all the parameters need by the ice model |
443 |
|
|
444 |
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
485 |
\begin{verbatim} |
\begin{verbatim} |
486 |
|
|
487 |
------------------------------------------------------------------------ |
------------------------------------------------------------------------ |
488 |
<-Name->|Levs|<-parsing code->|<-- Units -->|<- Tile (max=80c) |
<-Name->|Levs|<-parsing code->|<-- Units -->|<- Tile (max=80c) |
489 |
------------------------------------------------------------------------ |
------------------------------------------------------------------------ |
490 |
SI_Fract| 1 |SM P M1 |0-1 |Sea-Ice fraction [0-1] |
SI_Fract| 1 |SM P M1 |0-1 |Sea-Ice fraction [0-1] |
491 |
SI_Thick| 1 |SM PC197M1 |m |Sea-Ice thickness (area weighted average) |
SI_Thick| 1 |SM PC197M1 |m |Sea-Ice thickness (area weighted average) |
511 |
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
512 |
\vspace{1cm} |
\vspace{1cm} |
513 |
|
|
514 |
\noindent |
\noindent |
515 |
{\bf {\underline{References}}} |
{\bf {\underline{References}}} |
516 |
|
|
517 |
\noindent |
\noindent |