diff options
author | Ben Sima <ben@bsima.me> | 2019-03-27 09:25:12 -0700 |
---|---|---|
committer | Ben Sima <ben@bsima.me> | 2019-03-27 09:25:35 -0700 |
commit | 77ff3088b9c8ff217c6ed6fb9093a5aabb2ea3ca (patch) | |
tree | 2ce318b75ed5b1d01827fca8a7a373f7888f0417 /lore/Alpha.hs | |
parent | cfd213917c766c91f4c5fc7fdc91c2ca0ea13c26 (diff) |
working miso app
structure is in place, need to add styles and logic
Diffstat (limited to 'lore/Alpha.hs')
-rw-r--r-- | lore/Alpha.hs | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/lore/Alpha.hs b/lore/Alpha.hs new file mode 100644 index 0000000..b126241 --- /dev/null +++ b/lore/Alpha.hs @@ -0,0 +1,18 @@ +{-# LANGUAGE NoImplicitPrelude #-} +module Alpha ( + -- * General functions + (/@) + -- * Debugging tools + , say + ) where + +import Protolude +import Data.String + +-- | Debugging printf +say :: String -> IO () +say msg = putStrLn msg + +-- | Alias for map, fmap, <$> +(/@) :: Functor f => (a -> b) -> f a -> f b +(/@) = Protolude.fmap |