module TMS where

import qualified Data.Adnot as A
import qualified Data.ByteString as BS

import qualified TMS.Spec as Spec

main :: IO ()
main = do
  f <- BS.getContents
  print (A.decodeEither f :: Either String Spec.TMSSpec)