gargantext-0.0.7.1.5.3: Search, map, share
Copyright(c) CNRS 2017-Present
LicenseAGPL + CECILL v3
Maintainerteam@gargantext.org
Stabilityexperimental
PortabilityPOSIX
Safe HaskellSafe-Inferred
LanguageHaskell2010

Gargantext.Database.Query.Table.NgramsPostag

Description

TODO use Opaleye for the queries.

Synopsis

Documentation

data NgramsPostag #

Constructors

NgramsPostag 

Instances

Instances details
Generic NgramsPostag # 
Instance details

Defined in Gargantext.Database.Query.Table.NgramsPostag

Associated Types

type Rep NgramsPostag :: Type -> Type #

Show NgramsPostag # 
Instance details

Defined in Gargantext.Database.Query.Table.NgramsPostag

Eq NgramsPostag # 
Instance details

Defined in Gargantext.Database.Query.Table.NgramsPostag

Ord NgramsPostag # 
Instance details

Defined in Gargantext.Database.Query.Table.NgramsPostag

Hashable NgramsPostag # 
Instance details

Defined in Gargantext.Database.Query.Table.NgramsPostag

type Rep NgramsPostag # 
Instance details

Defined in Gargantext.Database.Query.Table.NgramsPostag

type Rep NgramsPostag = D1 ('MetaData "NgramsPostag" "Gargantext.Database.Query.Table.NgramsPostag" "gargantext-0.0.7.1.5.3-inplace" 'False) (C1 ('MetaCons "NgramsPostag" 'PrefixI 'True) ((S1 ('MetaSel ('Just "_np_lang") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 Lang) :*: S1 ('MetaSel ('Just "_np_algo") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 PosTagAlgo)) :*: (S1 ('MetaSel ('Just "_np_postag") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 POS) :*: (S1 ('MetaSel ('Just "_np_form") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 Ngrams) :*: S1 ('MetaSel ('Just "_np_lem") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 Ngrams)))))

createTable_NgramsPostag :: DBCmd err [Int] #

This is the same as selectLems, but slower. selectLems' :: Lang -> NLPServerConfig -> [Ngrams] -> DBCmd err [(Form, Lem)] selectLems' l (NLPServerConfig { server }) ns = runPGSQuery querySelectLems' (PGS.Only $ Values fields datas) where fields = map (QualifiedIdentifier Nothing) ["int4","int4","text", "int4"] datas = map (d -> [toField $ toDBid l, toField $ toDBid server] <> toRow d) ns

Insert Table