-- 021202
-- H98-compliant

module LiftEq where

import Liftable

-- Lifted Eq operations:

(==*), (/=*) :: (Liftable k, Eq a) => k a -> k a -> k Bool
(==*) = lift2 (==)
(/=*) = lift2 (/=)