IO: Tune chunking for compressions in store_dataset_h5().
Signed-off-by: Grzegorz Kowal <grzegorz@amuncode.org>
This commit is contained in:
parent
43ad4a7af3
commit
ce1f6cee4a
@ -5344,10 +5344,9 @@ module io
|
||||
|
||||
!-------------------------------------------------------------------------------
|
||||
!
|
||||
cdims = dims
|
||||
rank = size(dims)
|
||||
|
||||
if (compress) cdims(1) = 1
|
||||
cdims = dims
|
||||
if (compress .and. hcformat .eq. H5Z_ZFP) cdims(rank) = 1
|
||||
|
||||
call h5screate_simple_f(rank, dims, space_id, status)
|
||||
if (status /= 0) then
|
||||
|
Loading…
x
Reference in New Issue
Block a user