Changeset 472 for XIOS/trunk/src/output/nc4_data_output.cpp

Timestamp:

02/03/14 14:16:20 (10 years ago)

Author:

ymipsl

Message:

Enhancement : user defined global and field attribute can be output in the netcdfcf file.
A variable child element inclosed into a file element will be output as a global file attribute.
A variable child element inclosed into a field element will be output as a field attribute.

+ variable fortran interface added

YM

File:

• XIOS/trunk/src/output/nc4_data_output.cpp (modified) (2 diffs)

XIOS/trunk/src/output/nc4_data_output.cpp

@@ -645 +645 @@
          SuperClassWriter::addAttribute
                ("online_operation", field->operation.getValue(), &fieldid);
+
+        // write child variables as attributes
+        
+        
+         vector<CVariable*> listVars = field->getAllVariables() ;
+         for (vector<CVariable*>::iterator it = listVars.begin() ;it != listVars.end(); it++) writeAttribute_(*it, fieldid) ;
+
                
          if (wtime)
@@ -710 +717 @@
          else singleDomain=false ;
       }
+ 
+      void CNc4DataOutput::writeAttribute_ (CVariable* var, const string& fieldId)
+      {
+        string name ;
+        if (!var->name.isEmpty()) name=var->name ;
+        else if (var->hasId()) name=var->getId() ;
+        else return ;
+        
+        if (var->getVarType()==CVariable::t_int) addAttribute(name,var->getData<int>(),&fieldId) ; 
+        else if (var->getVarType()==CVariable::t_short_int) addAttribute(name,var->getData<short int>(),&fieldId) ; 
+        else if (var->getVarType()==CVariable::t_long_int) addAttribute(name,var->getData<long int>(),&fieldId) ; 
+        else if (var->getVarType()==CVariable::t_float) addAttribute(name,var->getData<float>(),&fieldId) ; 
+        else if (var->getVarType()==CVariable::t_double) addAttribute(name,var->getData<double>(),&fieldId) ; 
+        else addAttribute(name,var->getData<string>(),&fieldId) ; 
+     }
+ 
+     void CNc4DataOutput::writeAttribute_ (CVariable* var)
+     {
+        string name ;
+        if (!var->name.isEmpty()) name=var->name ;
+        else if (var->hasId()) name=var->getId() ;
+        else return ;
+        
+        if (var->getVarType()==CVariable::t_int) addAttribute(name,var->getData<int>()) ; 
+        else if (var->getVarType()==CVariable::t_short_int) addAttribute(name,var->getData<short int>()) ; 
+        else if (var->getVarType()==CVariable::t_long_int) addAttribute(name,var->getData<long int>()) ; 
+        else if (var->getVarType()==CVariable::t_float) addAttribute(name,var->getData<float>()) ; 
+        else if (var->getVarType()==CVariable::t_double) addAttribute(name,var->getData<double>()) ; 
+        else addAttribute(name,var->getData<string>()) ; 
+     }     
  
       void CNc4DataOutput::syncFile_ (void)