hmemcpy/milewski-ctfp-pdf
1
1
Fork 0
mirror of https://github.com/hmemcpy/milewski-ctfp-pdf.git synced 2024-11-26 03:11:47 +03:00
Code Issues Projects Releases Wiki Activity

Use Product rather than Prod

Browse Source
This commit is contained in:
Bartosz Milewski 2019-06-11 12:59:00 -07:00
parent bd5b309165
commit 15c672cab1
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/content/3.7/code/haskell/snippet32.hs
View File

@ -1 +1 @@
counit (Prod (Reader f, s)) = f s
counit (Product (Reader f, s)) = f s

2
src/content/3.7/code/haskell/snippet34.hs
View File

@ -1 +1 @@
unit a = Reader (\s -> Prod (a, s))
unit a = Reader (\s -> Product (a, s))