reanimate/examples/doc_newSprite.hs
David Himmelstrup ff2f7f614b Documentation (mostly for scenes) (#58)
Former-commit-id: 76fe4a261710ff744d09c9dd0a9b694f759fda41
2020-02-22 20:32:31 +08:00

11 lines
286 B
Haskell
Executable file

#!/usr/bin/env stack
-- stack runghc --package reanimate
module Main(main) where
import Reanimate
import Reanimate.Builtin.Documentation
main :: IO ()
main = reanimate $ docEnv $ sceneAnimation $ do
_ <- newSprite $ mkCircle <$> spriteT -- Circle sprite where radius=time.
wait 2