diff --git a/source/library/Language/Haskell/Brittany/Internal/Components/OpTree.hs b/source/library/Language/Haskell/Brittany/Internal/Components/OpTree.hs
index f0a8084..f68a434 100644
--- a/source/library/Language/Haskell/Brittany/Internal/Components/OpTree.hs
+++ b/source/library/Language/Haskell/Brittany/Internal/Components/OpTree.hs
@@ -400,6 +400,10 @@ hardcodedFixity allowUnqualify = \case
   "::-"         -> fixity InfixN 0
   "&!"          -> fixity InfixL 1
 
+  -- extra
+  "||^"         -> fixity InfixL 9
+  "&&^"         -> fixity InfixL 9
+
   -- quickcheck (-state-machine)
   ":&&"         -> fixity InfixL 9
   ":||"         -> fixity InfixL 9