diff options
| author | Chris Wells <chris@mathematicaster.org> | 2026-07-16 08:19:19 -0500 |
|---|---|---|
| committer | Chris Wells <chris@mathematicaster.org> | 2026-07-16 08:19:19 -0500 |
| commit | d955dfbfcb2c0ef1dc8056a02eb9b0e81e2de01a (patch) | |
| tree | 084b040ff29457836a7b226f28c4d948ef1a3c88 /src/Prolog.hs | |
| parent | 3a106ec8da34b42fe8c57200aae4e9a934c32f8f (diff) | |
| download | main-d955dfbfcb2c0ef1dc8056a02eb9b0e81e2de01a.tar main-d955dfbfcb2c0ef1dc8056a02eb9b0e81e2de01a.tar.gz main-d955dfbfcb2c0ef1dc8056a02eb9b0e81e2de01a.tar.bz2 main-d955dfbfcb2c0ef1dc8056a02eb9b0e81e2de01a.tar.lz main-d955dfbfcb2c0ef1dc8056a02eb9b0e81e2de01a.tar.xz main-d955dfbfcb2c0ef1dc8056a02eb9b0e81e2de01a.tar.zst main-d955dfbfcb2c0ef1dc8056a02eb9b0e81e2de01a.zip | |
Fixed Contravariant
Diffstat (limited to 'src/Prolog.hs')
| -rw-r--r-- | src/Prolog.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Prolog.hs b/src/Prolog.hs index 32f7c61..c43c278 100644 --- a/src/Prolog.hs +++ b/src/Prolog.hs @@ -209,8 +209,8 @@ instance H.Writable L.LaTeX where write p = L.renderFile p . H.itemBody -instance Contravariant H.Context where - contramap f (H.Context c) = H.Context $ \x xs -> c x xs . fmap f +-- instance Contravariant H.Context where +-- contramap f (H.Context c) = H.Context $ \x xs -> c x xs . fmap f instance Comonad H.Item where extract = H.itemBody |