mirror/netcdf-c
2
0
Fork 0
mirror of https://github.com/Unidata/netcdf-c.git synced 2025-02-23 16:59:54 +08:00
Code Issues Packages Projects Releases Wiki Activity

uncommented test code

Browse Source
This commit is contained in:
Ed Hartnett 2018-08-21 06:36:40 -06:00
parent 0bf04076dc
commit b57b87c971
1 changed files with 36 additions and 45 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

81
nc_test4/tst_files6.c
View File

@ -21,45 +21,45 @@ int
main(int argc, char **argv) main(int argc, char **argv)
{ {
printf("\n*** Testing netcdf file functions some more.\n"); printf("\n*** Testing netcdf file functions some more.\n");
/* printf("*** testing Jeff Whitaker's test..."); */ printf("*** testing Jeff Whitaker's test...");
/* { */ {
/* #define DIM_NAME "xc" */ #define DIM_NAME "xc"
/* #define DIM_LEN 134 */ #define DIM_LEN 134
/* #define VAR_NAME1 "var1" */ #define VAR_NAME1 "var1"
/* #define VAR_NAME2 "var2" */ #define VAR_NAME2 "var2"
/* int ncid, dimid, varid1, varid2, dimid_in; */ int ncid, dimid, varid1, varid2, dimid_in;
/* int ndims_in, natts_in; */ int ndims_in, natts_in;
/* size_t len_in; */ size_t len_in;
/* char name_in[NC_MAX_NAME + 1]; */ char name_in[NC_MAX_NAME + 1];
/* nc_type xtype_in; */ nc_type xtype_in;
/* if (nc_create(FILE_NAME, NC_CLOBBER|NC_NETCDF4, &ncid)) ERR; */ if (nc_create(FILE_NAME, NC_CLOBBER|NC_NETCDF4, &ncid)) ERR;
/* if (nc_def_dim(ncid, DIM_NAME, DIM_LEN, &dimid)) ERR; */ if (nc_def_dim(ncid, DIM_NAME, DIM_LEN, &dimid)) ERR;
/* if (nc_def_var(ncid, VAR_NAME1, NC_FLOAT, 1, &dimid, &varid1)) ERR; */ if (nc_def_var(ncid, VAR_NAME1, NC_FLOAT, 1, &dimid, &varid1)) ERR;
/* if (nc_def_var(ncid, VAR_NAME2, NC_FLOAT, 1, &dimid, &varid2)) ERR; */ if (nc_def_var(ncid, VAR_NAME2, NC_FLOAT, 1, &dimid, &varid2)) ERR;
/* if (nc_def_var(ncid, DIM_NAME, NC_FLOAT, 1, &dimid, &varid2)) ERR; */ if (nc_def_var(ncid, DIM_NAME, NC_FLOAT, 1, &dimid, &varid2)) ERR;
/* if (nc_close(ncid)) ERR; */ if (nc_close(ncid)) ERR;
/* /\* Open and check. *\/ */ /* Open and check. */
/* if (nc_open(FILE_NAME, NC_CLOBBER|NC_NETCDF4, &ncid)) ERR; */ if (nc_open(FILE_NAME, NC_CLOBBER|NC_NETCDF4, &ncid)) ERR;
/* if (nc_inq_dim(ncid, 0, name_in, &len_in)) ERR; */ if (nc_inq_dim(ncid, 0, name_in, &len_in)) ERR;
/* if (strcmp(name_in, DIM_NAME) || len_in != DIM_LEN) ERR; */ if (strcmp(name_in, DIM_NAME) || len_in != DIM_LEN) ERR;
/* if (nc_inq_var(ncid, 0, name_in, &xtype_in, &ndims_in, */ if (nc_inq_var(ncid, 0, name_in, &xtype_in, &ndims_in,
/* &dimid_in, &natts_in)) ERR; */ &dimid_in, &natts_in)) ERR;
/* if (strcmp(name_in, VAR_NAME1) || xtype_in != NC_FLOAT || */ if (strcmp(name_in, VAR_NAME1) || xtype_in != NC_FLOAT ||
/* ndims_in != 1 || dimid_in != 0 || natts_in != 0) ERR; */ ndims_in != 1 || dimid_in != 0 || natts_in != 0) ERR;
/* if (nc_inq_var(ncid, 1, name_in, &xtype_in, &ndims_in, */ if (nc_inq_var(ncid, 1, name_in, &xtype_in, &ndims_in,
/* &dimid_in, &natts_in)) ERR; */ &dimid_in, &natts_in)) ERR;
/* if (strcmp(name_in, VAR_NAME2) || xtype_in != NC_FLOAT || */ if (strcmp(name_in, VAR_NAME2) || xtype_in != NC_FLOAT ||
/* ndims_in != 1 || dimid_in != 0 || natts_in != 0) ERR; */ ndims_in != 1 || dimid_in != 0 || natts_in != 0) ERR;
/* if (nc_inq_var(ncid, 2, name_in, &xtype_in, &ndims_in, */ if (nc_inq_var(ncid, 2, name_in, &xtype_in, &ndims_in,
/* &dimid_in, &natts_in)) ERR; */ &dimid_in, &natts_in)) ERR;
/* if (strcmp(name_in, DIM_NAME) || xtype_in != NC_FLOAT || */ if (strcmp(name_in, DIM_NAME) || xtype_in != NC_FLOAT ||
/* ndims_in != 1 || dimid_in != 0 || natts_in != 0) ERR; */ ndims_in != 1 || dimid_in != 0 || natts_in != 0) ERR;
/* if (nc_close(ncid)) ERR; */ if (nc_close(ncid)) ERR;
/* } */ }
/* SUMMARIZE_ERR; */ SUMMARIZE_ERR;
printf("*** testing HDF5 file with circular group structure..."); printf("*** testing HDF5 file with circular group structure...");
{ {
hid_t hdfid, grpid, grpid2, fapl_id; hid_t hdfid, grpid, grpid2, fapl_id;
@ -77,15 +77,6 @@ main(int argc, char **argv)
H5P_DEFAULT) < 0) ERR; H5P_DEFAULT) < 0) ERR;
if (H5Fclose(hdfid) < 0) ERR; if (H5Fclose(hdfid) < 0) ERR;
/* /\* Reopen the file with HDF5. *\/ */
/* if ((fapl_id = H5Pcreate(H5P_FILE_ACCESS)) < 0) ERR; */
/* if (H5Pset_fclose_degree(fapl_id, H5F_CLOSE_SEMI) < 0) ERR; */
/* if (H5Pset_cache(fapl_id, 0, CHUNK_CACHE_NELEMS, CHUNK_CACHE_SIZE, */
/* CHUNK_CACHE_PREEMPTION) < 0) ERR; */
/* if ((hdfid = H5Fopen(HDF5_FILE_NAME, H5F_ACC_RDONLY, H5P_DEFAULT)) < 0) ERR; */
/* if (H5Pclose(fapl_id) < 0) ERR; */
/* if (H5Fclose(hdfid) < 0) ERR; */
H5close(); /* Force HDF5 to forget about this file. */ H5close(); /* Force HDF5 to forget about this file. */
/* Now try and open it with netCDF. It will not work. */ /* Now try and open it with netCDF. It will not work. */