Documentation (mostly for scenes) (#58)

Former-commit-id: 76fe4a261710ff744d09c9dd0a9b694f759fda41
This commit is contained in:
David Himmelstrup 2020-02-22 20:32:31 +08:00 committed by GitHub
commit ff2f7f614b
45 changed files with 759 additions and 163 deletions

View file

@ -4,6 +4,7 @@
module Main (main) where
import Reanimate
import Reanimate.Transition
import Reanimate.Builtin.Images
import Codec.Picture
@ -21,7 +22,7 @@ transitionTime :: Double
transitionTime = 0.5
main :: IO ()
main = reanimate $ bg `parA` transitions fadeInE fadeOutE transitionTime
main = reanimate $ bg `parA` chainT (overlapT transitionTime fadeT)
[comp1, comp2, comp3, comp4, comp5, comp6, comp7, setDuration transitionTime comp1]
where
bg = animate $ const $ mkBackgroundPixel bgColor