[FIX] some instances and tools as todo
[gargantext.git] / src / Gargantext / Database / Schema / NodeNgrams.hs
index f5c6419cbb7ea517ac72e42fdacf74cd0a8c1f1e..89aa88a53093117a7718ca82cd43470bb3bc3d20 100644 (file)
@@ -14,34 +14,16 @@ NodeNgrams register Context of Ngrams (named Cgrams then)
 {-# OPTIONS_GHC -fno-warn-orphans #-}
 
 {-# LANGUAGE Arrows                 #-}
-{-# LANGUAGE FlexibleContexts       #-}
-{-# LANGUAGE FlexibleInstances      #-}
 {-# LANGUAGE FunctionalDependencies #-}
 {-# LANGUAGE QuasiQuotes            #-}
-{-# LANGUAGE MultiParamTypeClasses  #-}
-{-# LANGUAGE NoImplicitPrelude      #-}
-{-# LANGUAGE OverloadedStrings      #-}
-{-# LANGUAGE RankNTypes             #-}
 {-# LANGUAGE TemplateHaskell        #-}
 
 module Gargantext.Database.Schema.NodeNgrams where
 
-import Data.List.Extra (nubOrd)
-import Data.Map (Map)
-import Data.Maybe (Maybe, fromMaybe)
 import Data.Text (Text)
-import Database.PostgreSQL.Simple (FromRow)
-import Database.PostgreSQL.Simple.FromRow (fromRow, field)
-import Database.PostgreSQL.Simple.SqlQQ (sql)
-import Database.PostgreSQL.Simple.ToField (toField)
-import Database.PostgreSQL.Simple.Types (Values(..), QualifiedIdentifier(..))
 import Gargantext.Core.Types
-import Gargantext.Database.Admin.Utils
-import Gargantext.Database.Schema.Ngrams (NgramsType, ngramsTypeId, fromNgramsTypeId)
+import Gargantext.Database.Schema.Ngrams (NgramsType)
 import Gargantext.Prelude
-import qualified Data.List as List
-import qualified Data.Map as Map
-import qualified Database.PostgreSQL.Simple as PGS (Query, Only(..))
 
 
 data NodeNgramsPoly id