source: XIOS/trunk/src/interface/c_attr/icdomain_attr.cpp @ 1626

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

Trunk: limiting the line length to 132 characters in the Fortran interface + updating the interface.

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