Change fmap to (.)

This commit is contained in:
Danila Fedorin 2020-10-07 16:12:14 -07:00
parent 26d7927c35
commit 8a4f83ec37
1 changed files with 1 additions and 1 deletions

View File

@ -95,4 +95,4 @@ neg = fold' (Lit . negate) Add (Mul . neg) -- Not efficient, but short :^)
-- >>> eval (sub e2 e1)
-- 51
--
sub = fmap (. neg) Add -- (a -> b) is a Functor
sub = (. neg) . Add -- (a -> b) is a Functor