Deploying to gh-pages from @ 15472e46f8 🚀

This commit is contained in:
Lemmih 2020-08-28 02:57:57 +00:00
commit 555e89d5cb
7 changed files with 523 additions and 489 deletions

View file

@ -54,45 +54,51 @@ span.spaces { background: white }
<span class="lineno"> 35 </span>--
<span class="lineno"> 36 </span>-- Example:
<span class="lineno"> 37 </span>--
<span class="lineno"> 38 </span>-- &gt; overlapT 0.5 fadeT drawBox drawCircle
<span class="lineno"> 39 </span>--
<span class="lineno"> 40 </span>-- &lt;&lt;docs/gifs/doc_overlapT.gif&gt;&gt;
<span class="lineno"> 41 </span>overlapT :: Double -&gt; Transition -&gt; Transition
<span class="lineno"> 42 </span><span class="decl"><span class="istickedoff">overlapT overlap t a b =</span>
<span class="lineno"> 43 </span><span class="spaces"> </span><span class="istickedoff">aBefore `seqA` t aOverlap bOverlap `seqA` bAfter</span>
<span class="lineno"> 44 </span><span class="spaces"> </span><span class="istickedoff">where</span>
<span class="lineno"> 45 </span><span class="spaces"> </span><span class="istickedoff">aBefore = takeA (duration a - overlap) a</span>
<span class="lineno"> 46 </span><span class="spaces"> </span><span class="istickedoff">aOverlap = lastA overlap a</span>
<span class="lineno"> 47 </span><span class="spaces"> </span><span class="istickedoff">bOverlap = takeA overlap b</span>
<span class="lineno"> 48 </span><span class="spaces"> </span><span class="istickedoff">bAfter = dropA overlap b</span></span>
<span class="lineno"> 49 </span>
<span class="lineno"> 50 </span>
<span class="lineno"> 51 </span>-- | Create a transition between two animations by applying an effect to each respective animation.
<span class="lineno"> 52 </span>effectT :: Effect -- ^ Effect to be applied to the first animation.
<span class="lineno"> 53 </span> -&gt; Effect -- ^ Effect to be applied to the second animation.
<span class="lineno"> 54 </span> -&gt; Transition
<span class="lineno"> 55 </span><span class="decl"><span class="istickedoff">effectT eA eB a b = applyE eA a `parA` applyE eB b</span></span>
<span class="lineno"> 56 </span>
<span class="lineno"> 57 </span>-- | Combine a list of animations using a given transition.
<span class="lineno"> 58 </span>--
<span class="lineno"> 59 </span>-- Example:
<span class="lineno"> 38 </span>-- @
<span class="lineno"> 39 </span>-- 'overlapT' 0.5 'fadeT' 'Reanimate.Builtin.Documentation.drawBox' 'Reanimate.Builtin.Documentation.drawCircle'
<span class="lineno"> 40 </span>-- @
<span class="lineno"> 41 </span>--
<span class="lineno"> 42 </span>-- &lt;&lt;docs/gifs/doc_overlapT.gif&gt;&gt;
<span class="lineno"> 43 </span>overlapT :: Double -&gt; Transition -&gt; Transition
<span class="lineno"> 44 </span><span class="decl"><span class="istickedoff">overlapT overlap t a b =</span>
<span class="lineno"> 45 </span><span class="spaces"> </span><span class="istickedoff">aBefore `seqA` t aOverlap bOverlap `seqA` bAfter</span>
<span class="lineno"> 46 </span><span class="spaces"> </span><span class="istickedoff">where</span>
<span class="lineno"> 47 </span><span class="spaces"> </span><span class="istickedoff">aBefore = takeA (duration a - overlap) a</span>
<span class="lineno"> 48 </span><span class="spaces"> </span><span class="istickedoff">aOverlap = lastA overlap a</span>
<span class="lineno"> 49 </span><span class="spaces"> </span><span class="istickedoff">bOverlap = takeA overlap b</span>
<span class="lineno"> 50 </span><span class="spaces"> </span><span class="istickedoff">bAfter = dropA overlap b</span></span>
<span class="lineno"> 51 </span>
<span class="lineno"> 52 </span>
<span class="lineno"> 53 </span>-- | Create a transition between two animations by applying an effect to each respective animation.
<span class="lineno"> 54 </span>effectT :: Effect -- ^ Effect to be applied to the first animation.
<span class="lineno"> 55 </span> -&gt; Effect -- ^ Effect to be applied to the second animation.
<span class="lineno"> 56 </span> -&gt; Transition
<span class="lineno"> 57 </span><span class="decl"><span class="istickedoff">effectT eA eB a b = applyE eA a `parA` applyE eB b</span></span>
<span class="lineno"> 58 </span>
<span class="lineno"> 59 </span>-- | Combine a list of animations using a given transition.
<span class="lineno"> 60 </span>--
<span class="lineno"> 61 </span>-- &gt; chainT (overlapT 0.5 fadeT) [drawBox, drawCircle, drawProgress]
<span class="lineno"> 61 </span>-- Example:
<span class="lineno"> 62 </span>--
<span class="lineno"> 63 </span>-- &lt;&lt;docs/gifs/doc_chainT.gif&gt;&gt;
<span class="lineno"> 64 </span>chainT :: Transition -&gt; [Animation] -&gt; Animation
<span class="lineno"> 65 </span><span class="decl"><span class="istickedoff">chainT _ [] = <span class="nottickedoff">pause 0</span></span>
<span class="lineno"> 66 </span><span class="spaces"></span><span class="istickedoff">chainT t (x:xs) = foldl t x xs</span></span>
<span class="lineno"> 67 </span>
<span class="lineno"> 68 </span>-- | Fade out left-hand-side animation while fading in right-hand-side animation.
<span class="lineno"> 69 </span>--
<span class="lineno"> 70 </span>-- Example:
<span class="lineno"> 71 </span>--
<span class="lineno"> 72 </span>-- &gt; drawBox `fadeT` drawCircle
<span class="lineno"> 63 </span>-- @
<span class="lineno"> 64 </span>-- 'chainT' ('overlapT' 0.5 'fadeT') ['Reanimate.Builtin.Documentation.drawBox', 'Reanimate.Builtin.Documentation.drawCircle', 'Reanimate.Builtin.Documentation.drawProgress']
<span class="lineno"> 65 </span>-- @
<span class="lineno"> 66 </span>--
<span class="lineno"> 67 </span>-- &lt;&lt;docs/gifs/doc_chainT.gif&gt;&gt;
<span class="lineno"> 68 </span>chainT :: Transition -&gt; [Animation] -&gt; Animation
<span class="lineno"> 69 </span><span class="decl"><span class="istickedoff">chainT _ [] = <span class="nottickedoff">pause 0</span></span>
<span class="lineno"> 70 </span><span class="spaces"></span><span class="istickedoff">chainT t (x:xs) = foldl t x xs</span></span>
<span class="lineno"> 71 </span>
<span class="lineno"> 72 </span>-- | Fade out left-hand-side animation while fading in right-hand-side animation.
<span class="lineno"> 73 </span>--
<span class="lineno"> 74 </span>-- &lt;&lt;docs/gifs/doc_fadeT.gif&gt;&gt;
<span class="lineno"> 75 </span>fadeT :: Transition
<span class="lineno"> 76 </span><span class="decl"><span class="istickedoff">fadeT = effectT fadeOutE fadeInE</span></span>
<span class="lineno"> 74 </span>-- Example:
<span class="lineno"> 75 </span>--
<span class="lineno"> 76 </span>-- @
<span class="lineno"> 77 </span>-- 'Reanimate.Builtin.Documentation.drawBox' `'fadeT'` 'Reanimate.Builtin.Documentation.drawCircle'
<span class="lineno"> 78 </span>-- @
<span class="lineno"> 79 </span>--
<span class="lineno"> 80 </span>-- &lt;&lt;docs/gifs/doc_fadeT.gif&gt;&gt;
<span class="lineno"> 81 </span>fadeT :: Transition
<span class="lineno"> 82 </span><span class="decl"><span class="istickedoff">fadeT = effectT fadeOutE fadeInE</span></span>
</pre>
</body>