pyrox.dev
1diff --git a/src/Control/PatternArrows.hs b/src/Control/PatternArrows.hs
2index d382c19..0b067dd 100644
3--- a/src/Control/PatternArrows.hs
4+++ b/src/Control/PatternArrows.hs
5@@ -23,6 +23,7 @@ import qualified Control.Category as C
6 import Control.Category ((>>>))
7 import qualified Control.Arrow as A
8 import Control.Arrow ((***), (<+>))
9+import Data.Function (fix)
10
11 -- |
12 -- A first-order pattern match