get_deflate: UX: %deflate() requires %open(mpi=.false.)

Author: scivision

src/interface.f90

@@ -358,7 +358,7 @@ subroutine ph5open(self, filename, action, mpi, comp_lvl, shuffle, fletcher32, d
 case ('w')
   call h5fcreate_f(filename, H5F_ACC_TRUNC_F, self%file_id, ierr, access_prp=fapl)
 case default
-  error stop 'h5fortran: Unsupported open(..., action= ' // laction
+  error stop 'h5fortran:open Unsupported action= ' // laction
 end select
 
 if(ierr/=0) error stop "h5open/create: could not initialize HDF5 file: " // filename // " action: " // laction

src/read/read.f90

@@ -49,6 +49,8 @@
 
 logical :: debug = .false.
 
+if(self%use_mpi) error stop "h5fortran:get_deflate: must not have mpi=.true. => %open(mpi=.false.) to use %deflate()"
+
 Naux = size(Aux, kind=SIZE_T)
 
 call h5dopen_f(self%file_id, dname, dset_id, ierr)