#include #include int main (int argc, char *argv[]) { const MPI_Offset TOTSIZ = 10; int dim1_id; int ierr; int ncid; int var_id; int dim_id[1]; MPI_Init (&argc, &argv); ierr = ncmpi_create (MPI_COMM_WORLD, "pnc_test.nc", NC_CLOBBER, MPI_INFO_NULL, &ncid); ierr = ncmpi_def_dim (ncid, "dim1", TOTSIZ, &dim1_id); dim_id[0] = dim1_id; ierr = ncmpi_def_var (ncid, "var1", NC_FLOAT, 1, &dim_id[0], &var_id); ierr = ncmpi_enddef (ncid); ierr = ncmpi_close (ncid); MPI_Finalize ( ); }