CS-581/Homework
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Change fmap to (.)

Browse Source
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
HW2.fedorind.hs
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