Changeset 1244

Timestamp:

08/29/17 14:57:04 (7 years ago)

Author:

oabramkina

Message:

Fixing a bug in missing_values.

Location:

XIOS/dev/XIOS_DEV_CMIP6/src

Files:

• filter/store_filter.cpp (modified) (1 diff)
• server.cpp (modified) (1 diff)

XIOS/dev/XIOS_DEV_CMIP6/src/filter/store_filter.cpp

@@ -87 +87 @@
     if (detectMissingValues)
     {
+      const double nanValue = std::numeric_limits<double>::quiet_NaN();
       const size_t nbData = packet->data.numElements();
       for (size_t idx = 0; idx < nbData; ++idx)
       {
-        if (NumTraits<double>::isnan(packet->data(idx)))
-          packet->data(idx) = missingValue;
+        if (packet->data(idx)==missingValue)
+          packet->data(idx) = nanValue;
       }
     }

XIOS/dev/XIOS_DEV_CMIP6/src/server.cpp

@@ -380 +380 @@
         else if (serverLevel == 2)
         {
-          info(50)<<"intercommCreate::server "<<globalRank<<" intraCommSize : "<<intraCommSize
+          info(50)<<"intercommCreate::server (server level 2)"<<globalRank<<" intraCommSize : "<<intraCommSize
                    <<" intraCommRank :"<<intraCommRank<<"  clientLeader "<< srvGlobalRanks[0] <<endl ;
           MPI_Intercomm_create(intraComm, 0, CXios::globalComm, srvGlobalRanks[0], 0, &newComm) ;