[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 | |
---|
| 16 | extern "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 | } |
---|