sorted imports
This commit is contained in:
parent
faefb3c2c7
commit
85e57325dc
@ -78,7 +78,6 @@ withFacts =
|
||||
Right otherStatement -> throw $ NonFactException factText otherStatement
|
||||
Left ex -> throw $ CannotParseStatementException factText ex
|
||||
|
||||
|
||||
withFactsAndRules :: [Text] -> [Text] -> NaiveDatabase
|
||||
withFactsAndRules facts = foldr (addRule . extractRule) (withFacts facts)
|
||||
|
||||
|
||||
@ -8,15 +8,10 @@ module Datalog.Rules where
|
||||
|
||||
import Control.Exception.Base
|
||||
import Data.List
|
||||
import Data.Map (Map)
|
||||
import Data.Map qualified as Map
|
||||
import Data.Maybe
|
||||
import Data.Set (Set)
|
||||
import Data.Set qualified as Set
|
||||
import Data.Text (Text)
|
||||
import Data.Void
|
||||
import Datalog.DatalogParser (Head (HeadSingle), Literal (..), Statement (..), Term (..), parseDatalog)
|
||||
import Text.Megaparsec (ParseErrorBundle)
|
||||
import Datalog.DatalogDB
|
||||
|
||||
data BodyConstraint = BodyConstraint
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user