{-# LANGUAGE CPP #-}
-module Ngrams.Metrics (main) where
+--module Ngrams.Metrics (main) where
+module Ngrams.Metrics where
+{-
import Data.Text (Text)
import qualified Data.Text as T
import Data.Ratio
-> SpecWith ()
testPair f a b r = it ("‘" <> T.unpack a <> "’ and ‘" <> T.unpack b <> "’") $
f a b `shouldBe` r
+
+-}