diff options
Diffstat (limited to 'fortran/src/H5_f.c')
-rw-r--r-- | fortran/src/H5_f.c | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/fortran/src/H5_f.c b/fortran/src/H5_f.c index d740d29..4e0ecbc 100644 --- a/fortran/src/H5_f.c +++ b/fortran/src/H5_f.c @@ -381,14 +381,10 @@ int_f nh5init1_flags_c(int_f *h5lib_flags) { int ret_value = -1; - unsigned prm_1 = H5_SZIP_ALLOW_K13_OPTION_MASK; - unsigned prm_2 = H5_SZIP_CHIP_OPTION_MASK; - unsigned prm_3 = H5_SZIP_EC_OPTION_MASK; - unsigned prm_4 = H5_SZIP_NN_OPTION_MASK; + unsigned prm_1 = H5_SZIP_EC_OPTION_MASK; + unsigned prm_2 = H5_SZIP_NN_OPTION_MASK; h5lib_flags[0] = (int_f)prm_1; - h5lib_flags[1] = (int_f)prm_2; - h5lib_flags[2] = (int_f)prm_3; - h5lib_flags[3] = (int_f)prm_4; + h5lib_flags[1] = (int_f)prm_2; ret_value = 0; return ret_value; } |