import Codec.Serialise
import qualified Data.List as DL
-import Data.Maybe (maybe)
import Data.Map.Strict (Map, toList)
import qualified Data.Map.Strict as DM
import qualified Data.ByteString.Lazy as BSL
import Gargantext.Prelude
-import Gargantext.Prelude.Utils
+import Gargantext.Database.GargDB
import Gargantext.Core (Lang(..), allLangs)
import Gargantext.Core.Text.Terms.Mono (words)
import Gargantext.Core.Text.Metrics.Count (occurrencesWith)
textSample :: Lang -> String
textSample EN = EN.textSample
textSample FR = FR.textSample
- textSample _ = panic "textSample: not impl yet"
+ textSample _ = panic "[G.C.T.L:detectLangDefault] not impl yet"
--textSample DE = DE.textSample
--textSample SP = SP.textSample
--textSample CH = CH.textSample