Add animation effects. (#9)

* latex-wheel and MonadFix for Scene.

* Add Effects module.


Former-commit-id: 824ebe9919e57fcc3af7c8c4d6afa0e9899564f8
This commit is contained in:
David Himmelstrup 2019-09-17 18:21:52 +08:00 committed by GitHub
commit 716a42cdaf
6 changed files with 156 additions and 2 deletions

View file

@ -39,8 +39,6 @@ dropA :: Double -> Animation -> Animation
dropA d1 (Animation d2 f) = Animation (max 0 (d2-d1)) $
Frame $ \d t -> unFrame f d (t+d1)
o # f = f o
-- screen width 320
-- screen height 180
main :: IO ()