@@ -43,11 +43,11 @@ class SemiIsoFunctor f where
4343 -- | The contravariant map.
4444 simap :: ASemiIso' a b -> f b -> f a
4545 simap = simapCo . fromSemi
46−
46+
4747 -- | The covariant map.
4848 simapCo :: ASemiIso' a b -> f a -> f b
4949 simapCo = simap . fromSemi
50−
50+
5151 {-# MINIMAL simap | simapCo #-}
5252
5353-- | A infix operator for 'simap'.