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