source: XIOS/dev/XIOS_DEV_CMIP6/src/interface/c_attr/icdomain_attr.cpp @ 2250

Last change on this file since 2250 was 1492, checked in by oabramkina, 6 years ago

Updating fortran interface for attributes that have been recently introduced and the following filters:

duplicate_scalar_to_axis
reduce_axis_to_axis
reduce_scalar_to_scalar
reorder_domain
temporal_splitting.

  • Property copyright set to
    Software name : XIOS (Xml I/O Server)
    http://forge.ipsl.jussieu.fr/ioserver
    Creation date : January 2009
    Licence : CeCCIL version2
    see license file in root directory : Licence_CeCILL_V2-en.txt
    or http://www.cecill.info/licences/Licence_CeCILL_V2-en.html
    Holder : CEA/LSCE (Laboratoire des Sciences du CLimat et de l'Environnement)
    CNRS/IPSL (Institut Pierre Simon Laplace)
    Project Manager : Yann Meurdesoif
    yann.meurdesoif@cea.fr
  • Property svn:eol-style set to native
File size: 32.1 KB
RevLine 
[325]1/* ************************************************************************** *
[581]2 *               Interface auto generated - do not modify                     *
[325]3 * ************************************************************************** */
4
5#include <boost/multi_array.hpp>
6#include <boost/shared_ptr.hpp>
[591]7#include "xios.hpp"
[352]8#include "attribute_template.hpp"
9#include "object_template.hpp"
10#include "group_template.hpp"
[325]11#include "icutil.hpp"
[532]12#include "icdate.hpp"
[347]13#include "timer.hpp"
[369]14#include "node_type.hpp"
[325]15
16extern "C"
17{
[581]18  typedef xios::CDomain* domain_Ptr;
19
[674]20  void cxios_set_domain_area(domain_Ptr domain_hdl, double* area, int* extent)
[611]21  {
22    CTimer::get("XIOS").resume();
[674]23    CArray<double,2> tmp(area, shape(extent[0], extent[1]), neverDeleteData);
[611]24    domain_hdl->area.reference(tmp.copy());
25     CTimer::get("XIOS").suspend();
26  }
27
[674]28  void cxios_get_domain_area(domain_Ptr domain_hdl, double* area, int* extent)
[611]29  {
30    CTimer::get("XIOS").resume();
[674]31    CArray<double,2> tmp(area, shape(extent[0], extent[1]), neverDeleteData);
[611]32    tmp=domain_hdl->area.getInheritedValue();
33     CTimer::get("XIOS").suspend();
34  }
35
36  bool cxios_is_defined_domain_area(domain_Ptr domain_hdl)
37  {
38     CTimer::get("XIOS").resume();
39     bool isDefined = domain_hdl->area.hasInheritedValue();
40     CTimer::get("XIOS").suspend();
41     return isDefined;
42  }
43
44
[674]45  void cxios_set_domain_bounds_lat_1d(domain_Ptr domain_hdl, double* bounds_lat_1d, int* extent)
[449]46  {
47    CTimer::get("XIOS").resume();
[674]48    CArray<double,2> tmp(bounds_lat_1d, shape(extent[0], extent[1]), neverDeleteData);
[664]49    domain_hdl->bounds_lat_1d.reference(tmp.copy());
[449]50     CTimer::get("XIOS").suspend();
51  }
[581]52
[674]53  void cxios_get_domain_bounds_lat_1d(domain_Ptr domain_hdl, double* bounds_lat_1d, int* extent)
[449]54  {
55    CTimer::get("XIOS").resume();
[674]56    CArray<double,2> tmp(bounds_lat_1d, shape(extent[0], extent[1]), neverDeleteData);
[664]57    tmp=domain_hdl->bounds_lat_1d.getInheritedValue();
[449]58     CTimer::get("XIOS").suspend();
59  }
[581]60
[664]61  bool cxios_is_defined_domain_bounds_lat_1d(domain_Ptr domain_hdl)
[449]62  {
63     CTimer::get("XIOS").resume();
[664]64     bool isDefined = domain_hdl->bounds_lat_1d.hasInheritedValue();
[449]65     CTimer::get("XIOS").suspend();
[581]66     return isDefined;
[449]67  }
[581]68
69
[674]70  void cxios_set_domain_bounds_lat_2d(domain_Ptr domain_hdl, double* bounds_lat_2d, int* extent)
[449]71  {
72    CTimer::get("XIOS").resume();
[674]73    CArray<double,3> tmp(bounds_lat_2d, shape(extent[0], extent[1], extent[2]), neverDeleteData);
[664]74    domain_hdl->bounds_lat_2d.reference(tmp.copy());
[449]75     CTimer::get("XIOS").suspend();
76  }
[581]77
[674]78  void cxios_get_domain_bounds_lat_2d(domain_Ptr domain_hdl, double* bounds_lat_2d, int* extent)
[449]79  {
80    CTimer::get("XIOS").resume();
[674]81    CArray<double,3> tmp(bounds_lat_2d, shape(extent[0], extent[1], extent[2]), neverDeleteData);
[664]82    tmp=domain_hdl->bounds_lat_2d.getInheritedValue();
[449]83     CTimer::get("XIOS").suspend();
84  }
[581]85
[664]86  bool cxios_is_defined_domain_bounds_lat_2d(domain_Ptr domain_hdl)
[449]87  {
88     CTimer::get("XIOS").resume();
[664]89     bool isDefined = domain_hdl->bounds_lat_2d.hasInheritedValue();
[449]90     CTimer::get("XIOS").suspend();
[581]91     return isDefined;
[449]92  }
[581]93
94
[1492]95  void cxios_set_domain_bounds_lat_name(domain_Ptr domain_hdl, const char * bounds_lat_name, int bounds_lat_name_size)
96  {
97    std::string bounds_lat_name_str;
98    if (!cstr2string(bounds_lat_name, bounds_lat_name_size, bounds_lat_name_str)) return;
99    CTimer::get("XIOS").resume();
100    domain_hdl->bounds_lat_name.setValue(bounds_lat_name_str);
101    CTimer::get("XIOS").suspend();
102  }
103
104  void cxios_get_domain_bounds_lat_name(domain_Ptr domain_hdl, char * bounds_lat_name, int bounds_lat_name_size)
105  {
106    CTimer::get("XIOS").resume();
107    if (!string_copy(domain_hdl->bounds_lat_name.getInheritedValue(), bounds_lat_name, bounds_lat_name_size))
108      ERROR("void cxios_get_domain_bounds_lat_name(domain_Ptr domain_hdl, char * bounds_lat_name, int bounds_lat_name_size)", << "Input string is too short");
109    CTimer::get("XIOS").suspend();
110  }
111
112  bool cxios_is_defined_domain_bounds_lat_name(domain_Ptr domain_hdl)
113  {
114     CTimer::get("XIOS").resume();
115     bool isDefined = domain_hdl->bounds_lat_name.hasInheritedValue();
116     CTimer::get("XIOS").suspend();
117     return isDefined;
118  }
119
120
[674]121  void cxios_set_domain_bounds_lon_1d(domain_Ptr domain_hdl, double* bounds_lon_1d, int* extent)
[664]122  {
123    CTimer::get("XIOS").resume();
[674]124    CArray<double,2> tmp(bounds_lon_1d, shape(extent[0], extent[1]), neverDeleteData);
[664]125    domain_hdl->bounds_lon_1d.reference(tmp.copy());
126     CTimer::get("XIOS").suspend();
127  }
128
[674]129  void cxios_get_domain_bounds_lon_1d(domain_Ptr domain_hdl, double* bounds_lon_1d, int* extent)
[664]130  {
131    CTimer::get("XIOS").resume();
[674]132    CArray<double,2> tmp(bounds_lon_1d, shape(extent[0], extent[1]), neverDeleteData);
[664]133    tmp=domain_hdl->bounds_lon_1d.getInheritedValue();
134     CTimer::get("XIOS").suspend();
135  }
136
137  bool cxios_is_defined_domain_bounds_lon_1d(domain_Ptr domain_hdl)
138  {
139     CTimer::get("XIOS").resume();
140     bool isDefined = domain_hdl->bounds_lon_1d.hasInheritedValue();
141     CTimer::get("XIOS").suspend();
142     return isDefined;
143  }
144
145
[674]146  void cxios_set_domain_bounds_lon_2d(domain_Ptr domain_hdl, double* bounds_lon_2d, int* extent)
[664]147  {
148    CTimer::get("XIOS").resume();
[674]149    CArray<double,3> tmp(bounds_lon_2d, shape(extent[0], extent[1], extent[2]), neverDeleteData);
[664]150    domain_hdl->bounds_lon_2d.reference(tmp.copy());
151     CTimer::get("XIOS").suspend();
152  }
153
[674]154  void cxios_get_domain_bounds_lon_2d(domain_Ptr domain_hdl, double* bounds_lon_2d, int* extent)
[664]155  {
156    CTimer::get("XIOS").resume();
[674]157    CArray<double,3> tmp(bounds_lon_2d, shape(extent[0], extent[1], extent[2]), neverDeleteData);
[664]158    tmp=domain_hdl->bounds_lon_2d.getInheritedValue();
159     CTimer::get("XIOS").suspend();
160  }
161
162  bool cxios_is_defined_domain_bounds_lon_2d(domain_Ptr domain_hdl)
163  {
164     CTimer::get("XIOS").resume();
165     bool isDefined = domain_hdl->bounds_lon_2d.hasInheritedValue();
166     CTimer::get("XIOS").suspend();
167     return isDefined;
168  }
169
170
[1492]171  void cxios_set_domain_bounds_lon_name(domain_Ptr domain_hdl, const char * bounds_lon_name, int bounds_lon_name_size)
172  {
173    std::string bounds_lon_name_str;
174    if (!cstr2string(bounds_lon_name, bounds_lon_name_size, bounds_lon_name_str)) return;
175    CTimer::get("XIOS").resume();
176    domain_hdl->bounds_lon_name.setValue(bounds_lon_name_str);
177    CTimer::get("XIOS").suspend();
178  }
179
180  void cxios_get_domain_bounds_lon_name(domain_Ptr domain_hdl, char * bounds_lon_name, int bounds_lon_name_size)
181  {
182    CTimer::get("XIOS").resume();
183    if (!string_copy(domain_hdl->bounds_lon_name.getInheritedValue(), bounds_lon_name, bounds_lon_name_size))
184      ERROR("void cxios_get_domain_bounds_lon_name(domain_Ptr domain_hdl, char * bounds_lon_name, int bounds_lon_name_size)", << "Input string is too short");
185    CTimer::get("XIOS").suspend();
186  }
187
188  bool cxios_is_defined_domain_bounds_lon_name(domain_Ptr domain_hdl)
189  {
190     CTimer::get("XIOS").resume();
191     bool isDefined = domain_hdl->bounds_lon_name.hasInheritedValue();
192     CTimer::get("XIOS").suspend();
193     return isDefined;
194  }
195
196
197  void cxios_set_domain_comment(domain_Ptr domain_hdl, const char * comment, int comment_size)
198  {
199    std::string comment_str;
200    if (!cstr2string(comment, comment_size, comment_str)) return;
201    CTimer::get("XIOS").resume();
202    domain_hdl->comment.setValue(comment_str);
203    CTimer::get("XIOS").suspend();
204  }
205
206  void cxios_get_domain_comment(domain_Ptr domain_hdl, char * comment, int comment_size)
207  {
208    CTimer::get("XIOS").resume();
209    if (!string_copy(domain_hdl->comment.getInheritedValue(), comment, comment_size))
210      ERROR("void cxios_get_domain_comment(domain_Ptr domain_hdl, char * comment, int comment_size)", << "Input string is too short");
211    CTimer::get("XIOS").suspend();
212  }
213
214  bool cxios_is_defined_domain_comment(domain_Ptr domain_hdl)
215  {
216     CTimer::get("XIOS").resume();
217     bool isDefined = domain_hdl->comment.hasInheritedValue();
218     CTimer::get("XIOS").suspend();
219     return isDefined;
220  }
221
222
[325]223  void cxios_set_domain_data_dim(domain_Ptr domain_hdl, int data_dim)
224  {
[581]225    CTimer::get("XIOS").resume();
[325]226    domain_hdl->data_dim.setValue(data_dim);
[581]227    CTimer::get("XIOS").suspend();
[325]228  }
[581]229
[325]230  void cxios_get_domain_data_dim(domain_Ptr domain_hdl, int* data_dim)
231  {
[581]232    CTimer::get("XIOS").resume();
[445]233    *data_dim = domain_hdl->data_dim.getInheritedValue();
[581]234    CTimer::get("XIOS").suspend();
[325]235  }
[581]236
237  bool cxios_is_defined_domain_data_dim(domain_Ptr domain_hdl)
[432]238  {
239     CTimer::get("XIOS").resume();
[581]240     bool isDefined = domain_hdl->data_dim.hasInheritedValue();
[432]241     CTimer::get("XIOS").suspend();
[581]242     return isDefined;
[432]243  }
[581]244
245
[674]246  void cxios_set_domain_data_i_index(domain_Ptr domain_hdl, int* data_i_index, int* extent)
[325]247  {
[369]248    CTimer::get("XIOS").resume();
[674]249    CArray<int,1> tmp(data_i_index, shape(extent[0]), neverDeleteData);
[369]250    domain_hdl->data_i_index.reference(tmp.copy());
[416]251     CTimer::get("XIOS").suspend();
[325]252  }
[581]253
[674]254  void cxios_get_domain_data_i_index(domain_Ptr domain_hdl, int* data_i_index, int* extent)
[325]255  {
[416]256    CTimer::get("XIOS").resume();
[674]257    CArray<int,1> tmp(data_i_index, shape(extent[0]), neverDeleteData);
[581]258    tmp=domain_hdl->data_i_index.getInheritedValue();
[347]259     CTimer::get("XIOS").suspend();
[325]260  }
[581]261
262  bool cxios_is_defined_domain_data_i_index(domain_Ptr domain_hdl)
[432]263  {
264     CTimer::get("XIOS").resume();
[581]265     bool isDefined = domain_hdl->data_i_index.hasInheritedValue();
[432]266     CTimer::get("XIOS").suspend();
[581]267     return isDefined;
[432]268  }
[581]269
270
[325]271  void cxios_set_domain_data_ibegin(domain_Ptr domain_hdl, int data_ibegin)
272  {
[581]273    CTimer::get("XIOS").resume();
[325]274    domain_hdl->data_ibegin.setValue(data_ibegin);
[581]275    CTimer::get("XIOS").suspend();
[325]276  }
[581]277
[325]278  void cxios_get_domain_data_ibegin(domain_Ptr domain_hdl, int* data_ibegin)
279  {
[581]280    CTimer::get("XIOS").resume();
[445]281    *data_ibegin = domain_hdl->data_ibegin.getInheritedValue();
[581]282    CTimer::get("XIOS").suspend();
[325]283  }
[581]284
285  bool cxios_is_defined_domain_data_ibegin(domain_Ptr domain_hdl)
[432]286  {
287     CTimer::get("XIOS").resume();
[581]288     bool isDefined = domain_hdl->data_ibegin.hasInheritedValue();
[432]289     CTimer::get("XIOS").suspend();
[581]290     return isDefined;
[432]291  }
[581]292
293
[674]294  void cxios_set_domain_data_j_index(domain_Ptr domain_hdl, int* data_j_index, int* extent)
[325]295  {
[369]296    CTimer::get("XIOS").resume();
[674]297    CArray<int,1> tmp(data_j_index, shape(extent[0]), neverDeleteData);
[369]298    domain_hdl->data_j_index.reference(tmp.copy());
[416]299     CTimer::get("XIOS").suspend();
[325]300  }
[581]301
[674]302  void cxios_get_domain_data_j_index(domain_Ptr domain_hdl, int* data_j_index, int* extent)
[325]303  {
[416]304    CTimer::get("XIOS").resume();
[674]305    CArray<int,1> tmp(data_j_index, shape(extent[0]), neverDeleteData);
[581]306    tmp=domain_hdl->data_j_index.getInheritedValue();
[347]307     CTimer::get("XIOS").suspend();
[325]308  }
[581]309
310  bool cxios_is_defined_domain_data_j_index(domain_Ptr domain_hdl)
[432]311  {
312     CTimer::get("XIOS").resume();
[581]313     bool isDefined = domain_hdl->data_j_index.hasInheritedValue();
[432]314     CTimer::get("XIOS").suspend();
[581]315     return isDefined;
[432]316  }
[581]317
318
[325]319  void cxios_set_domain_data_jbegin(domain_Ptr domain_hdl, int data_jbegin)
320  {
[581]321    CTimer::get("XIOS").resume();
[325]322    domain_hdl->data_jbegin.setValue(data_jbegin);
[581]323    CTimer::get("XIOS").suspend();
[325]324  }
[581]325
[325]326  void cxios_get_domain_data_jbegin(domain_Ptr domain_hdl, int* data_jbegin)
327  {
[581]328    CTimer::get("XIOS").resume();
[445]329    *data_jbegin = domain_hdl->data_jbegin.getInheritedValue();
[581]330    CTimer::get("XIOS").suspend();
[325]331  }
[581]332
333  bool cxios_is_defined_domain_data_jbegin(domain_Ptr domain_hdl)
[432]334  {
335     CTimer::get("XIOS").resume();
[581]336     bool isDefined = domain_hdl->data_jbegin.hasInheritedValue();
[432]337     CTimer::get("XIOS").suspend();
[581]338     return isDefined;
[432]339  }
[581]340
341
[325]342  void cxios_set_domain_data_ni(domain_Ptr domain_hdl, int data_ni)
343  {
[581]344    CTimer::get("XIOS").resume();
[325]345    domain_hdl->data_ni.setValue(data_ni);
[581]346    CTimer::get("XIOS").suspend();
[325]347  }
[581]348
[325]349  void cxios_get_domain_data_ni(domain_Ptr domain_hdl, int* data_ni)
350  {
[581]351    CTimer::get("XIOS").resume();
[445]352    *data_ni = domain_hdl->data_ni.getInheritedValue();
[581]353    CTimer::get("XIOS").suspend();
[325]354  }
[581]355
356  bool cxios_is_defined_domain_data_ni(domain_Ptr domain_hdl)
[432]357  {
358     CTimer::get("XIOS").resume();
[581]359     bool isDefined = domain_hdl->data_ni.hasInheritedValue();
[432]360     CTimer::get("XIOS").suspend();
[581]361     return isDefined;
[432]362  }
[581]363
364
[325]365  void cxios_set_domain_data_nj(domain_Ptr domain_hdl, int data_nj)
366  {
[581]367    CTimer::get("XIOS").resume();
[325]368    domain_hdl->data_nj.setValue(data_nj);
[581]369    CTimer::get("XIOS").suspend();
[325]370  }
[581]371
[325]372  void cxios_get_domain_data_nj(domain_Ptr domain_hdl, int* data_nj)
373  {
[581]374    CTimer::get("XIOS").resume();
[445]375    *data_nj = domain_hdl->data_nj.getInheritedValue();
[581]376    CTimer::get("XIOS").suspend();
[325]377  }
[581]378
379  bool cxios_is_defined_domain_data_nj(domain_Ptr domain_hdl)
[432]380  {
381     CTimer::get("XIOS").resume();
[581]382     bool isDefined = domain_hdl->data_nj.hasInheritedValue();
[432]383     CTimer::get("XIOS").suspend();
[581]384     return isDefined;
[432]385  }
[581]386
387
[1492]388  void cxios_set_domain_dim_i_name(domain_Ptr domain_hdl, const char * dim_i_name, int dim_i_name_size)
389  {
390    std::string dim_i_name_str;
391    if (!cstr2string(dim_i_name, dim_i_name_size, dim_i_name_str)) return;
392    CTimer::get("XIOS").resume();
393    domain_hdl->dim_i_name.setValue(dim_i_name_str);
394    CTimer::get("XIOS").suspend();
395  }
396
397  void cxios_get_domain_dim_i_name(domain_Ptr domain_hdl, char * dim_i_name, int dim_i_name_size)
398  {
399    CTimer::get("XIOS").resume();
400    if (!string_copy(domain_hdl->dim_i_name.getInheritedValue(), dim_i_name, dim_i_name_size))
401      ERROR("void cxios_get_domain_dim_i_name(domain_Ptr domain_hdl, char * dim_i_name, int dim_i_name_size)", << "Input string is too short");
402    CTimer::get("XIOS").suspend();
403  }
404
405  bool cxios_is_defined_domain_dim_i_name(domain_Ptr domain_hdl)
406  {
407     CTimer::get("XIOS").resume();
408     bool isDefined = domain_hdl->dim_i_name.hasInheritedValue();
409     CTimer::get("XIOS").suspend();
410     return isDefined;
411  }
412
413
414  void cxios_set_domain_dim_j_name(domain_Ptr domain_hdl, const char * dim_j_name, int dim_j_name_size)
415  {
416    std::string dim_j_name_str;
417    if (!cstr2string(dim_j_name, dim_j_name_size, dim_j_name_str)) return;
418    CTimer::get("XIOS").resume();
419    domain_hdl->dim_j_name.setValue(dim_j_name_str);
420    CTimer::get("XIOS").suspend();
421  }
422
423  void cxios_get_domain_dim_j_name(domain_Ptr domain_hdl, char * dim_j_name, int dim_j_name_size)
424  {
425    CTimer::get("XIOS").resume();
426    if (!string_copy(domain_hdl->dim_j_name.getInheritedValue(), dim_j_name, dim_j_name_size))
427      ERROR("void cxios_get_domain_dim_j_name(domain_Ptr domain_hdl, char * dim_j_name, int dim_j_name_size)", << "Input string is too short");
428    CTimer::get("XIOS").suspend();
429  }
430
431  bool cxios_is_defined_domain_dim_j_name(domain_Ptr domain_hdl)
432  {
433     CTimer::get("XIOS").resume();
434     bool isDefined = domain_hdl->dim_j_name.hasInheritedValue();
435     CTimer::get("XIOS").suspend();
436     return isDefined;
437  }
438
439
[546]440  void cxios_set_domain_domain_ref(domain_Ptr domain_hdl, const char * domain_ref, int domain_ref_size)
441  {
442    std::string domain_ref_str;
[581]443    if (!cstr2string(domain_ref, domain_ref_size, domain_ref_str)) return;
444    CTimer::get("XIOS").resume();
[546]445    domain_hdl->domain_ref.setValue(domain_ref_str);
[581]446    CTimer::get("XIOS").suspend();
[546]447  }
[581]448
[546]449  void cxios_get_domain_domain_ref(domain_Ptr domain_hdl, char * domain_ref, int domain_ref_size)
450  {
[581]451    CTimer::get("XIOS").resume();
452    if (!string_copy(domain_hdl->domain_ref.getInheritedValue(), domain_ref, domain_ref_size))
453      ERROR("void cxios_get_domain_domain_ref(domain_Ptr domain_hdl, char * domain_ref, int domain_ref_size)", << "Input string is too short");
454    CTimer::get("XIOS").suspend();
[546]455  }
[581]456
457  bool cxios_is_defined_domain_domain_ref(domain_Ptr domain_hdl)
[546]458  {
459     CTimer::get("XIOS").resume();
[581]460     bool isDefined = domain_hdl->domain_ref.hasInheritedValue();
[546]461     CTimer::get("XIOS").suspend();
[581]462     return isDefined;
[546]463  }
[581]464
465
[691]466  void cxios_set_domain_i_index(domain_Ptr domain_hdl, int* i_index, int* extent)
[690]467  {
468    CTimer::get("XIOS").resume();
[674]469    CArray<int,1> tmp(i_index, shape(extent[0]), neverDeleteData);
[467]470    domain_hdl->i_index.reference(tmp.copy());
471     CTimer::get("XIOS").suspend();
472  }
[581]473
[674]474  void cxios_get_domain_i_index(domain_Ptr domain_hdl, int* i_index, int* extent)
[467]475  {
476    CTimer::get("XIOS").resume();
[674]477    CArray<int,1> tmp(i_index, shape(extent[0]), neverDeleteData);
[581]478    tmp=domain_hdl->i_index.getInheritedValue();
[467]479     CTimer::get("XIOS").suspend();
480  }
[581]481
482  bool cxios_is_defined_domain_i_index(domain_Ptr domain_hdl)
[467]483  {
484     CTimer::get("XIOS").resume();
[581]485     bool isDefined = domain_hdl->i_index.hasInheritedValue();
[467]486     CTimer::get("XIOS").suspend();
[581]487     return isDefined;
[467]488  }
[581]489
490
[325]491  void cxios_set_domain_ibegin(domain_Ptr domain_hdl, int ibegin)
492  {
[581]493    CTimer::get("XIOS").resume();
[325]494    domain_hdl->ibegin.setValue(ibegin);
[581]495    CTimer::get("XIOS").suspend();
[325]496  }
[581]497
[325]498  void cxios_get_domain_ibegin(domain_Ptr domain_hdl, int* ibegin)
499  {
[581]500    CTimer::get("XIOS").resume();
[445]501    *ibegin = domain_hdl->ibegin.getInheritedValue();
[581]502    CTimer::get("XIOS").suspend();
[325]503  }
[581]504
505  bool cxios_is_defined_domain_ibegin(domain_Ptr domain_hdl)
[432]506  {
507     CTimer::get("XIOS").resume();
[581]508     bool isDefined = domain_hdl->ibegin.hasInheritedValue();
[432]509     CTimer::get("XIOS").suspend();
[581]510     return isDefined;
[432]511  }
[581]512
513
[674]514  void cxios_set_domain_j_index(domain_Ptr domain_hdl, int* j_index, int* extent)
[325]515  {
[581]516    CTimer::get("XIOS").resume();
[674]517    CArray<int,1> tmp(j_index, shape(extent[0]), neverDeleteData);
[467]518    domain_hdl->j_index.reference(tmp.copy());
519     CTimer::get("XIOS").suspend();
520  }
[581]521
[674]522  void cxios_get_domain_j_index(domain_Ptr domain_hdl, int* j_index, int* extent)
[467]523  {
524    CTimer::get("XIOS").resume();
[674]525    CArray<int,1> tmp(j_index, shape(extent[0]), neverDeleteData);
[581]526    tmp=domain_hdl->j_index.getInheritedValue();
[467]527     CTimer::get("XIOS").suspend();
528  }
[581]529
530  bool cxios_is_defined_domain_j_index(domain_Ptr domain_hdl)
[467]531  {
532     CTimer::get("XIOS").resume();
[581]533     bool isDefined = domain_hdl->j_index.hasInheritedValue();
[467]534     CTimer::get("XIOS").suspend();
[581]535     return isDefined;
[467]536  }
[581]537
538
[325]539  void cxios_set_domain_jbegin(domain_Ptr domain_hdl, int jbegin)
540  {
[581]541    CTimer::get("XIOS").resume();
[325]542    domain_hdl->jbegin.setValue(jbegin);
[581]543    CTimer::get("XIOS").suspend();
[325]544  }
[581]545
[325]546  void cxios_get_domain_jbegin(domain_Ptr domain_hdl, int* jbegin)
547  {
[581]548    CTimer::get("XIOS").resume();
[445]549    *jbegin = domain_hdl->jbegin.getInheritedValue();
[581]550    CTimer::get("XIOS").suspend();
[325]551  }
[581]552
553  bool cxios_is_defined_domain_jbegin(domain_Ptr domain_hdl)
[432]554  {
555     CTimer::get("XIOS").resume();
[581]556     bool isDefined = domain_hdl->jbegin.hasInheritedValue();
[432]557     CTimer::get("XIOS").suspend();
[581]558     return isDefined;
[432]559  }
[581]560
561
[1492]562  void cxios_set_domain_lat_name(domain_Ptr domain_hdl, const char * lat_name, int lat_name_size)
563  {
564    std::string lat_name_str;
565    if (!cstr2string(lat_name, lat_name_size, lat_name_str)) return;
566    CTimer::get("XIOS").resume();
567    domain_hdl->lat_name.setValue(lat_name_str);
568    CTimer::get("XIOS").suspend();
569  }
570
571  void cxios_get_domain_lat_name(domain_Ptr domain_hdl, char * lat_name, int lat_name_size)
572  {
573    CTimer::get("XIOS").resume();
574    if (!string_copy(domain_hdl->lat_name.getInheritedValue(), lat_name, lat_name_size))
575      ERROR("void cxios_get_domain_lat_name(domain_Ptr domain_hdl, char * lat_name, int lat_name_size)", << "Input string is too short");
576    CTimer::get("XIOS").suspend();
577  }
578
579  bool cxios_is_defined_domain_lat_name(domain_Ptr domain_hdl)
580  {
581     CTimer::get("XIOS").resume();
582     bool isDefined = domain_hdl->lat_name.hasInheritedValue();
583     CTimer::get("XIOS").suspend();
584     return isDefined;
585  }
586
587
[674]588  void cxios_set_domain_latvalue_1d(domain_Ptr domain_hdl, double* latvalue_1d, int* extent)
[325]589  {
[369]590    CTimer::get("XIOS").resume();
[674]591    CArray<double,1> tmp(latvalue_1d, shape(extent[0]), neverDeleteData);
[664]592    domain_hdl->latvalue_1d.reference(tmp.copy());
[416]593     CTimer::get("XIOS").suspend();
[325]594  }
[581]595
[674]596  void cxios_get_domain_latvalue_1d(domain_Ptr domain_hdl, double* latvalue_1d, int* extent)
[325]597  {
[416]598    CTimer::get("XIOS").resume();
[674]599    CArray<double,1> tmp(latvalue_1d, shape(extent[0]), neverDeleteData);
[664]600    tmp=domain_hdl->latvalue_1d.getInheritedValue();
[347]601     CTimer::get("XIOS").suspend();
[325]602  }
[581]603
[664]604  bool cxios_is_defined_domain_latvalue_1d(domain_Ptr domain_hdl)
[432]605  {
606     CTimer::get("XIOS").resume();
[664]607     bool isDefined = domain_hdl->latvalue_1d.hasInheritedValue();
[432]608     CTimer::get("XIOS").suspend();
[581]609     return isDefined;
[432]610  }
[581]611
612
[674]613  void cxios_set_domain_latvalue_2d(domain_Ptr domain_hdl, double* latvalue_2d, int* extent)
[664]614  {
615    CTimer::get("XIOS").resume();
[674]616    CArray<double,2> tmp(latvalue_2d, shape(extent[0], extent[1]), neverDeleteData);
[664]617    domain_hdl->latvalue_2d.reference(tmp.copy());
618     CTimer::get("XIOS").suspend();
619  }
620
[674]621  void cxios_get_domain_latvalue_2d(domain_Ptr domain_hdl, double* latvalue_2d, int* extent)
[664]622  {
623    CTimer::get("XIOS").resume();
[674]624    CArray<double,2> tmp(latvalue_2d, shape(extent[0], extent[1]), neverDeleteData);
[664]625    tmp=domain_hdl->latvalue_2d.getInheritedValue();
626     CTimer::get("XIOS").suspend();
627  }
628
629  bool cxios_is_defined_domain_latvalue_2d(domain_Ptr domain_hdl)
630  {
631     CTimer::get("XIOS").resume();
632     bool isDefined = domain_hdl->latvalue_2d.hasInheritedValue();
633     CTimer::get("XIOS").suspend();
634     return isDefined;
635  }
636
637
[1492]638  void cxios_set_domain_lon_name(domain_Ptr domain_hdl, const char * lon_name, int lon_name_size)
639  {
640    std::string lon_name_str;
641    if (!cstr2string(lon_name, lon_name_size, lon_name_str)) return;
642    CTimer::get("XIOS").resume();
643    domain_hdl->lon_name.setValue(lon_name_str);
644    CTimer::get("XIOS").suspend();
645  }
646
647  void cxios_get_domain_lon_name(domain_Ptr domain_hdl, char * lon_name, int lon_name_size)
648  {
649    CTimer::get("XIOS").resume();
650    if (!string_copy(domain_hdl->lon_name.getInheritedValue(), lon_name, lon_name_size))
651      ERROR("void cxios_get_domain_lon_name(domain_Ptr domain_hdl, char * lon_name, int lon_name_size)", << "Input string is too short");
652    CTimer::get("XIOS").suspend();
653  }
654
655  bool cxios_is_defined_domain_lon_name(domain_Ptr domain_hdl)
656  {
657     CTimer::get("XIOS").resume();
658     bool isDefined = domain_hdl->lon_name.hasInheritedValue();
659     CTimer::get("XIOS").suspend();
660     return isDefined;
661  }
662
663
[325]664  void cxios_set_domain_long_name(domain_Ptr domain_hdl, const char * long_name, int long_name_size)
665  {
666    std::string long_name_str;
[581]667    if (!cstr2string(long_name, long_name_size, long_name_str)) return;
668    CTimer::get("XIOS").resume();
[325]669    domain_hdl->long_name.setValue(long_name_str);
[581]670    CTimer::get("XIOS").suspend();
[325]671  }
[581]672
[325]673  void cxios_get_domain_long_name(domain_Ptr domain_hdl, char * long_name, int long_name_size)
674  {
[581]675    CTimer::get("XIOS").resume();
676    if (!string_copy(domain_hdl->long_name.getInheritedValue(), long_name, long_name_size))
677      ERROR("void cxios_get_domain_long_name(domain_Ptr domain_hdl, char * long_name, int long_name_size)", << "Input string is too short");
678    CTimer::get("XIOS").suspend();
[325]679  }
[581]680
681  bool cxios_is_defined_domain_long_name(domain_Ptr domain_hdl)
[432]682  {
683     CTimer::get("XIOS").resume();
[581]684     bool isDefined = domain_hdl->long_name.hasInheritedValue();
[432]685     CTimer::get("XIOS").suspend();
[581]686     return isDefined;
[432]687  }
[581]688
689
[674]690  void cxios_set_domain_lonvalue_1d(domain_Ptr domain_hdl, double* lonvalue_1d, int* extent)
[325]691  {
[369]692    CTimer::get("XIOS").resume();
[674]693    CArray<double,1> tmp(lonvalue_1d, shape(extent[0]), neverDeleteData);
[664]694    domain_hdl->lonvalue_1d.reference(tmp.copy());
[416]695     CTimer::get("XIOS").suspend();
[325]696  }
[581]697
[674]698  void cxios_get_domain_lonvalue_1d(domain_Ptr domain_hdl, double* lonvalue_1d, int* extent)
[325]699  {
[416]700    CTimer::get("XIOS").resume();
[674]701    CArray<double,1> tmp(lonvalue_1d, shape(extent[0]), neverDeleteData);
[664]702    tmp=domain_hdl->lonvalue_1d.getInheritedValue();
[347]703     CTimer::get("XIOS").suspend();
[325]704  }
[581]705
[664]706  bool cxios_is_defined_domain_lonvalue_1d(domain_Ptr domain_hdl)
[432]707  {
708     CTimer::get("XIOS").resume();
[664]709     bool isDefined = domain_hdl->lonvalue_1d.hasInheritedValue();
[432]710     CTimer::get("XIOS").suspend();
[581]711     return isDefined;
[432]712  }
[581]713
714
[674]715  void cxios_set_domain_lonvalue_2d(domain_Ptr domain_hdl, double* lonvalue_2d, int* extent)
[325]716  {
[369]717    CTimer::get("XIOS").resume();
[674]718    CArray<double,2> tmp(lonvalue_2d, shape(extent[0], extent[1]), neverDeleteData);
[664]719    domain_hdl->lonvalue_2d.reference(tmp.copy());
[416]720     CTimer::get("XIOS").suspend();
[325]721  }
[581]722
[674]723  void cxios_get_domain_lonvalue_2d(domain_Ptr domain_hdl, double* lonvalue_2d, int* extent)
[325]724  {
[416]725    CTimer::get("XIOS").resume();
[674]726    CArray<double,2> tmp(lonvalue_2d, shape(extent[0], extent[1]), neverDeleteData);
[664]727    tmp=domain_hdl->lonvalue_2d.getInheritedValue();
[347]728     CTimer::get("XIOS").suspend();
[325]729  }
[581]730
[664]731  bool cxios_is_defined_domain_lonvalue_2d(domain_Ptr domain_hdl)
[432]732  {
733     CTimer::get("XIOS").resume();
[664]734     bool isDefined = domain_hdl->lonvalue_2d.hasInheritedValue();
[432]735     CTimer::get("XIOS").suspend();
[581]736     return isDefined;
[432]737  }
[581]738
739
[674]740  void cxios_set_domain_mask_1d(domain_Ptr domain_hdl, bool* mask_1d, int* extent)
[664]741  {
742    CTimer::get("XIOS").resume();
[674]743    CArray<bool,1> tmp(mask_1d, shape(extent[0]), neverDeleteData);
[664]744    domain_hdl->mask_1d.reference(tmp.copy());
745     CTimer::get("XIOS").suspend();
746  }
747
[674]748  void cxios_get_domain_mask_1d(domain_Ptr domain_hdl, bool* mask_1d, int* extent)
[664]749  {
750    CTimer::get("XIOS").resume();
[674]751    CArray<bool,1> tmp(mask_1d, shape(extent[0]), neverDeleteData);
[664]752    tmp=domain_hdl->mask_1d.getInheritedValue();
753     CTimer::get("XIOS").suspend();
754  }
755
756  bool cxios_is_defined_domain_mask_1d(domain_Ptr domain_hdl)
757  {
758     CTimer::get("XIOS").resume();
759     bool isDefined = domain_hdl->mask_1d.hasInheritedValue();
760     CTimer::get("XIOS").suspend();
761     return isDefined;
762  }
763
764
[674]765  void cxios_set_domain_mask_2d(domain_Ptr domain_hdl, bool* mask_2d, int* extent)
[664]766  {
767    CTimer::get("XIOS").resume();
[674]768    CArray<bool,2> tmp(mask_2d, shape(extent[0], extent[1]), neverDeleteData);
[664]769    domain_hdl->mask_2d.reference(tmp.copy());
770     CTimer::get("XIOS").suspend();
771  }
772
[674]773  void cxios_get_domain_mask_2d(domain_Ptr domain_hdl, bool* mask_2d, int* extent)
[664]774  {
775    CTimer::get("XIOS").resume();
[674]776    CArray<bool,2> tmp(mask_2d, shape(extent[0], extent[1]), neverDeleteData);
[664]777    tmp=domain_hdl->mask_2d.getInheritedValue();
778     CTimer::get("XIOS").suspend();
779  }
780
781  bool cxios_is_defined_domain_mask_2d(domain_Ptr domain_hdl)
782  {
783     CTimer::get("XIOS").resume();
784     bool isDefined = domain_hdl->mask_2d.hasInheritedValue();
785     CTimer::get("XIOS").suspend();
786     return isDefined;
787  }
788
789
[325]790  void cxios_set_domain_name(domain_Ptr domain_hdl, const char * name, int name_size)
791  {
792    std::string name_str;
[581]793    if (!cstr2string(name, name_size, name_str)) return;
794    CTimer::get("XIOS").resume();
[325]795    domain_hdl->name.setValue(name_str);
[581]796    CTimer::get("XIOS").suspend();
[325]797  }
[581]798
[325]799  void cxios_get_domain_name(domain_Ptr domain_hdl, char * name, int name_size)
800  {
[581]801    CTimer::get("XIOS").resume();
802    if (!string_copy(domain_hdl->name.getInheritedValue(), name, name_size))
803      ERROR("void cxios_get_domain_name(domain_Ptr domain_hdl, char * name, int name_size)", << "Input string is too short");
804    CTimer::get("XIOS").suspend();
[325]805  }
[581]806
807  bool cxios_is_defined_domain_name(domain_Ptr domain_hdl)
[432]808  {
809     CTimer::get("XIOS").resume();
[581]810     bool isDefined = domain_hdl->name.hasInheritedValue();
[432]811     CTimer::get("XIOS").suspend();
[581]812     return isDefined;
[432]813  }
[581]814
815
[325]816  void cxios_set_domain_ni(domain_Ptr domain_hdl, int ni)
817  {
[581]818    CTimer::get("XIOS").resume();
[325]819    domain_hdl->ni.setValue(ni);
[581]820    CTimer::get("XIOS").suspend();
[325]821  }
[581]822
[325]823  void cxios_get_domain_ni(domain_Ptr domain_hdl, int* ni)
824  {
[581]825    CTimer::get("XIOS").resume();
[445]826    *ni = domain_hdl->ni.getInheritedValue();
[581]827    CTimer::get("XIOS").suspend();
[325]828  }
[581]829
830  bool cxios_is_defined_domain_ni(domain_Ptr domain_hdl)
[432]831  {
832     CTimer::get("XIOS").resume();
[581]833     bool isDefined = domain_hdl->ni.hasInheritedValue();
[432]834     CTimer::get("XIOS").suspend();
[581]835     return isDefined;
[432]836  }
[581]837
838
[325]839  void cxios_set_domain_ni_glo(domain_Ptr domain_hdl, int ni_glo)
840  {
[581]841    CTimer::get("XIOS").resume();
[325]842    domain_hdl->ni_glo.setValue(ni_glo);
[581]843    CTimer::get("XIOS").suspend();
[325]844  }
[581]845
[325]846  void cxios_get_domain_ni_glo(domain_Ptr domain_hdl, int* ni_glo)
847  {
[581]848    CTimer::get("XIOS").resume();
[445]849    *ni_glo = domain_hdl->ni_glo.getInheritedValue();
[581]850    CTimer::get("XIOS").suspend();
[325]851  }
[581]852
853  bool cxios_is_defined_domain_ni_glo(domain_Ptr domain_hdl)
[432]854  {
855     CTimer::get("XIOS").resume();
[581]856     bool isDefined = domain_hdl->ni_glo.hasInheritedValue();
[432]857     CTimer::get("XIOS").suspend();
[581]858     return isDefined;
[432]859  }
[581]860
861
[325]862  void cxios_set_domain_nj(domain_Ptr domain_hdl, int nj)
863  {
[581]864    CTimer::get("XIOS").resume();
[325]865    domain_hdl->nj.setValue(nj);
[581]866    CTimer::get("XIOS").suspend();
[325]867  }
[581]868
[325]869  void cxios_get_domain_nj(domain_Ptr domain_hdl, int* nj)
870  {
[581]871    CTimer::get("XIOS").resume();
[445]872    *nj = domain_hdl->nj.getInheritedValue();
[581]873    CTimer::get("XIOS").suspend();
[325]874  }
[581]875
876  bool cxios_is_defined_domain_nj(domain_Ptr domain_hdl)
[432]877  {
878     CTimer::get("XIOS").resume();
[581]879     bool isDefined = domain_hdl->nj.hasInheritedValue();
[432]880     CTimer::get("XIOS").suspend();
[581]881     return isDefined;
[432]882  }
[581]883
884
[325]885  void cxios_set_domain_nj_glo(domain_Ptr domain_hdl, int nj_glo)
886  {
[581]887    CTimer::get("XIOS").resume();
[325]888    domain_hdl->nj_glo.setValue(nj_glo);
[581]889    CTimer::get("XIOS").suspend();
[325]890  }
[581]891
[325]892  void cxios_get_domain_nj_glo(domain_Ptr domain_hdl, int* nj_glo)
893  {
[581]894    CTimer::get("XIOS").resume();
[445]895    *nj_glo = domain_hdl->nj_glo.getInheritedValue();
[581]896    CTimer::get("XIOS").suspend();
[325]897  }
[581]898
899  bool cxios_is_defined_domain_nj_glo(domain_Ptr domain_hdl)
[432]900  {
901     CTimer::get("XIOS").resume();
[581]902     bool isDefined = domain_hdl->nj_glo.hasInheritedValue();
[432]903     CTimer::get("XIOS").suspend();
[581]904     return isDefined;
[432]905  }
[581]906
907
[449]908  void cxios_set_domain_nvertex(domain_Ptr domain_hdl, int nvertex)
909  {
[581]910    CTimer::get("XIOS").resume();
[449]911    domain_hdl->nvertex.setValue(nvertex);
[581]912    CTimer::get("XIOS").suspend();
[449]913  }
[581]914
[449]915  void cxios_get_domain_nvertex(domain_Ptr domain_hdl, int* nvertex)
916  {
[581]917    CTimer::get("XIOS").resume();
[449]918    *nvertex = domain_hdl->nvertex.getInheritedValue();
[581]919    CTimer::get("XIOS").suspend();
[449]920  }
[581]921
922  bool cxios_is_defined_domain_nvertex(domain_Ptr domain_hdl)
[449]923  {
924     CTimer::get("XIOS").resume();
[581]925     bool isDefined = domain_hdl->nvertex.hasInheritedValue();
[449]926     CTimer::get("XIOS").suspend();
[581]927     return isDefined;
[449]928  }
[581]929
930
[1158]931  void cxios_set_domain_prec(domain_Ptr domain_hdl, int prec)
932  {
933    CTimer::get("XIOS").resume();
934    domain_hdl->prec.setValue(prec);
935    CTimer::get("XIOS").suspend();
936  }
937
938  void cxios_get_domain_prec(domain_Ptr domain_hdl, int* prec)
939  {
940    CTimer::get("XIOS").resume();
941    *prec = domain_hdl->prec.getInheritedValue();
942    CTimer::get("XIOS").suspend();
943  }
944
945  bool cxios_is_defined_domain_prec(domain_Ptr domain_hdl)
946  {
947     CTimer::get("XIOS").resume();
948     bool isDefined = domain_hdl->prec.hasInheritedValue();
949     CTimer::get("XIOS").suspend();
950     return isDefined;
951  }
952
953
[325]954  void cxios_set_domain_standard_name(domain_Ptr domain_hdl, const char * standard_name, int standard_name_size)
955  {
956    std::string standard_name_str;
[581]957    if (!cstr2string(standard_name, standard_name_size, standard_name_str)) return;
958    CTimer::get("XIOS").resume();
[325]959    domain_hdl->standard_name.setValue(standard_name_str);
[581]960    CTimer::get("XIOS").suspend();
[325]961  }
[581]962
[325]963  void cxios_get_domain_standard_name(domain_Ptr domain_hdl, char * standard_name, int standard_name_size)
964  {
[581]965    CTimer::get("XIOS").resume();
966    if (!string_copy(domain_hdl->standard_name.getInheritedValue(), standard_name, standard_name_size))
967      ERROR("void cxios_get_domain_standard_name(domain_Ptr domain_hdl, char * standard_name, int standard_name_size)", << "Input string is too short");
968    CTimer::get("XIOS").suspend();
[325]969  }
[581]970
971  bool cxios_is_defined_domain_standard_name(domain_Ptr domain_hdl)
[432]972  {
973     CTimer::get("XIOS").resume();
[581]974     bool isDefined = domain_hdl->standard_name.hasInheritedValue();
[432]975     CTimer::get("XIOS").suspend();
[581]976     return isDefined;
[432]977  }
[581]978
979
[449]980  void cxios_set_domain_type(domain_Ptr domain_hdl, const char * type, int type_size)
981  {
982    std::string type_str;
[581]983    if (!cstr2string(type, type_size, type_str)) return;
984    CTimer::get("XIOS").resume();
[449]985    domain_hdl->type.fromString(type_str);
[581]986    CTimer::get("XIOS").suspend();
[449]987  }
[581]988
[449]989  void cxios_get_domain_type(domain_Ptr domain_hdl, char * type, int type_size)
990  {
[581]991    CTimer::get("XIOS").resume();
992    if (!string_copy(domain_hdl->type.getInheritedStringValue(), type, type_size))
993      ERROR("void cxios_get_domain_type(domain_Ptr domain_hdl, char * type, int type_size)", << "Input string is too short");
994    CTimer::get("XIOS").suspend();
[449]995  }
[581]996
997  bool cxios_is_defined_domain_type(domain_Ptr domain_hdl)
[449]998  {
999     CTimer::get("XIOS").resume();
[581]1000     bool isDefined = domain_hdl->type.hasInheritedValue();
[449]1001     CTimer::get("XIOS").suspend();
[581]1002     return isDefined;
[449]1003  }
[325]1004}
Note: See TracBrowser for help on using the repository browser.