... | ... | @@ -3,7 +3,44 @@ |
|
|
:numbered:
|
|
|
|
|
|
== Open a H5hut file
|
|
|
=== Open file with default properties
|
|
|
|
|
|
=== Open file with default properties, serial version
|
|
|
|
|
|
*C implementation*
|
|
|
----
|
|
|
#include "H5hut.h"
|
|
|
|
|
|
int
|
|
|
main (
|
|
|
int argc,
|
|
|
char** argv
|
|
|
) {
|
|
|
h5_file_t f = H5OpenFile ("testfile.h5", H5_O_WRONLY, H5_PROP_DEFAULT);
|
|
|
|
|
|
H5CloseFile (f);
|
|
|
return 0;
|
|
|
}
|
|
|
----
|
|
|
|
|
|
*Fortran90 implementation*
|
|
|
----
|
|
|
include 'H5hut.f90'
|
|
|
|
|
|
program openclose
|
|
|
use H5hut
|
|
|
implicit none
|
|
|
include 'mpif.h'
|
|
|
|
|
|
integer*8 :: file_id, status
|
|
|
|
|
|
file_id = h5_openfile ("testfile.h5", H5_O_WRONLY, H5_PROP_DEFAULT)
|
|
|
|
|
|
status = h5_closefile (file_id);
|
|
|
end program openclose
|
|
|
----
|
|
|
|
|
|
|
|
|
=== Open file with default properties, parallel version
|
|
|
|
|
|
*C implementation*
|
|
|
----
|
... | ... | |