Improve and expose 'mkImage'.

Former-commit-id: eef95441c47ed3a798b1261e17b6018ea9281344
This commit is contained in:
David Himmelstrup 2020-05-12 13:15:12 +08:00
commit 01baecb88b
9 changed files with 136 additions and 36 deletions

10
examples/doc_mkImage.hs Executable file
View file

@ -0,0 +1,10 @@
#!/usr/bin/env stack
-- stack runghc --package reanimate
module Main (main) where
import Reanimate
import Reanimate.Builtin.Documentation
main :: IO ()
main = reanimate $ docEnv $ staticFrame 1 $
mkImage screenWidth screenHeight "../data/haskell.svg"

View file

@ -7,7 +7,6 @@ module Main (main) where
import Reanimate
import Reanimate.Povray (povraySlow')
import Reanimate.Raster
import Codec.Picture
import Codec.Picture.Types