summaryrefslogtreecommitdiff
path: root/src/Refined
diff options
context:
space:
mode:
Diffstat (limited to 'src/Refined')
-rw-r--r--src/Refined/AEq.hs12
1 files changed, 12 insertions, 0 deletions
diff --git a/src/Refined/AEq.hs b/src/Refined/AEq.hs
new file mode 100644
index 0000000..0a60679
--- /dev/null
+++ b/src/Refined/AEq.hs
@@ -0,0 +1,12 @@
1{-# OPTIONS_GHC -fno-warn-orphans #-}
2
3module Refined.AEq where
4
5import Data.AEq
6import Refined
7
8import Data.Function (on)
9
10instance AEq a => AEq (Refined p a) where
11 (===) = (===) `on` unrefine
12 (~==) = (~==) `on` unrefine