Changeset 467 for XIOS/trunk/src/interface/c_attr/icdomaingroup_attr.cpp

Timestamp:

01/29/14 11:49:29 (10 years ago)

Author:

ymipsl

Message:

Add functionnalities for reduced gaussian grid support.

YM

File:

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

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

@@ -307 +307 @@
   
   
+  void cxios_set_domaingroup_i_index(domaingroup_Ptr domaingroup_hdl, int* i_index, int extent1, int extent2)
+  {
+    CTimer::get("XIOS").resume();
+    CArray<int,2> tmp(i_index,shape(extent1,extent2),neverDeleteData) ;
+    domaingroup_hdl->i_index.reference(tmp.copy());
+    domaingroup_hdl->sendAttributToServer(domaingroup_hdl->i_index);
+     CTimer::get("XIOS").suspend();
+  }
+  
+  void cxios_get_domaingroup_i_index(domaingroup_Ptr domaingroup_hdl, int* i_index, int extent1, int extent2)
+  {
+    CTimer::get("XIOS").resume();
+    CArray<int,2> tmp(i_index,shape(extent1,extent2),neverDeleteData) ;
+    tmp=domaingroup_hdl->i_index.getInheritedValue() ;
+     CTimer::get("XIOS").suspend();
+  }
+  
+  bool cxios_is_defined_domaingroup_i_index(domaingroup_Ptr domaingroup_hdl )
+  {
+     CTimer::get("XIOS").resume();
+    return domaingroup_hdl->i_index.hasInheritedValue();
+     CTimer::get("XIOS").suspend();
+  }
+  
+  
+  
   void cxios_set_domaingroup_ibegin(domaingroup_Ptr domaingroup_hdl, int ibegin)
   {
@@ -346 +372 @@
      CTimer::get("XIOS").resume();
     return domaingroup_hdl->iend.hasInheritedValue();
+     CTimer::get("XIOS").suspend();
+  }
+  
+  
+  
+  void cxios_set_domaingroup_j_index(domaingroup_Ptr domaingroup_hdl, int* j_index, int extent1, int extent2)
+  {
+    CTimer::get("XIOS").resume();
+    CArray<int,2> tmp(j_index,shape(extent1,extent2),neverDeleteData) ;
+    domaingroup_hdl->j_index.reference(tmp.copy());
+    domaingroup_hdl->sendAttributToServer(domaingroup_hdl->j_index);
+     CTimer::get("XIOS").suspend();
+  }
+  
+  void cxios_get_domaingroup_j_index(domaingroup_Ptr domaingroup_hdl, int* j_index, int extent1, int extent2)
+  {
+    CTimer::get("XIOS").resume();
+    CArray<int,2> tmp(j_index,shape(extent1,extent2),neverDeleteData) ;
+    tmp=domaingroup_hdl->j_index.getInheritedValue() ;
+     CTimer::get("XIOS").suspend();
+  }
+  
+  bool cxios_is_defined_domaingroup_j_index(domaingroup_Ptr domaingroup_hdl )
+  {
+     CTimer::get("XIOS").resume();
+    return domaingroup_hdl->j_index.hasInheritedValue();
      CTimer::get("XIOS").suspend();
   }