Changeset 779 for XIOS/trunk/src/interface/c_attr/icaxisgroup_attr.cpp

Timestamp:

11/04/15 15:50:20 (8 years ago)

Author:

rlacroix

Message:

Update the Fortran API.

It had been forgotten in recent changes.

File:

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

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

@@ -263 +263 @@
 
 
+  void cxios_set_axisgroup_n_distributed_partition(axisgroup_Ptr axisgroup_hdl, int n_distributed_partition)
+  {
+    CTimer::get("XIOS").resume();
+    axisgroup_hdl->n_distributed_partition.setValue(n_distributed_partition);
+    CTimer::get("XIOS").suspend();
+  }
+
+  void cxios_get_axisgroup_n_distributed_partition(axisgroup_Ptr axisgroup_hdl, int* n_distributed_partition)
+  {
+    CTimer::get("XIOS").resume();
+    *n_distributed_partition = axisgroup_hdl->n_distributed_partition.getInheritedValue();
+    CTimer::get("XIOS").suspend();
+  }
+
+  bool cxios_is_defined_axisgroup_n_distributed_partition(axisgroup_Ptr axisgroup_hdl)
+  {
+     CTimer::get("XIOS").resume();
+     bool isDefined = axisgroup_hdl->n_distributed_partition.hasInheritedValue();
+     CTimer::get("XIOS").suspend();
+     return isDefined;
+  }
+
+
   void cxios_set_axisgroup_n_glo(axisgroup_Ptr axisgroup_hdl, int n_glo)
   {