Skip to content
Snippets Groups Projects

Consolidation with CDI-PIO (develop)

Merged Sergey Kosukhin requested to merge m300488/develop-rebase into develop
1 file
+ 7
5
Compare changes
  • Side-by-side
  • Inline
+ 7
5
@@ -133,7 +133,7 @@ main(int argc, char *argv[])
{
nmiss = 0
};
double *lons, *lats, *restrict var[nvars], *levs, mscale, mrscale;
double *lons, *lats, *restrict var[nvars], mscale, mrscale;
size_t varSize[nvars];
const char *varName[nvars] = { "varname1", "varname2" };
#ifndef TEST_CHUNK_WRITE
@@ -198,8 +198,6 @@ main(int argc, char *argv[])
for (size_t i = 0; i < (size_t) nlon; ++i) lons[i] = ((double) (i * 360)) / nlon;
lats = (double *) malloc((size_t) nlat * sizeof(lats[0]));
for (size_t i = 0; i < (size_t) nlat; ++i) lats[i] = ((double) (i * 180)) / nlat - 90.0;
levs = (double *) malloc((size_t) nlev * sizeof(levs[0]));
for (size_t i = 0; i < (size_t) nlev; ++i) levs[i] = 101300 - floor(3940.3 * (exp(2.3579 * (double) (i) / (nlev - 1)) - 1.0));
varSize[0] = (size_t) nlon * (size_t) nlat;
varSize[1] = (size_t) nlon * (size_t) nlat * (size_t) nlev;
@@ -216,7 +214,12 @@ main(int argc, char *argv[])
// Create a pressure level Z-axis
zaxisID[1] = zaxisCreate(ZAXIS_PRESSURE, nlev);
zaxisDefLevels(zaxisID[1], levs);
{
double *levs = (double *) malloc((size_t) nlev * sizeof(levs[0]));
for (size_t i = 0; i < (size_t) nlev; ++i) levs[i] = 101300 - floor(3940.3 * (exp(2.3579 * (double) (i) / (nlev - 1)) - 1.0));
zaxisDefLevels(zaxisID[1], levs);
free(levs);
}
/* add uuids to zaxis and grid */
{
@@ -381,7 +384,6 @@ main(int argc, char *argv[])
zaxisDestroy(zaxisID[0]);
zaxisDestroy(zaxisID[1]);
gridDestroy(gridID);
free(levs);
free(lats);
free(lons);
return 0;
Loading