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

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

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


Revision 1.8 - (hide annotations) (download)
Thu Aug 7 02:31:29 2003 UTC (20 years, 9 months ago) by dimitri
Branch: MAIN
CVS Tags: checkpoint51k_post, checkpoint51l_post, checkpoint51j_post, checkpoint52l_pre, checkpoint52e_pre, hrcube4, checkpoint52j_post, checkpoint51o_pre, checkpoint52e_post, checkpoint51n_pre, checkpoint52d_pre, checkpoint51f_pre, branchpoint-genmake2, checkpoint52j_pre, branch-netcdf, checkpoint51r_post, checkpoint52b_pre, checkpoint51i_post, checkpoint51l_pre, hrcube5, checkpoint51o_post, checkpoint51q_post, checkpoint52l_post, checkpoint52k_post, checkpoint52, checkpoint52d_post, checkpoint52a_post, checkpoint52b_post, checkpoint52f_post, checkpoint52c_post, checkpoint51h_pre, checkpoint51g_post, ecco_c52_e35, checkpoint51f_post, checkpoint52a_pre, checkpoint51m_post, checkpoint51t_post, checkpoint52i_post, checkpoint51p_post, checkpoint51n_post, checkpoint51i_pre, checkpoint52i_pre, checkpoint51u_post, checkpoint52h_pre, checkpoint52f_pre, hrcube_1, hrcube_2, hrcube_3, checkpoint51s_post
Branch point for: netcdf-sm0, branch-genmake2, branch-nonh, tg2-branch, checkpoint51n_branch
Changes since 1.7: +6 -20 lines
File MIME type: text/plain
o Added on-the-fly spatial interpolation capability
    "USE_EXF_INTERPOLATION" to pkg/exf.
  - This is a temporary Cartesian-grid hack until
    the super-duper ESMF coupler becomes available.
  - See verification/global_with_exf/README for usage example.
  - Removed obsolete EXFwindOnBgrid and SEAICEwindOnCgrid
    flags and modified pkg/seaice accordingly.
o Bug fix to pkg/ptracers, pkg/generic_advdiff/gad_calc_rhs.F,
    and pkg/kpp/kpp_transport_ptr.F for dealing with tracer
    non-local transport term.

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

  ViewVC Help
Powered by ViewVC 1.1.22