Add 'insert' as synonym for '&'.

Closes #90.
haskell · Oct 17, 2023 · 990dfff · 990dfff
1 parent 7a6a57e
commit 990dfff
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 0 deletions.
diff --git a/ChangeLog b/ChangeLog
@@ -6,6 +6,8 @@ NEXT
 
 * Documented that some functions are partial (issue #98).
 
+* Add `insert` function as synonym for `&` (issue #90).
+
 5.8.1.1
 -------
 

diff --git a/Data/Graph/Inductive/Graph.hs b/Data/Graph/Inductive/Graph.hs
@@ -34,6 +34,7 @@ module Data.Graph.Inductive.Graph (
     Graph(..),
     DynGraph(..),
     -- * Operations
+    insert,
     order,
     size,
     -- ** Graph Folds and Maps
@@ -187,6 +188,10 @@ class (Graph gr) => DynGraph gr where
   --   in the graph.
   (&) :: Context a b -> gr a b -> gr a b
 
+-- | A synonym for '&', to avoid conflicts with the similarly named
+-- operator in "Data.Function".
+insert :: DynGraph gr => Context a b -> gr a b -> gr a b
+insert = (&)
 
 -- | The number of nodes in the graph.  An alias for 'noNodes'.
 order :: (Graph gr) => gr a b -> Int