1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
| // Generated automatically by cvmix.awk from
// /home/basilisk-src/local/src/CVMix-src/src/shared/cvmix_kinds_and_types.F90
typedef struct {
integer opaque0; // nlev
integer opaque1; // max_nlev
cvmix_r8 opaque2; // oceandepth
cvmix_r8 opaque3; // boundarylayerdepth
cvmix_r8 opaque4; // seasurfaceheight
cvmix_r8 opaque5; // surfacefriction
cvmix_r8 opaque6; // surfacebuoyancyforcing
cvmix_r8 opaque7; // lat
cvmix_r8 opaque8; // lon
cvmix_r8 opaque9; // coriolis
cvmix_r8 opaque10; // kobl_depth
cvmix_r8 opaque11; // langmuirenhancementfactor
cvmix_r8 opaque12; // langmuirnumber
cvmix_r8 opaque13; // simmonscoeff
cvmix_1d opaque14; // zw_iface
cvmix_1d opaque15; // dzw
cvmix_1d opaque16; // mdiff_iface
cvmix_1d opaque17; // tdiff_iface
cvmix_1d opaque18; // sdiff_iface
cvmix_1d opaque19; // shearrichardson_iface
cvmix_1d opaque20; // sqrbuoyancyfreq_iface
cvmix_1d opaque21; // vertdep_iface
cvmix_1d opaque22; // schmittnercoeff
cvmix_1d opaque23; // schmittnersouthernocean
cvmix_2d opaque24; // exp_hab_zetar
cvmix_1d opaque25; // kpp_tnonlocal_iface
cvmix_1d opaque26; // kpp_snonlocal_iface
cvmix_1d opaque27; // zt_cntr
cvmix_1d opaque28; // dzt
cvmix_1d opaque29; // waterdensity_cntr
cvmix_1d opaque30; // adiabwaterdensity_cntr
cvmix_1d opaque31; // bulkrichardson_cntr
cvmix_1d opaque32; // strat_param_num
cvmix_1d opaque33; // strat_param_denom
cvmix_1d opaque34; // vx_cntr
cvmix_1d opaque35; // vy_cntr
} cvmix_data_type;
extern void cvmix_data_type_set_nlev_ (cvmix_data_type * p, integer * v);
static inline void cvmix_data_type_set_nlev (cvmix_data_type * p, integer v) {
cvmix_data_type_set_nlev_ (p, &v);
}
extern integer cvmix_data_type_get_nlev_ (cvmix_data_type * p);
#define cvmix_set_nlev(p,v) cvmix_data_type_set_nlev(p,v)
#define cvmix_get_nlev(p) cvmix_data_type_get_nlev_(p)
extern void cvmix_data_type_set_max_nlev_ (cvmix_data_type * p, integer * v);
static inline void cvmix_data_type_set_max_nlev (cvmix_data_type * p, integer v) {
cvmix_data_type_set_max_nlev_ (p, &v);
}
extern integer cvmix_data_type_get_max_nlev_ (cvmix_data_type * p);
#define cvmix_set_max_nlev(p,v) cvmix_data_type_set_max_nlev(p,v)
#define cvmix_get_max_nlev(p) cvmix_data_type_get_max_nlev_(p)
extern void cvmix_data_type_set_oceandepth_ (cvmix_data_type * p, cvmix_r8 * v);
static inline void cvmix_data_type_set_oceandepth (cvmix_data_type * p, cvmix_r8 v) {
cvmix_data_type_set_oceandepth_ (p, &v);
}
extern cvmix_r8 cvmix_data_type_get_oceandepth_ (cvmix_data_type * p);
#define cvmix_set_oceandepth(p,v) cvmix_data_type_set_oceandepth(p,v)
#define cvmix_get_oceandepth(p) cvmix_data_type_get_oceandepth_(p)
extern void cvmix_data_type_set_boundarylayerdepth_ (cvmix_data_type * p, cvmix_r8 * v);
static inline void cvmix_data_type_set_boundarylayerdepth (cvmix_data_type * p, cvmix_r8 v) {
cvmix_data_type_set_boundarylayerdepth_ (p, &v);
}
extern cvmix_r8 cvmix_data_type_get_boundarylayerdepth_ (cvmix_data_type * p);
#define cvmix_set_boundarylayerdepth(p,v) cvmix_data_type_set_boundarylayerdepth(p,v)
#define cvmix_get_boundarylayerdepth(p) cvmix_data_type_get_boundarylayerdepth_(p)
extern void cvmix_data_type_set_seasurfaceheight_ (cvmix_data_type * p, cvmix_r8 * v);
static inline void cvmix_data_type_set_seasurfaceheight (cvmix_data_type * p, cvmix_r8 v) {
cvmix_data_type_set_seasurfaceheight_ (p, &v);
}
extern cvmix_r8 cvmix_data_type_get_seasurfaceheight_ (cvmix_data_type * p);
#define cvmix_set_seasurfaceheight(p,v) cvmix_data_type_set_seasurfaceheight(p,v)
#define cvmix_get_seasurfaceheight(p) cvmix_data_type_get_seasurfaceheight_(p)
extern void cvmix_data_type_set_surfacefriction_ (cvmix_data_type * p, cvmix_r8 * v);
static inline void cvmix_data_type_set_surfacefriction (cvmix_data_type * p, cvmix_r8 v) {
cvmix_data_type_set_surfacefriction_ (p, &v);
}
extern cvmix_r8 cvmix_data_type_get_surfacefriction_ (cvmix_data_type * p);
#define cvmix_set_surfacefriction(p,v) cvmix_data_type_set_surfacefriction(p,v)
#define cvmix_get_surfacefriction(p) cvmix_data_type_get_surfacefriction_(p)
extern void cvmix_data_type_set_surfacebuoyancyforcing_ (cvmix_data_type * p, cvmix_r8 * v);
static inline void cvmix_data_type_set_surfacebuoyancyforcing (cvmix_data_type * p, cvmix_r8 v) {
cvmix_data_type_set_surfacebuoyancyforcing_ (p, &v);
}
extern cvmix_r8 cvmix_data_type_get_surfacebuoyancyforcing_ (cvmix_data_type * p);
#define cvmix_set_surfacebuoyancyforcing(p,v) cvmix_data_type_set_surfacebuoyancyforcing(p,v)
#define cvmix_get_surfacebuoyancyforcing(p) cvmix_data_type_get_surfacebuoyancyforcing_(p)
extern void cvmix_data_type_set_lat_ (cvmix_data_type * p, cvmix_r8 * v);
static inline void cvmix_data_type_set_lat (cvmix_data_type * p, cvmix_r8 v) {
cvmix_data_type_set_lat_ (p, &v);
}
extern cvmix_r8 cvmix_data_type_get_lat_ (cvmix_data_type * p);
#define cvmix_set_lat(p,v) cvmix_data_type_set_lat(p,v)
#define cvmix_get_lat(p) cvmix_data_type_get_lat_(p)
extern void cvmix_data_type_set_lon_ (cvmix_data_type * p, cvmix_r8 * v);
static inline void cvmix_data_type_set_lon (cvmix_data_type * p, cvmix_r8 v) {
cvmix_data_type_set_lon_ (p, &v);
}
extern cvmix_r8 cvmix_data_type_get_lon_ (cvmix_data_type * p);
#define cvmix_set_lon(p,v) cvmix_data_type_set_lon(p,v)
#define cvmix_get_lon(p) cvmix_data_type_get_lon_(p)
extern void cvmix_data_type_set_coriolis_ (cvmix_data_type * p, cvmix_r8 * v);
static inline void cvmix_data_type_set_coriolis (cvmix_data_type * p, cvmix_r8 v) {
cvmix_data_type_set_coriolis_ (p, &v);
}
extern cvmix_r8 cvmix_data_type_get_coriolis_ (cvmix_data_type * p);
#define cvmix_set_coriolis(p,v) cvmix_data_type_set_coriolis(p,v)
#define cvmix_get_coriolis(p) cvmix_data_type_get_coriolis_(p)
extern void cvmix_data_type_set_kobl_depth_ (cvmix_data_type * p, cvmix_r8 * v);
static inline void cvmix_data_type_set_kobl_depth (cvmix_data_type * p, cvmix_r8 v) {
cvmix_data_type_set_kobl_depth_ (p, &v);
}
extern cvmix_r8 cvmix_data_type_get_kobl_depth_ (cvmix_data_type * p);
#define cvmix_set_kobl_depth(p,v) cvmix_data_type_set_kobl_depth(p,v)
#define cvmix_get_kobl_depth(p) cvmix_data_type_get_kobl_depth_(p)
extern void cvmix_data_type_set_langmuirenhancementfactor_ (cvmix_data_type * p, cvmix_r8 * v);
static inline void cvmix_data_type_set_langmuirenhancementfactor (cvmix_data_type * p, cvmix_r8 v) {
cvmix_data_type_set_langmuirenhancementfactor_ (p, &v);
}
extern cvmix_r8 cvmix_data_type_get_langmuirenhancementfactor_ (cvmix_data_type * p);
#define cvmix_set_langmuirenhancementfactor(p,v) cvmix_data_type_set_langmuirenhancementfactor(p,v)
#define cvmix_get_langmuirenhancementfactor(p) cvmix_data_type_get_langmuirenhancementfactor_(p)
extern void cvmix_data_type_set_langmuirnumber_ (cvmix_data_type * p, cvmix_r8 * v);
static inline void cvmix_data_type_set_langmuirnumber (cvmix_data_type * p, cvmix_r8 v) {
cvmix_data_type_set_langmuirnumber_ (p, &v);
}
extern cvmix_r8 cvmix_data_type_get_langmuirnumber_ (cvmix_data_type * p);
#define cvmix_set_langmuirnumber(p,v) cvmix_data_type_set_langmuirnumber(p,v)
#define cvmix_get_langmuirnumber(p) cvmix_data_type_get_langmuirnumber_(p)
extern void cvmix_data_type_set_simmonscoeff_ (cvmix_data_type * p, cvmix_r8 * v);
static inline void cvmix_data_type_set_simmonscoeff (cvmix_data_type * p, cvmix_r8 v) {
cvmix_data_type_set_simmonscoeff_ (p, &v);
}
extern cvmix_r8 cvmix_data_type_get_simmonscoeff_ (cvmix_data_type * p);
#define cvmix_set_simmonscoeff(p,v) cvmix_data_type_set_simmonscoeff(p,v)
#define cvmix_get_simmonscoeff(p) cvmix_data_type_get_simmonscoeff_(p)
extern void cvmix_data_type_set_zw_iface_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_zw_iface (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_zw_iface_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_zw_iface_ (cvmix_data_type * p);
#define cvmix_set_zw_iface(p,v) cvmix_data_type_set_zw_iface(p,v)
#define cvmix_get_zw_iface(p) cvmix_data_type_get_zw_iface_(p)
extern void cvmix_data_type_set_dzw_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_dzw (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_dzw_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_dzw_ (cvmix_data_type * p);
#define cvmix_set_dzw(p,v) cvmix_data_type_set_dzw(p,v)
#define cvmix_get_dzw(p) cvmix_data_type_get_dzw_(p)
extern void cvmix_data_type_set_mdiff_iface_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_mdiff_iface (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_mdiff_iface_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_mdiff_iface_ (cvmix_data_type * p);
#define cvmix_set_mdiff_iface(p,v) cvmix_data_type_set_mdiff_iface(p,v)
#define cvmix_get_mdiff_iface(p) cvmix_data_type_get_mdiff_iface_(p)
extern void cvmix_data_type_set_tdiff_iface_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_tdiff_iface (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_tdiff_iface_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_tdiff_iface_ (cvmix_data_type * p);
#define cvmix_set_tdiff_iface(p,v) cvmix_data_type_set_tdiff_iface(p,v)
#define cvmix_get_tdiff_iface(p) cvmix_data_type_get_tdiff_iface_(p)
extern void cvmix_data_type_set_sdiff_iface_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_sdiff_iface (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_sdiff_iface_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_sdiff_iface_ (cvmix_data_type * p);
#define cvmix_set_sdiff_iface(p,v) cvmix_data_type_set_sdiff_iface(p,v)
#define cvmix_get_sdiff_iface(p) cvmix_data_type_get_sdiff_iface_(p)
extern void cvmix_data_type_set_shearrichardson_iface_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_shearrichardson_iface (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_shearrichardson_iface_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_shearrichardson_iface_ (cvmix_data_type * p);
#define cvmix_set_shearrichardson_iface(p,v) cvmix_data_type_set_shearrichardson_iface(p,v)
#define cvmix_get_shearrichardson_iface(p) cvmix_data_type_get_shearrichardson_iface_(p)
extern void cvmix_data_type_set_sqrbuoyancyfreq_iface_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_sqrbuoyancyfreq_iface (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_sqrbuoyancyfreq_iface_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_sqrbuoyancyfreq_iface_ (cvmix_data_type * p);
#define cvmix_set_sqrbuoyancyfreq_iface(p,v) cvmix_data_type_set_sqrbuoyancyfreq_iface(p,v)
#define cvmix_get_sqrbuoyancyfreq_iface(p) cvmix_data_type_get_sqrbuoyancyfreq_iface_(p)
extern void cvmix_data_type_set_vertdep_iface_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_vertdep_iface (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_vertdep_iface_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_vertdep_iface_ (cvmix_data_type * p);
#define cvmix_set_vertdep_iface(p,v) cvmix_data_type_set_vertdep_iface(p,v)
#define cvmix_get_vertdep_iface(p) cvmix_data_type_get_vertdep_iface_(p)
extern void cvmix_data_type_set_schmittnercoeff_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_schmittnercoeff (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_schmittnercoeff_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_schmittnercoeff_ (cvmix_data_type * p);
#define cvmix_set_schmittnercoeff(p,v) cvmix_data_type_set_schmittnercoeff(p,v)
#define cvmix_get_schmittnercoeff(p) cvmix_data_type_get_schmittnercoeff_(p)
extern void cvmix_data_type_set_schmittnersouthernocean_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_schmittnersouthernocean (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_schmittnersouthernocean_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_schmittnersouthernocean_ (cvmix_data_type * p);
#define cvmix_set_schmittnersouthernocean(p,v) cvmix_data_type_set_schmittnersouthernocean(p,v)
#define cvmix_get_schmittnersouthernocean(p) cvmix_data_type_get_schmittnersouthernocean_(p)
extern void cvmix_data_type_set_exp_hab_zetar_ (cvmix_data_type * p, cvmix_2d * v);
static inline void cvmix_data_type_set_exp_hab_zetar (cvmix_data_type * p, cvmix_2d v) {
cvmix_data_type_set_exp_hab_zetar_ (p, &v);
}
extern cvmix_2d cvmix_data_type_get_exp_hab_zetar_ (cvmix_data_type * p);
#define cvmix_set_exp_hab_zetar(p,v) cvmix_data_type_set_exp_hab_zetar(p,v)
#define cvmix_get_exp_hab_zetar(p) cvmix_data_type_get_exp_hab_zetar_(p)
extern void cvmix_data_type_set_kpp_tnonlocal_iface_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_kpp_tnonlocal_iface (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_kpp_tnonlocal_iface_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_kpp_tnonlocal_iface_ (cvmix_data_type * p);
#define cvmix_set_kpp_tnonlocal_iface(p,v) cvmix_data_type_set_kpp_tnonlocal_iface(p,v)
#define cvmix_get_kpp_tnonlocal_iface(p) cvmix_data_type_get_kpp_tnonlocal_iface_(p)
extern void cvmix_data_type_set_kpp_snonlocal_iface_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_kpp_snonlocal_iface (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_kpp_snonlocal_iface_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_kpp_snonlocal_iface_ (cvmix_data_type * p);
#define cvmix_set_kpp_snonlocal_iface(p,v) cvmix_data_type_set_kpp_snonlocal_iface(p,v)
#define cvmix_get_kpp_snonlocal_iface(p) cvmix_data_type_get_kpp_snonlocal_iface_(p)
extern void cvmix_data_type_set_zt_cntr_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_zt_cntr (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_zt_cntr_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_zt_cntr_ (cvmix_data_type * p);
#define cvmix_set_zt_cntr(p,v) cvmix_data_type_set_zt_cntr(p,v)
#define cvmix_get_zt_cntr(p) cvmix_data_type_get_zt_cntr_(p)
extern void cvmix_data_type_set_dzt_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_dzt (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_dzt_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_dzt_ (cvmix_data_type * p);
#define cvmix_set_dzt(p,v) cvmix_data_type_set_dzt(p,v)
#define cvmix_get_dzt(p) cvmix_data_type_get_dzt_(p)
extern void cvmix_data_type_set_waterdensity_cntr_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_waterdensity_cntr (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_waterdensity_cntr_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_waterdensity_cntr_ (cvmix_data_type * p);
#define cvmix_set_waterdensity_cntr(p,v) cvmix_data_type_set_waterdensity_cntr(p,v)
#define cvmix_get_waterdensity_cntr(p) cvmix_data_type_get_waterdensity_cntr_(p)
extern void cvmix_data_type_set_adiabwaterdensity_cntr_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_adiabwaterdensity_cntr (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_adiabwaterdensity_cntr_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_adiabwaterdensity_cntr_ (cvmix_data_type * p);
#define cvmix_set_adiabwaterdensity_cntr(p,v) cvmix_data_type_set_adiabwaterdensity_cntr(p,v)
#define cvmix_get_adiabwaterdensity_cntr(p) cvmix_data_type_get_adiabwaterdensity_cntr_(p)
extern void cvmix_data_type_set_bulkrichardson_cntr_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_bulkrichardson_cntr (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_bulkrichardson_cntr_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_bulkrichardson_cntr_ (cvmix_data_type * p);
#define cvmix_set_bulkrichardson_cntr(p,v) cvmix_data_type_set_bulkrichardson_cntr(p,v)
#define cvmix_get_bulkrichardson_cntr(p) cvmix_data_type_get_bulkrichardson_cntr_(p)
extern void cvmix_data_type_set_strat_param_num_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_strat_param_num (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_strat_param_num_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_strat_param_num_ (cvmix_data_type * p);
#define cvmix_set_strat_param_num(p,v) cvmix_data_type_set_strat_param_num(p,v)
#define cvmix_get_strat_param_num(p) cvmix_data_type_get_strat_param_num_(p)
extern void cvmix_data_type_set_strat_param_denom_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_strat_param_denom (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_strat_param_denom_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_strat_param_denom_ (cvmix_data_type * p);
#define cvmix_set_strat_param_denom(p,v) cvmix_data_type_set_strat_param_denom(p,v)
#define cvmix_get_strat_param_denom(p) cvmix_data_type_get_strat_param_denom_(p)
extern void cvmix_data_type_set_vx_cntr_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_vx_cntr (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_vx_cntr_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_vx_cntr_ (cvmix_data_type * p);
#define cvmix_set_vx_cntr(p,v) cvmix_data_type_set_vx_cntr(p,v)
#define cvmix_get_vx_cntr(p) cvmix_data_type_get_vx_cntr_(p)
extern void cvmix_data_type_set_vy_cntr_ (cvmix_data_type * p, cvmix_1d * v);
static inline void cvmix_data_type_set_vy_cntr (cvmix_data_type * p, cvmix_1d v) {
cvmix_data_type_set_vy_cntr_ (p, &v);
}
extern cvmix_1d cvmix_data_type_get_vy_cntr_ (cvmix_data_type * p);
#define cvmix_set_vy_cntr(p,v) cvmix_data_type_set_vy_cntr(p,v)
#define cvmix_get_vy_cntr(p) cvmix_data_type_get_vy_cntr_(p)
typedef struct {
integer opaque0; // max_nlev
cvmix_r8 opaque1; // gravity
cvmix_r8 opaque2; // prandtl
cvmix_r8 opaque3; // freshwaterdensity
cvmix_r8 opaque4; // saltwaterdensity
} cvmix_global_params_type;
extern void cvmix_global_params_type_set_max_nlev_ (cvmix_global_params_type * p, integer * v);
static inline void cvmix_global_params_type_set_max_nlev (cvmix_global_params_type * p, integer v) {
cvmix_global_params_type_set_max_nlev_ (p, &v);
}
extern integer cvmix_global_params_type_get_max_nlev_ (cvmix_global_params_type * p);
extern void cvmix_global_params_type_set_gravity_ (cvmix_global_params_type * p, cvmix_r8 * v);
static inline void cvmix_global_params_type_set_gravity (cvmix_global_params_type * p, cvmix_r8 v) {
cvmix_global_params_type_set_gravity_ (p, &v);
}
extern cvmix_r8 cvmix_global_params_type_get_gravity_ (cvmix_global_params_type * p);
extern void cvmix_global_params_type_set_prandtl_ (cvmix_global_params_type * p, cvmix_r8 * v);
static inline void cvmix_global_params_type_set_prandtl (cvmix_global_params_type * p, cvmix_r8 v) {
cvmix_global_params_type_set_prandtl_ (p, &v);
}
extern cvmix_r8 cvmix_global_params_type_get_prandtl_ (cvmix_global_params_type * p);
extern void cvmix_global_params_type_set_freshwaterdensity_ (cvmix_global_params_type * p, cvmix_r8 * v);
static inline void cvmix_global_params_type_set_freshwaterdensity (cvmix_global_params_type * p, cvmix_r8 v) {
cvmix_global_params_type_set_freshwaterdensity_ (p, &v);
}
extern cvmix_r8 cvmix_global_params_type_get_freshwaterdensity_ (cvmix_global_params_type * p);
extern void cvmix_global_params_type_set_saltwaterdensity_ (cvmix_global_params_type * p, cvmix_r8 * v);
static inline void cvmix_global_params_type_set_saltwaterdensity (cvmix_global_params_type * p, cvmix_r8 v) {
cvmix_global_params_type_set_saltwaterdensity_ (p, &v);
}
extern cvmix_r8 cvmix_global_params_type_get_saltwaterdensity_ (cvmix_global_params_type * p);
|
