Changeset 891 for XIOS/trunk/src/interface/c_attr/icfilegroup_attr.cpp

Timestamp:

07/05/16 15:59:23 (8 years ago)

Author:

mhnguyen

Message:

Adding Fortran interface for reduce_axis_to_scalar

Test
+) On Curie
+) Only compilation

File:

• XIOS/trunk/src/interface/c_attr/icfilegroup_attr.cpp (modified) (1 diff)

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

@@ -64 +64 @@
 
 
+  void cxios_set_filegroup_cyclic(filegroup_Ptr filegroup_hdl, bool cyclic)
+  {
+    CTimer::get("XIOS").resume();
+    filegroup_hdl->cyclic.setValue(cyclic);
+    CTimer::get("XIOS").suspend();
+  }
+
+  void cxios_get_filegroup_cyclic(filegroup_Ptr filegroup_hdl, bool* cyclic)
+  {
+    CTimer::get("XIOS").resume();
+    *cyclic = filegroup_hdl->cyclic.getInheritedValue();
+    CTimer::get("XIOS").suspend();
+  }
+
+  bool cxios_is_defined_filegroup_cyclic(filegroup_Ptr filegroup_hdl)
+  {
+     CTimer::get("XIOS").resume();
+     bool isDefined = filegroup_hdl->cyclic.hasInheritedValue();
+     CTimer::get("XIOS").suspend();
+     return isDefined;
+  }
+
+
   void cxios_set_filegroup_description(filegroup_Ptr filegroup_hdl, const char * description, int description_size)
   {