diff --git a/sources/io.F90 b/sources/io.F90
index 7cba9e2..1f53308 100644
--- a/sources/io.F90
+++ b/sources/io.F90
@@ -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