1 |
Initialization (myTime .EQ. startTime in MITgcm) |
2 |
|
3 |
===> Ocean Sends/ Ice Receives (fields that are sent only once) |
4 |
deltatimestep 1 Real*8 TimeIntervalTag |
5 |
grid dimensions (Nx,Ny) 2 Integer OceanGridsizeTag |
6 |
(grid locations - later?) |
7 |
ice area Nx*Ny Real*8 AreaTag |
8 |
ice thickness Nx*Ny Real*8 HeffTag |
9 |
ice salinity Nx*Ny Real*8 HsaltTag |
10 |
snow thickness Nx*Ny Real*8 HsnowTag |
11 |
|
12 |
===> Ocean Sends/ Ice Receives |
13 |
ocean model time 1 Real*8 OceanTimeTag |
14 |
boundary ice area 2*(Nx+Ny)-4 Real*8 AreaBcTag |
15 |
boundary ice thickness 2*(Nx+Ny)-4 Real*8 HeffBcTag |
16 |
boundary ice salinity 2*(Nx+Ny)-4 Real*8 HsaltBcTag |
17 |
boundary snow thickness 2*(Nx+Ny)-4 Real*8 HsnowBcTag |
18 |
boundary u ice 2*(Nx+Ny)-6 Real*8 UiceBcTag |
19 |
boundary v ice 2*(Nx+Ny)-6 Real*8 ViceBcTag |
20 |
u-wind velocity Nx*Ny Real*8 UwindTag |
21 |
v-wind velocity Nx*Ny Real*8 VwindTag |
22 |
downward longwave radiation Nx*Ny Real*8 LwDownTag |
23 |
downward shortwave radiation Nx*Ny Real*8 SwDownTag |
24 |
air temperature Nx*Ny Real*8 AtempTag |
25 |
humidity Nx*Ny Real*8 AqhTag |
26 |
precipitation Nx*Ny Real*8 PrecipTag |
27 |
ocean surface temperature Nx*Ny Real*8 SstTag |
28 |
ocean surface salinity Nx*Ny Real*8 SssTag |
29 |
surface u current Nx*Ny Real*8 UvelTag |
30 |
surface v current Nx*Ny Real*8 VvelTag |
31 |
|
32 |
===> Ice Sends/Ocean Receives |
33 |
ice model time 1 Real*8 IceTimeTag |
34 |
ice area Nx*Ny Real*8 AreaTag (initial ice area) |
35 |
ice thickness Nx*Ny Real*8 HeffTag (initial ice thickness) |
36 |
ice salinity Nx*Ny Real*8 HsaltTag (initial ice salinity) |
37 |
snow thickness Nx*Ny Real*8 HsnowTag (initial snow thickness) |
38 |
u surface stress Nx*Ny Real*8 UstressTag (surface v current) |
39 |
v surface stress Nx*Ny Real*8 VstressTag (array of 2) |
40 |
residual shortwave Nx*Ny Real*8 SwResidTag (array of 1) |
41 |
heat flux Nx*Ny Real*8 HeatFluxTag (array of 1) |
42 |
freshwater flux Nx*Ny Real*8 WaterFluxTag (array of 1) |
43 |
salt flux Nx*Ny Real*8 SaltFluxTag (array of 1) |
44 |
|
45 |
===================================== |
46 |
|
47 |
Each deltatimestep: |
48 |
|
49 |
===> Ocean Sends/Ice Receives |
50 |
ocean model time 1 Real*8 OceanTimeTag |
51 |
boundary ice area 2*(Nx+Ny)-4 Real*8 AreaBcTag |
52 |
boundary ice thickness 2*(Nx+Ny)-4 Real*8 HeffBcTag |
53 |
boundary ice salinity 2*(Nx+Ny)-4 Real*8 HsaltBcTag |
54 |
boundary snow thickness 2*(Nx+Ny)-4 Real*8 HsnowBcTag |
55 |
boundary u ice 2*(Nx+Ny)-6 Real*8 UiceBcTag |
56 |
boundary v ice 2*(Nx+Ny)-6 Real*8 ViceBcTag |
57 |
u-wind velocity Nx*Ny Real*8 UwindTag |
58 |
v-wind velocity Nx*Ny Real*8 VwindTag |
59 |
downward longwave radiation Nx*Ny Real*8 LwDownTag |
60 |
downward shortwave radiation Nx*Ny Real*8 SwDownTag |
61 |
air temperature Nx*Ny Real*8 AtempTag |
62 |
humidity Nx*Ny Real*8 AqhTag |
63 |
precipitation Nx*Ny Real*8 PrecipTag |
64 |
ocean surface temperature Nx*Ny Real*8 SstTag |
65 |
ocean surface salinity Nx*Ny Real*8 SssTag |
66 |
surface u current Nx*Ny Real*8 UvelTag |
67 |
surface v current Nx*Ny Real*8 VvelTag |
68 |
|
69 |
===> Ice Sends/Ocean Receives |
70 |
ice model time 1 Real*8 IceTimeTag |
71 |
ice area Nx*Ny Real*8 AreaTag |
72 |
ice thickness Nx*Ny Real*8 HeffTag |
73 |
ice salinity Nx*Ny Real*8 HsaltTag |
74 |
snow thickness Nx*Ny Real*8 HsnowTag |
75 |
u surface stress Nx*Ny Real*8 UstressTag |
76 |
v surface stress Nx*Ny Real*8 VstressTag |
77 |
residual shortwave Nx*Ny Real*8 SwResidTag |
78 |
heat flux Nx*Ny Real*8 HeatFluxTag |
79 |
freshwater flux Nx*Ny Real*8 WaterFluxTag |
80 |
salt flux Nx*Ny Real*8 SaltFluxTag |
81 |
|
82 |
===================================== |
83 |
|
84 |
DETAILS: |
85 |
|
86 |
|
87 |
|
88 |
1. start and initialize ocean + ice codes |
89 |
|
90 |
=========================================================== |
91 |
|
92 |
2. ocean sends |
93 |
|
94 |
**** initial time step only ******************************* |
95 |
|
96 |
deltatimestep 1 Real*8 TimeIntervalTag |
97 |
|
98 |
grid dimensions (Nx,Ny) 2 Integer OceanGridsizeTag |
99 |
|
100 |
Then on tracer grid: |
101 |
|
102 |
NOT YET IMPLEMENTED: grid information + landmask |
103 |
|
104 |
initial ice area (fractional: 0-1) at the tracer points |
105 |
C AREA - fractional ice-covered area in m^2/m^2 |
106 |
C at center of grid, i.e., tracer point |
107 |
C 0 is no cover, 1 is 100% cover |
108 |
|
109 |
initial ice thickness (mean thickness in the grid box in m) |
110 |
actual thickness for single-class ice would be thickness/area |
111 |
at the tracer points |
112 |
C HEFF - effective ice thickness in m |
113 |
C at center of grid, i.e., tracer point |
114 |
C note: for non-zero AREA, actual ice |
115 |
C thickness is HEFF / AREA |
116 |
|
117 |
initial ice salinity at the tracer points |
118 |
C HSALT - effective sea ice salinity in g/m^2 |
119 |
C at center of grid, i.e., tracer point |
120 |
|
121 |
initial snow thickness (mean thickness, m) at the tracer points |
122 |
C HSNOW - effective snow thickness in m |
123 |
C at center of grid, i.e., tracer point |
124 |
C note: for non-zero AREA, actual snow |
125 |
C thickness is HSNOW / AREA |
126 |
|
127 |
**** every time step ************************************** |
128 |
|
129 |
ocean model time "myTime" (s) |
130 |
|
131 |
boundary ice area 2*(Nx+Ny)-4 Real*8 AreaBcTag |
132 |
|
133 |
boundary ice thickness 2*(Nx+Ny)-4 Real*8 HeffBcTag |
134 |
|
135 |
boundary ice salinity 2*(Nx+Ny)-4 Real*8 HsaltBcTag |
136 |
|
137 |
boundary snow thickness 2*(Nx+Ny)-4 Real*8 HsnowBcTag |
138 |
|
139 |
open boundary u-ice velocity |
140 |
specified at the inside edge of the outer grid cells |
141 |
southwest C-grid locations for normal component and at the |
142 |
southwest C-grid locations for tangential |
143 |
C UICE - zonal ice velocity in m/s at South-West B-grid |
144 |
C (or C-grid #ifdef SEAICE_CGRID) U point |
145 |
C >0 from West to East |
146 |
|
147 |
open boundary v-ice velocity |
148 |
specified at the inside edge of the outer grid cells |
149 |
southwest C-grid locations for normal component and at the |
150 |
southwest C-grid locations for tangential |
151 |
C VICE - meridional ice velocity in m/s at South-West B-grid |
152 |
C (or C-grid #ifdef SEAICE_CGRID) V point |
153 |
C >0 from South to North |
154 |
C note: the South-West B-grid U and V points are on |
155 |
C the lower, left-hand corner of each grid cell |
156 |
|
157 |
10-m u-wind at the tracer points |
158 |
c uwind :: Surface (10-m) zonal wind velocity in m/s |
159 |
c > 0 for increase in uVel, which is west to |
160 |
c east for cartesian and spherical polar grids |
161 |
c Typical range: -10 < uwind < 10 |
162 |
c Input or input/output field |
163 |
|
164 |
10-m v-wind at the tracer points |
165 |
c vwind :: Surface (10-m) meridional wind velocity in m/s |
166 |
c > 0 for increase in vVel, which is south to |
167 |
c north for cartesian and spherical polar grids |
168 |
c Typical range: -10 < vwind < 10 |
169 |
c Input or input/output field |
170 |
|
171 |
downward longwave at the tracer points |
172 |
c lwdown :: Downward longwave radiation in W/m^2 |
173 |
c > 0 for increase in theta (ocean warming) |
174 |
c Typical range: 50 < lwdown < 450 |
175 |
c Input/output field |
176 |
|
177 |
downward shortwave at the tracer points |
178 |
c swdown :: Downward shortwave radiation in W/m^2 |
179 |
c > 0 for increase in theta (ocean warming) |
180 |
c Typical range: 0 < swdown < 450 |
181 |
c Input/output field |
182 |
|
183 |
2-m air temperature at the tracer points |
184 |
c atemp :: Surface (2-m) air temperature in deg K |
185 |
c Typical range: 200 < atemp < 300 |
186 |
c Input or input/output field |
187 |
|
188 |
2-m humidity at the tracer points |
189 |
c aqh :: Surface (2m) specific humidity in kg/kg |
190 |
c Typical range: 0 < aqh < 0.02 |
191 |
c Input or input/output field |
192 |
|
193 |
precipitation at the tracer points |
194 |
c precip :: Precipitation in m/s |
195 |
c > 0 for decrease in salt (ocean salinity) |
196 |
c Typical range: 0 < precip < 5e-7 |
197 |
c Input or input/output field |
198 |
|
199 |
sea surface temperature at the tracer points |
200 |
C theta - potential temperature (oC, held at pressure/tracer point) |
201 |
|
202 |
sea surface u-vel |
203 |
C uVel - zonal velocity (m/s, i=1 held at western face) |
204 |
at southwest c-grid locations |
205 |
|
206 |
sea surface v-vel |
207 |
C vVel - meridional velocity (m/s, j=1 held at southern face) |
208 |
at southwest c-grid locations |
209 |
|
210 |
=========================================================== |
211 |
|
212 |
3. ice receives 2., computes initial ice conditions and sends on tracer grid |
213 |
|
214 |
ice model time (s) |
215 |
|
216 |
ice area at tracer point |
217 |
C AREA :: fractional ice-covered area in m^2/m^2 |
218 |
C at center of grid, i.e., tracer point |
219 |
C 0 is no cover, 1 is 100% cover |
220 |
|
221 |
ice thickness at tracer point |
222 |
C HEFF :: effective ice thickness in m |
223 |
C at center of grid, i.e., tracer point |
224 |
C note: for non-zero AREA, |
225 |
C actual ice thickness is HEFF / AREA |
226 |
|
227 |
ice salinity at tracer point |
228 |
C HSALT :: effective sea ice salinity in g/m^2 |
229 |
C at center of grid, i.e., tracer point |
230 |
|
231 |
snow thickness at tracer point |
232 |
C HSNOW :: effective snow thickness in m |
233 |
C at center of grid, i.e., tracer point |
234 |
C note: for non-zero AREA, actual snow thickness is HSNOW / AREA |
235 |
|
236 |
u-stress under ice at southwest c-grid locations |
237 |
C fu :: Zonal surface wind stress in N/m^2 |
238 |
C > 0 for increase in uVel, which is west to |
239 |
C east for cartesian and spherical polar grids |
240 |
C Typical range: -0.5 < fu < 0.5 |
241 |
C Southwest C-grid U point |
242 |
|
243 |
v-stress under ice at southwest c-grid locations |
244 |
C fv :: Meridional surface wind stress in N/m^2 |
245 |
C > 0 for increase in vVel, which is south to |
246 |
C north for cartesian and spherical polar grids |
247 |
C Typical range: -0.5 < fv < 0.5 |
248 |
C Southwest C-grid V point |
249 |
|
250 |
residual shortwave under ice at tracer point |
251 |
C Qsw :: Net upward shortwave radiation in W/m^2 |
252 |
C Qsw = - ( downward - ice and snow absorption - reflected ) |
253 |
C > 0 for decrease in theta (ocean cooling) |
254 |
C Typical range: -350 < Qsw < 0 |
255 |
C Southwest C-grid tracer point |
256 |
|
257 |
heat flux (less shortwave) at tracer point |
258 |
C Qnet :: Net upward surface heat flux (including shortwave) in W/m^2 |
259 |
C Qnet = latent + sensible + net longwave + net shortwave |
260 |
C > 0 for decrease in theta (ocean cooling) |
261 |
C Typical range: -250 < Qnet < 600 |
262 |
C Southwest C-grid tracer point |
263 |
|
264 |
freshwater flux at tracer point |
265 |
C EmPmR :: Net upward freshwater flux in kg/m2/s |
266 |
C EmPmR = Evaporation - precipitation - runoff |
267 |
C > 0 for increase in salt (ocean salinity) |
268 |
C Typical range: -1e-4 < EmPmR < 1e-4 |
269 |
C Southwest C-grid tracer point |
270 |
C NOTE: for backward compatibility EmPmRfile is specified in |
271 |
C m/s when using external_fields_load.F. It is converted |
272 |
C to kg/m2/s by multiplying by rhoConstFresh. |
273 |
|
274 |
salt flux at tracer point |
275 |
C saltFlux :: Net upward salt flux in psu.kg/m^2/s |
276 |
C flux of Salt taken out of the ocean per time unit (second). |
277 |
C Note: a) only used when salty sea-ice forms or melts. |
278 |
C b) units: when salinity (unit= psu) is expressed |
279 |
C in g/kg, saltFlux unit becomes g/m^2/s. |
280 |
C > 0 for decrease in SSS. |
281 |
C Southwest C-grid tracer point |
282 |
|
283 |
=========================================================== |
284 |
|
285 |
4a. ice model steps forward by deltatimestep |
286 |
initially hardwired to 20 minutes |
287 |
|
288 |
4b. ocean model receives 3. and steps forward by deltatimestep |
289 |
initially hardwired to 20 minutes |
290 |
|
291 |
=========================================================== |
292 |
|
293 |
5a. ocean sends on tracer grid |
294 |
timestep |
295 |
open boundary ice area at tracer point |
296 |
open boundary ice thickness at tracer point |
297 |
open boundary snow thickness at tracer point |
298 |
open boundary ice salinity at tracer point |
299 |
open boundary u-ice velocity (see 2.) |
300 |
open boundary v-ice velocity (see 2.) |
301 |
10-m u-wind (see 2.) |
302 |
10-m v-wind (see 2.) |
303 |
downward longwave (see 2.) |
304 |
downward shortwave (see 2.) |
305 |
2-m air temperature (see 2.) |
306 |
2-m humidity (see 2.) |
307 |
precipitation (see 2.) |
308 |
sea surface temperature (see 2.) |
309 |
sea surface u-vel (see 2.) |
310 |
sea surface v-vel (see 2.) |
311 |
|
312 |
=========================================================== |
313 |
|
314 |
5b. ice sends on tracer grid |
315 |
|
316 |
ice model time (s) |
317 |
ice area at tracer point |
318 |
ice thickness at tracer point |
319 |
ice salinity at tracer point |
320 |
snow thickness at tracer point |
321 |
u-stress under ice at southwest b-grid locations |
322 |
v-stress under ice at southwest b-grid locations |
323 |
residual shortwave under ice at tracer point |
324 |
heat flux (less shortwave) at tracer point |
325 |
freshwater flux at tracer point |
326 |
salt flux at tracer point |
327 |
|
328 |
=========================================================== |
329 |
|
330 |
6a. ocean model receives 5b. and steps forward by deltatimestep |
331 |
initially hardwired to 20 minutes |
332 |
|
333 |
6b. ice model receives 5a. steps forward by deltatimestep |
334 |
initially hardwired to 20 minutes |
335 |
|
336 |
=========================================================== |
337 |
|
338 |
LOOP to 5a. and 5b. |