CDI_reduce_dim: wrong result when reduce time dimension (bug fix).

365db31d · Uwe Schulzweida · d92ff985 · 365db31d · 365db31d
Commit 365db31d authored Sep 04, 2018 by Uwe Schulzweida
Hide whitespace changes
Inline Side-by-side

Showing with 5 additions and 4 deletions

ChangeLog ChangeLog +2 -1

src/cdf_write.c src/cdf_write.c +3 -3

No files found.
--- a/ChangeLog
+++ b/ChangeLog
@@ -4,7 +4,8 @@

 2018-09-04  Uwe Schulzweida

-	* NetCDF: added support for single scalar variable 
+	* CDI_reduce_dim: wrong result when reduce time dimension (bug fix)
+	* NetCDF: added support for single scalar variable

 2018-08-10  Uwe Schulzweida


--- a/src/cdf_write.c
+++ b/src/cdf_write.c
@@ -1029,7 +1029,7 @@ void cdf_write_var(stream_t *streamptr, int varID, int memtype, const void *data
  int zaxisindex = vlistZaxisIndex(vlistID, zaxisID);
  int zid = streamptr->zaxisID[zaxisindex];

-  if ( timetype != TIME_CONSTANT )
+  if ( vlistHasTime(vlistID) && timetype != TIME_CONSTANT )
    {
      start[ndims] = (size_t)ntsteps - 1;
      count[ndims] = 1;
@@ -1123,7 +1123,7 @@ void cdf_write_var_chunk(stream_t *streamptr, int varID, int memtype,
  int zaxisindex = vlistZaxisIndex(vlistID, zaxisID);
  int zid = streamptr->zaxisID[zaxisindex];

-  if ( timetype != TIME_CONSTANT )
+  if ( vlistHasTime(vlistID) && timetype != TIME_CONSTANT )
    {
      start[ndims] = (size_t)ntsteps - 1;
      count[ndims] = 1;
@@ -1222,7 +1222,7 @@ void cdf_write_var_slice(stream_t *streamptr, int varID, int levelID, int memtyp
  bool swapxy = (dimorder[2] == 2 || dimorder[0] == 1) && xid != CDI_UNDEFID && yid != CDI_UNDEFID;

  size_t ndims = 0;
-  if ( timetype != TIME_CONSTANT )
+  if ( vlistHasTime(vlistID) && timetype != TIME_CONSTANT )
    {
      start[ndims] = (size_t)ntsteps - 1;
      count[ndims] = 1;