diff options
-rw-r--r-- | libraries/base/Data/Bitraversable.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libraries/base/Data/Bitraversable.hs b/libraries/base/Data/Bitraversable.hs index 4064929890..cf1272a50f 100644 --- a/libraries/base/Data/Bitraversable.hs +++ b/libraries/base/Data/Bitraversable.hs @@ -55,7 +55,7 @@ import GHC.Generics (K1(..)) -- @'Data.Functor.Compose.Compose' . -- 'fmap' ('bitraverse' g1 g2) . -- 'bitraverse' f1 f2 --- ≡ 'traverse' ('Data.Functor.Compose.Compose' . 'fmap' g1 . f1) +-- ≡ 'bitraverse' ('Data.Functor.Compose.Compose' . 'fmap' g1 . f1) -- ('Data.Functor.Compose.Compose' . 'fmap' g2 . f2)@ -- -- where an /applicative transformation/ is a function |