graph-rewriting-layout 0.5.0 → 0.5.1
raw patch · 3 files changed
+13/−10 lines, 3 filesdep ~graph-rewritingPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: graph-rewriting
API changes (from Hackage documentation)
Files
- GraphRewriting/Layout/Coulomb.hs +4/−2
- GraphRewriting/Layout/Gravitation.hs +5/−4
- graph-rewriting-layout.cabal +4/−4
GraphRewriting/Layout/Coulomb.hs view
@@ -1,6 +1,8 @@+{-# LANGUAGE UnicodeSyntax, FlexibleContexts #-} module GraphRewriting.Layout.Coulomb where import Data.View+import Data.Functor import GraphRewriting.Graph.Types import GraphRewriting.Graph.Read import GraphRewriting.Layout.Position@@ -9,6 +11,6 @@ coulombForce ∷ View Position n ⇒ Node -> WithGraph n Force coulombForce node = do- n ← examineNode position node- ns ← mapM (examineNode position) =<< readNodeList+ n ← examine position <$> readNode node+ ns ← fmap (map $ examine position) (mapM readNode =<< readNodeList) return $ fsum [repulsion n' n | n' ← ns]
GraphRewriting/Layout/Gravitation.hs view
@@ -1,9 +1,10 @@+{-# LANGUAGE UnicodeSyntax, FlexibleContexts #-} module GraphRewriting.Layout.Gravitation where import Data.View import Data.Vector.Class import Data.Vector.V2-import Control.Monad+import Data.Functor import GraphRewriting.Graph.Types import GraphRewriting.Graph.Read import GraphRewriting.Layout.Position@@ -11,10 +12,10 @@ centralGravitation ∷ View Position n ⇒ Node → WithGraph n Force-centralGravitation = liftM (attraction $ vpromote 0) . examineNode position+centralGravitation = fmap (attraction (vpromote 0) . examine position) . readNode gravitation ∷ View Position n ⇒ Node -> Rewrite n Force gravitation node = do- n ← examineNode position node- ns ← mapM (examineNode position) =<< readNodeList+ n ← examine position <$> readNode node+ ns ← fmap (map $ examine position) (mapM readNode =<< readNodeList) return $ fsum [attraction n' n | n' ← ns]
graph-rewriting-layout.cabal view
@@ -1,5 +1,5 @@ Name: graph-rewriting-layout-Version: 0.5.0+Version: 0.5.1 Copyright: (c) 2010, Jan Rochel License: BSD3 License-File: LICENSE@@ -9,7 +9,7 @@ Stability: beta Build-Type: Simple Synopsis: Force-directed node placement intended for incremental graph drawing-Description: Defines basic methods for force-directed node displacement that can be combined into an incremental graph-drawing procedure.+Description: Defines basic methods for force-directed node displacement that can be combined into an incremental graph-drawing procedure. See graph-rewriting-ski package for an example. Category: Graphs, Graphics Cabal-Version: >= 1.6 @@ -17,7 +17,7 @@ Build-Depends: base >= 4 && < 4.6, base-unicode-symbols >= 0.2 && < 0.3,- graph-rewriting >= 0.5 && < 0.7,+ graph-rewriting >= 0.5 && < 0.8, AC-Vector >= 2.3 && < 2.4 Exposed-Modules: GraphRewriting.Layout.Position@@ -38,4 +38,4 @@ MultiParamTypeClasses TypeSynonymInstances OverlappingInstances- GHC-Options: -fno-warn-duplicate-exports+ GHC-Options: -fno-warn-duplicate-exports -fwarn-unused-binds -fwarn-unused-imports -fwarn-unused-do-bind -fwarn-wrong-do-bind -fwarn-unrecognised-pragmas