hkl_h5_open :: File -> DataFrameH5Path -> IO DataFrameH5
hkl_h5_open h5file dp = DataFrameH5
                         <$> openDataset' h5file (h5pImage dp)
                         <*> openDataset' h5file (h5pMu dp)
                         <*> openDataset' h5file (h5pOmega dp)
                         <*> openDataset' h5file (h5pDelta dp)
                         <*> openDataset' h5file (h5pGamma dp)
                         <*> openDataset' h5file (h5pUB dp)
                         <*> openDataset' h5file (h5pWavelength dp)
                         <*> openDataset' h5file (h5pDiffractometerType dp)
  where
    openDataset' hid (DataItem name _) = openDataset hid (pack name) Nothing
hkl_h5_open :: File -> DataFrameH5Path -> IO DataFrameH5
hkl_h5_open h5file dp = DataFrameH5
                         <$> openDataset' h5file (h5pImage dp)
                         <*> openDataset' h5file (h5pMu dp)
                         <*> openDataset' h5file (h5pOmega dp)
                         <*> openDataset' h5file (h5pDelta dp)
                         <*> openDataset' h5file (h5pGamma dp)
                         <*> openDataset' h5file (h5pUB dp)
                         <*> openDataset' h5file (h5pWavelength dp)
                         <*> openDataset' h5file (h5pDiffractometerType dp)
  where
    openDataset' hid (DataItem name _) = openDataset hid (pack name) Nothing
hkl_h5_open h5file dp = DataFrameH5
                         <$> openDataset' h5file (h5pImage dp)
                         <*> openDataset' h5file (h5pMu dp)
                         <*> openDataset' h5file (h5pOmega dp)
                         <*> openDataset' h5file (h5pDelta dp)
                         <*> openDataset' h5file (h5pGamma dp)
                         <*> openDataset' h5file (h5pUB dp)
                         <*> openDataset' h5file (h5pWavelength dp)
                         <*> openDataset' h5file (h5pDiffractometerType dp)
  where
    openDataset' hid (DataItem name _) = openDataset hid (pack name) Nothing