git.iko.soy/typeable/bloodhound
on 2eb39f7 help sign in
typeable/bloodhound/Database/Bloodhound/Types/Class.hs
14 lines 249 B history raw
1module Database.Bloodhound.Types.Class
2 ( Seminearring(..) )
3 where
5import Data.Monoid
7class Monoid a => Seminearring a where
8 -- 0, +, *
9 (<||>) :: a -> a -> a
10 (<&&>) :: a -> a -> a
11 (<&&>) = mappend
13infixr 5 <||>
14infixr 5 <&&>