module Hypsibius.Formats where

import           Data.Adnot
import           Data.Sequence (Seq)
import qualified Data.ByteString as BS

import           Hypsibius.Data

readScale :: FilePath -> IO (Either String Scale)
readScale = fmap decode . BS.readFile