src/Gargantext/Text/Ngrams/Lists.hs

   1 {-|
   2 Module      : Gargantext.Text.Ngrams.Lists
   3 Description :
   4 Copyright   : (c) CNRS, 2017-Present
   5 License     : AGPL + CECILL v3
   6 Maintainer  : team@gargantext.org
   7 Stability   : experimental
   8 Portability : POSIX
   9
  10 Here is a longer description of this module, containing some
  11 commentary with @some markup@.
  12 -}
  13
  14 {-# LANGUAGE NoImplicitPrelude #-}
  15
  16 module Gargantext.Text.Ngrams.Lists
  17   where
  18
  19 --import Data.Maybe
  20 --import Data.List (filter)
  21 --import Gargantext.Text
  22 --import Gargantext.Prelude
  23 --
  24 --graph :: [Ngrams] -> [Ngrams]
  25 --graph ngs = filter (\ng -> _ngramsListName ng == Just Graph) ngs
  26 --
  27 --candidates :: [Ngrams] -> [Ngrams]
  28 --candidates ngs = filter (\ng -> _ngramsListName ng == Just Candidate) ngs
  29 --
  30 --stop :: [Ngrams] -> [Ngrams]
  31 --stop ngs = filter (\ng -> _ngramsListName ng == Just Stop) ngs
  32