Changeset 445 for XIOS/trunk/src/attribute_array_impl.hpp

Timestamp:

06/19/13 10:09:36 (11 years ago)

Author:

ymipsl

Message:

Add possibility to make inheritance of attributes and reference before closing the context definition.
New fortran fonction : xios_solve inheritance()
After this call, the value of attribute have the inherited value of their parent.

YM

File:

• XIOS/trunk/src/attribute_array_impl.hpp (modified) (1 diff)

XIOS/trunk/src/attribute_array_impl.hpp

@@ -65 +65 @@
       this->setValue(attr) ;
     } 
+    
+    
+    template <typename T_numtype, int N_rank>
+    void CAttributeArray<T_numtype,N_rank>::setInheritedValue(const CAttribute& attr)
+    {
+      this->setInheritedValue(dynamic_cast<const CAttributeArray<T_numtype,N_rank>& >(attr)) ;
+    } 
+
+    template <typename T_numtype, int N_rank>
+    void CAttributeArray<T_numtype,N_rank>::setInheritedValue(const CAttributeArray& attr)
+    {
+      if (this->isEmpty() && attr.hasInheritedValue()) inheritedValue=attr ;
+     } 
+
+    template <typename T_numtype, int N_rank>
+    CArray<T_numtype,N_rank> CAttributeArray<T_numtype,N_rank>::getInheritedValue(void) const
+    {
+      if (this->isEmpty()) return inheritedValue.copy() ;
+      else return getValue() ;
+    } 
+    
+    template <typename T_numtype, int N_rank>
+    bool CAttributeArray<T_numtype,N_rank>::hasInheritedValue(void) const
+    {
+      return !this->isEmpty() || !inheritedValue.isEmpty() ;
+    } 
+    
 
     template <typename T_numtype, int N_rank>