gsell
542daf7fc2
- define dummy MPI macros to be used in serial compilation, closing #10 - cleanup some "unused variable" warnings - fix some format warnings, using C99 format macros
66 lines
1.7 KiB
C
66 lines
1.7 KiB
C
/*
|
|
Copyright (c) 2006-2015, The Regents of the University of California,
|
|
through Lawrence Berkeley National Laboratory (subject to receipt of any
|
|
required approvals from the U.S. Dept. of Energy) and the Paul Scherrer
|
|
Institut (Switzerland). All rights reserved.
|
|
|
|
License: see file COPYING in top level of source distribution.
|
|
*/
|
|
|
|
/*
|
|
Note:
|
|
Running this example on more than one core is possible but the result
|
|
might not be what you expect. Please read the HDF5 documentation about
|
|
the VFD core driver.
|
|
*/
|
|
#include "H5hut.h"
|
|
#include "examples.h"
|
|
|
|
// name of output file
|
|
const char* fname = "example_core_vfd.h5";
|
|
|
|
// H5hut verbosity level
|
|
const h5_int64_t h5_verbosity = H5_VERBOSE_DEFAULT;
|
|
|
|
// number of particles we are going to write per core
|
|
const h5_int64_t num_particles = 32;
|
|
|
|
int
|
|
main (
|
|
int argc,
|
|
char* argv[]
|
|
){
|
|
|
|
// initialize MPI & H5hut
|
|
MPI_Init (&argc, &argv);
|
|
MPI_Comm comm = MPI_COMM_WORLD;
|
|
int comm_rank = 0;
|
|
MPI_Comm_rank (comm, &comm_rank);
|
|
H5AbortOnError ();
|
|
H5SetVerbosityLevel (h5_verbosity);
|
|
|
|
// open file and create first step
|
|
h5_prop_t prop = H5CreateFileProp ();
|
|
H5SetPropFileCoreVFD (prop, 0);
|
|
h5_file_t file = H5OpenFile (fname, H5_O_WRONLY, prop);
|
|
H5SetStep (file, 0);
|
|
|
|
// set number of particles this process is going to write
|
|
H5PartSetNumParticles(file, num_particles);
|
|
|
|
// create fake data
|
|
h5_int32_t data[num_particles];
|
|
for (int i = 0; i < num_particles; i++) {
|
|
data[i] = i + comm_rank * num_particles;
|
|
}
|
|
|
|
// write the data
|
|
H5PartWriteDataInt32 (file, "data", data);
|
|
|
|
// cleanup
|
|
H5CloseFile (file);
|
|
MPI_Finalize ();
|
|
return 0;
|
|
}
|
|
|