hashirama/reanimate
Watch
1
0
Fork
You've already forked reanimate
 0
mirror of https://github.com/reanimate/reanimate.git synced 2026-09-12 16:42:23 +00:00
Code Issues Projects Releases Wiki Activity

Wibble in clip_rect.

Browse source
This commit is contained in:
David 2019-02-14 16:57:40 +01:00
commit 9515c65896
2 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

4
README.md
View file

@ -121,8 +121,8 @@ clip_rect = proc () -> do
paintStatic nth = proc () ->
annotate' (obj "white" (20+nth*10) (20+nth*10))
-< g_ [transform_ $ translate 160 90]
runAni color nth = proc () ->
annotate' (defineAnimation $ circle_clip (obj color (20+nth*10) (20+nth*10)))
runAni color nth = defineAnimation $ proc () ->
annotate' (circle_clip (obj color (20+nth*10) (20+nth*10)))
-< g_ [transform_ $ translate 160 90]
obj c width height = proc () -> do
duration 1 -< ()

4
src/Reanimate/Examples.hs
View file

@ -157,8 +157,8 @@ clip_rect = proc () -> do
paintStatic nth = proc () ->
annotate' (obj "white" (20+nth*10) (20+nth*10))
-< g_ [transform_ $ translate 160 90]
runAni color nth = proc () ->
annotate' (defineAnimation $ circle_clip (obj color (20+nth*10) (20+nth*10)))
runAni color nth = defineAnimation $ proc () ->
annotate' (circle_clip (obj color (20+nth*10) (20+nth*10)))
-< g_ [transform_ $ translate 160 90]
obj c width height = proc () -> do
duration 1 -< ()