diff options
Diffstat (limited to 'fortran/test/fflush2.f90')
| -rw-r--r-- | fortran/test/fflush2.f90 | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/fortran/test/fflush2.f90 b/fortran/test/fflush2.f90 index 38a2bd7..0414d37 100644 --- a/fortran/test/fflush2.f90 +++ b/fortran/test/fflush2.f90 @@ -50,13 +50,22 @@ ! dataset identifier ! INTEGER(HID_T) :: dset_id - + + ! + ! data space identifier + ! + INTEGER(HID_T) :: dataspace ! ! data type identifier ! INTEGER(HID_T) :: dtype_id + ! + !The dimensions for the dataset. + ! + INTEGER(HSIZE_T), DIMENSION(2) :: dims = (/NX,NY/) + ! !flag to check operation success ! |