/[MITgcm]/MITgcm/pkg/exf/exf_fields.h
ViewVC logotype

Contents of /MITgcm/pkg/exf/exf_fields.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.1.4.7 - (show annotations) (download)
Thu May 22 20:49:14 2003 UTC (20 years, 11 months ago) by dimitri
Branch: release1
CVS Tags: release1_p16, release1_p17
Changes since 1.1.4.6: +2 -2 lines
File MIME type: text/plain
release1_p16
o fixed gather/scatter inital MPI dialogue in ini_procs.F
o pkg/seaice/lsr.F has been moved to SouthWest B-grid location
  and has been made the default dynamic solver because of its
  fast convergence properties relative to adi.F solver.

1 c $Header: /u/gcmpack/MITgcm/pkg/exf/exf_fields.h,v 1.1.4.6 2003/02/09 15:11:51 dimitri Exp $
2 c
3 c
4 c ==================================================================
5 c HEADER exf_fields
6 c ==================================================================
7 c
8 c o Header file for the surface flux data.
9 c
10 c started: Ralf.Giering@FastOpt.de 25-Mai-2000
11 c changed: field swap in adj. mode; heimbach@mit.edu 10-Jan-2002
12 c included runoff D. Stammer, Nov. 25, 2001
13 c mods for pkg/seaice: menemenlis@jpl.nasa.gov 20-Dec-2002
14 c
15 c ==================================================================
16 c HEADER exf_fields
17 c ==================================================================
18 c
19 c
20 c Field definitions, units, and sign conventions:
21 c ===============================================
22 c
23 c ustress :: Zonal surface wind stress in N/m^2
24 c > 0 for increase in uVel, which is west to
25 c east for cartesian and spherical polar grids
26 c Typical range: -0.5 < ustress < 0.5
27 c Southwest C-grid U point
28 c Input field
29 c
30 c vstress :: Meridional surface wind stress in N/m^2
31 c > 0 for increase in vVel, which is south to
32 c north for cartesian and spherical polar grids
33 c Typical range: -0.5 < vstress < 0.5
34 c Southwest C-grid V point
35 c Input field
36 c
37 c hflux :: Net upward surface heat flux excluding shortwave in W/m^2
38 c hflux = latent + sensible + lwflux
39 c > 0 for decrease in theta (ocean cooling)
40 c Typical range: -250 < hflux < 600
41 c Southwest C-grid tracer point
42 c Input field
43 c
44 c sflux :: Net upward freshwater flux in m/s
45 c sflux = evap - precip - runoff
46 c > 0 for increase in salt (ocean salinity)
47 c Typical range: -1e-7 < sflux < 1e-7
48 c Southwest C-grid tracer point
49 c Input field
50 c
51 c swflux :: Net upward shortwave radiation in W/m^2
52 c swflux = - ( swdown - ice and snow absorption - reflected )
53 c > 0 for decrease in theta (ocean cooling)
54 c Typical range: -350 < swflux < 0
55 c Southwest C-grid tracer point
56 c Input field
57 c
58 c uwind :: Surface (10-m) zonal wind velocity in m/s
59 c > 0 for increase in uVel, which is west to
60 c east for cartesian and spherical polar grids
61 c Typical range: -10 < uwind < 10
62 c Southwest C-grid U point
63 c Input or input/output field
64 c
65 c vwind :: Surface (10-m) meridional wind velocity in m/s
66 c > 0 for increase in vVel, which is south to
67 c north for cartesian and spherical polar grids
68 c Typical range: -10 < vwind < 10
69 c Southwest C-grid V point
70 c Input or input/output field
71 c
72 c atemp :: Surface (2-m) air temperature in deg K
73 c Typical range: 200 < atemp < 300
74 c Southwest C-grid tracer point
75 c Input or input/output field
76 c
77 c aqh :: Surface (2m) specific humidity in kg/kg
78 c Typical range: 0 < aqh < 0.02
79 c Southwest C-grid tracer point
80 c Input or input/output field
81 c
82 c lwflux :: Net upward longwave radiation in W/m^2
83 c lwflux = - ( lwdown - ice and snow absorption - emitted )
84 c > 0 for decrease in theta (ocean cooling)
85 c Typical range: -20 < lwflux < 170
86 c Southwest C-grid tracer point
87 c Input field
88 c
89 c evap :: Evaporation in m/s
90 c > 0 for increase in salt (ocean salinity)
91 c Typical range: 0 < evap < 2.5e-7
92 c Southwest C-grid tracer point
93 c Input, input/output, or output field
94 c
95 c precip :: Precipitation in m/s
96 c > 0 for decrease in salt (ocean salinity)
97 c Typical range: 0 < precip < 5e-7
98 c Southwest C-grid tracer point
99 c Input or input/output field
100 c
101 c runoff :: River and glacier runoff in m/s
102 c > 0 for decrease in salt (ocean salinity)
103 c Typical range: 0 < runoff < ????
104 c Southwest C-grid tracer point
105 c Input or input/output field
106 c !!! WATCH OUT: Default exf_inscal_runoff !!!
107 c !!! in exf_readparms.F is not 1.0 !!!
108 c
109 c swdown :: Downward shortwave radiation in W/m^2
110 c > 0 for increase in theta (ocean warming)
111 c Typical range: 0 < swdown < 450
112 c Southwest C-grid tracer point
113 c Input/output field
114 c
115 c lwdown :: Downward longwave radiation in W/m^2
116 c > 0 for increase in theta (ocean warming)
117 c Typical range: 50 < lwdown < 450
118 c Southwest C-grid tracer point
119 c Input/output field
120 c
121 c apressure :: Atmospheric pressure field in N/m^2
122 c > 0 for ????
123 c Typical range: ???? < apressure < ????
124 c Southwest C-grid tracer point
125 c Input field
126 c
127 c
128 c NOTES:
129 c ======
130 c
131 c Input and output units and sign conventions can be customized
132 c using variables exf_inscal_* and exf_outscal_*, which are set
133 c by exf_readparms.F
134 c
135 c Output fields fu, fv, Qnet, Qsw, and EmPmR are
136 c defined in FFIELDS.h
137 c
138 c #ifndef SHORTWAVE_HEATING, hflux includes shortwave,
139 c that is, hflux = latent + sensible + lwflux +swflux
140 c
141 c If (EXFwindOnBgrid .EQ. .TRUE.), uwind and vwind are
142 c defined on southwest B-grid U and V points, respectively.
143 c
144 c Arrays *0 and *1 below are used for temporal interpolation.
145 c
146
147 common /exf_stress_r/ ustress, vstress
148 _RL ustress (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
149 _RL vstress (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
150
151 #ifdef ALLOW_ATM_WIND
152 common /exf_atm_wind_r/ uwind, vwind
153 _RL uwind (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
154 _RL vwind (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
155 common /exfl_uwind_r/ uwind0, uwind1
156 _RL uwind0 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
157 _RL uwind1 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
158 common /exfl_vwind_r/ vwind0, vwind1
159 _RL vwind0 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
160 _RL vwind1 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
161 #else
162 common /exfl_ustress_r/ ustress0, ustress1
163 _RL ustress0 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
164 _RL ustress1 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
165 common /exfl_vstress_r/ vstress0, vstress1
166 _RL vstress0 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
167 _RL vstress1 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
168 #endif
169
170 common /exf_hsflux_r/ hflux, sflux
171 _RL hflux (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
172 _RL sflux (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
173
174 #if defined(ALLOW_ATM_TEMP) || defined(EXF_READ_EVAP)
175 common /exf_evap/ evap
176 _RL evap (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
177 #endif
178
179 #ifdef ALLOW_ATM_TEMP
180 common /exf_atm_temp_r/ atemp, aqh, lwflux, precip
181 _RL atemp (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
182 _RL aqh (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
183 _RL lwflux (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
184 _RL precip (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
185 common /exfl_atemp_r/ atemp0, atemp1
186 _RL atemp0 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
187 _RL atemp1 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
188 common /exfl_aqh_r/ aqh0, aqh1
189 _RL aqh0 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
190 _RL aqh1 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
191 common /exfl_lwflux_r/ lwflux0, lwflux1
192 _RL lwflux0 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
193 _RL lwflux1 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
194 common /exfl_precip_r/ precip0, precip1
195 _RL precip0 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
196 _RL precip1 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
197 #else
198 common /exfl_hflux_r/ hflux0, hflux1
199 _RL hflux0 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
200 _RL hflux1 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
201 common /exfl_sflux_r/ sflux0, sflux1
202 _RL sflux0 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
203 _RL sflux1 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
204 #endif
205
206 #if defined(ALLOW_ATM_TEMP) || defined(SHORTWAVE_HEATING)
207 common /exf_swflux_r/ swflux
208 _RL swflux (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
209 common /exfl_swflux_r/ swflux0, swflux1
210 _RL swflux0 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
211 _RL swflux1 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
212 #endif
213
214 #ifdef EXF_READ_EVAP
215 common /exfl_evap_r/ evap0, evap1
216 _RL evap0 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
217 _RL evap1 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
218 #endif
219
220 #if defined (ALLOW_RUNOFF) || defined (ALLOW_SEAICE)
221 common /exfl_runoff_r/ runoff
222 _RL runoff (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
223 #endif
224
225 #ifdef ALLOW_DOWNWARD_RADIATION
226 common /exf_rad_down_r/
227 & swdown, lwdown, swdown0, swdown1, lwdown0, lwdown1
228 _RL swdown (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
229 _RL lwdown (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
230 _RL swdown0 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
231 _RL swdown1 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
232 _RL lwdown0 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
233 _RL lwdown1 (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
234 #endif
235
236 #ifdef ATMOSPHERIC_LOADING
237 common /exf_apressure_r/ apressure, apressure0, apressure1
238 _RL apressure (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
239 _RL apressure0(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
240 _RL apressure1(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
241 #endif

  ViewVC Help
Powered by ViewVC 1.1.22