Serialize/deserialize hmatrix matrices to/from a file.

hmatrix_binary_explanation.md

After searching unsuccessfully for how to do this, I discovered that there's a Binary instance internal to hmatrix. The following code depends on hmatrix, binary, and bytestring.

hmatrix_binary_test.hs

module Main where

import           Data.Binary
import qualified Data.ByteString.Lazy as BS
import           Numeric.LinearAlgebra


main = do
  let testMatrix = matrix 3 [1..6] :: Matrix Double
      bs = encode testMatrix
      fp = "testMatrix.dat"

  BS.writeFile fp bs
  bs' <- BS.readFile fp

  let testMatrix' = decode bs' :: Matrix Double

  putStrLn $ "Matrices are equal? " ++ show (testMatrix == testMatrix')