test/Ngrams/Lang.hs

   1 module Ngrams.Lang where
   2
   3
   4 import Data.Gargantext.Types.Main (Language(..))
   5 import qualified Ngrams.Lang.Fr as Fr
   6 import qualified Ngrams.Lang.En as En
   7
   8 ngramsExtractionTest :: Language -> IO ()
   9 ngramsExtractionTest FR = Fr.ngramsExtractionTest
  10 ngramsExtractionTest EN = En.ngramsExtractionTest
  11