import Control.Applicative
import Data.Either
import Data.Functor.Compose
import Data.Functor.Identity
import Data.List
import Data.String
import Prelude
import System.IO (IO)
import Text.Megaparsec
import qualified Data.MonoTraversable as MT
import qualified Data.Text.Lazy    as TL
import qualified Data.Text.Lazy.IO as TL
import qualified System.IO as IO

import qualified Language.Symantic.Document as D
import qualified Hcompta as H

:m Hcompta.LCC as LCC

:set -Wno-type-defaults