Changeset 2264 for XIOS/dev/dev_ym/XIOS_COUPLING/src/io/onetcdf4.cpp

Timestamp:

11/23/21 13:12:46 (3 years ago)

Author:

ymipsl

Message:

Scalar can be now distributed on server side, avoiding incorrect result coming from redondant nature of scalar grid.
YM

File:

• XIOS/dev/dev_ym/XIOS_COUPLING/src/io/onetcdf4.cpp (modified) (3 diffs)

XIOS/dev/dev_ym/XIOS_COUPLING/src/io/onetcdf4.cpp

@@ -477 +477 @@
          if (sizes.size()==0) 
          {
-            array_size=1 ;
-            sstart.push_back(0);
-            scount.push_back(1);
+            
+            if ((start != NULL) && (count != NULL) && start->size()==1 && count->size()==1) // pur scalar case
+              array_size*=(*count)[0] ;
+            else array_size=1 ;
          }
          else
@@ -492 +493 @@
              sstart.push_back(record);
              scount.push_back(1);
-              if ((start == NULL) &&
-                  (count == NULL)) i++;
-              it++;
+             if ((start == NULL) && (count == NULL)) i++;
+             it++;
+             if (it==end)
+             {
+               if ((start != NULL) && (count != NULL) && start->size()==1 && count->size()==1) // pur scalar case
+               {
+                 scount[0]=(*count)[0] ;
+                 array_size *= (*count)[0];
+               }
+             }
            }
-
+           
            for (;it != end; it++)
            {
@@ -569 +577 @@
          int grpid = this->getCurrentGroup();
          int varid = this->getVariable(name);
+         
          StdSize array_size = 1;
          std::vector<StdSize> sstart, scount;