Changeset 1626 for XIOS/trunk/src/interface/c_attr/icinterpolate_domain_attr.cpp

Timestamp:

12/17/18 10:19:12 (5 years ago)

Author:

oabramkina

Message:

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

File:

• XIOS/trunk/src/interface/c_attr/icinterpolate_domain_attr.cpp (modified) (2 diffs)

XIOS/trunk/src/interface/c_attr/icinterpolate_domain_attr.cpp

@@ -4 +4 @@
 
 #include <boost/multi_array.hpp>
-#include <memory>
 #include "xios.hpp"
 #include "attribute_template.hpp"
@@ -162 +161 @@
 
 
+  void cxios_set_interpolate_domain_use_area(interpolate_domain_Ptr interpolate_domain_hdl, bool use_area)
+  {
+    CTimer::get("XIOS").resume();
+    interpolate_domain_hdl->use_area.setValue(use_area);
+    CTimer::get("XIOS").suspend();
+  }
+
+  void cxios_get_interpolate_domain_use_area(interpolate_domain_Ptr interpolate_domain_hdl, bool* use_area)
+  {
+    CTimer::get("XIOS").resume();
+    *use_area = interpolate_domain_hdl->use_area.getInheritedValue();
+    CTimer::get("XIOS").suspend();
+  }
+
+  bool cxios_is_defined_interpolate_domain_use_area(interpolate_domain_Ptr interpolate_domain_hdl)
+  {
+     CTimer::get("XIOS").resume();
+     bool isDefined = interpolate_domain_hdl->use_area.hasInheritedValue();
+     CTimer::get("XIOS").suspend();
+     return isDefined;
+  }
+
+
   void cxios_set_interpolate_domain_weight_filename(interpolate_domain_Ptr interpolate_domain_hdl, const char * weight_filename, int weight_filename_size)
   {