diff options
Diffstat (limited to 'fortran/test/tH5Sselect.f90')
-rw-r--r-- | fortran/test/tH5Sselect.f90 | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/fortran/test/tH5Sselect.f90 b/fortran/test/tH5Sselect.f90 index ae0d2d4..ad95ecf 100644 --- a/fortran/test/tH5Sselect.f90 +++ b/fortran/test/tH5Sselect.f90 @@ -117,7 +117,7 @@ !flag to check operation success ! INTEGER :: error, error_n - INTEGER, DIMENSION(7) :: data_dims + INTEGER(HSIZE_T), DIMENSION(3) :: data_dims ! @@ -398,7 +398,7 @@ ! INTEGER :: error LOGICAL :: status - INTEGER, DIMENSION(7) :: data_dims + INTEGER(HSIZE_T), DIMENSION(3) :: data_dims ! @@ -814,7 +814,7 @@ !flag to check operation success ! INTEGER :: error, error_n - INTEGER, DIMENSION(7) :: data_dims + INTEGER(HSIZE_T), DIMENSION(3) :: data_dims ! !initialize the coord array to give the selected points' position |