-- abstracted hash function that takes a string
-- to hash and returns a hex string
hashString :: String -> String
hashString =
  maybe (error "Something went wrong generating a hash") show . sha256
hashString :: String -> String
hashString =
  maybe (error "Something went wrong generating a hash") show . sha256
hashString =
  maybe (error "Something went wrong generating a hash") show . sha256