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