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

Deploying to gh-pages from @ 1db90f3cdd0a15d1f3616cb1fdc3bc9933fcf5e8 🚀

Browse source
This commit is contained in:
Lemmih 2020-08-06 07:07:37 +00:00
commit 5076bd7c6b
14 changed files with 368 additions and 428 deletions
Download patch file Download diff file Expand all files Collapse all files

30
reanimate-0.4.1.0-inplace/Reanimate.Ease.hs.html
View file

@ -51,7 +51,7 @@ span.spaces { background: white }
<span class="lineno"> 32 </span>--
<span class="lineno"> 33 </span>-- &lt;&lt;docs/gifs/doc_constantS.gif&gt;&gt;
<span class="lineno"> 34 </span>constantS :: Double -&gt; Signal
<span class="lineno"> 35 </span><span class="decl"><span class="nottickedoff">constantS = const</span></span>
<span class="lineno"> 35 </span><span class="decl"><span class="istickedoff">constantS = const</span></span>
<span class="lineno"> 36 </span>
<span class="lineno"> 37 </span>-- | Signal with new starting and end values.
<span class="lineno"> 38 </span>--
@ -61,7 +61,7 @@ span.spaces { background: white }
<span class="lineno"> 42 </span>--
<span class="lineno"> 43 </span>-- &lt;&lt;docs/gifs/doc_fromToS.gif&gt;&gt;
<span class="lineno"> 44 </span>fromToS :: Double -&gt; Double -&gt; Signal
<span class="lineno"> 45 </span><span class="decl"><span class="nottickedoff">fromToS from to t = from + (to-from)*t</span></span>
<span class="lineno"> 45 </span><span class="decl"><span class="istickedoff">fromToS from to t = from + (to-from)*t</span></span>
<span class="lineno"> 46 </span>
<span class="lineno"> 47 </span>-- | Reverse signal order.
<span class="lineno"> 48 </span>--
@ -71,7 +71,7 @@ span.spaces { background: white }
<span class="lineno"> 52 </span>--
<span class="lineno"> 53 </span>-- &lt;&lt;docs/gifs/doc_reverseS.gif&gt;&gt;
<span class="lineno"> 54 </span>reverseS :: Signal
<span class="lineno"> 55 </span><span class="decl"><span class="nottickedoff">reverseS t = 1-t</span></span>
<span class="lineno"> 55 </span><span class="decl"><span class="istickedoff">reverseS t = 1-t</span></span>
<span class="lineno"> 56 </span>
<span class="lineno"> 57 </span>-- | S-curve signal. Takes a steepness parameter. 2 is a good default.
<span class="lineno"> 58 </span>--
@ -81,10 +81,10 @@ span.spaces { background: white }
<span class="lineno"> 62 </span>--
<span class="lineno"> 63 </span>-- &lt;&lt;docs/gifs/doc_curveS.gif&gt;&gt;
<span class="lineno"> 64 </span>curveS :: Double -&gt; Signal
<span class="lineno"> 65 </span><span class="decl"><span class="nottickedoff">curveS steepness s =</span>
<span class="lineno"> 66 </span><span class="spaces"> </span><span class="nottickedoff">if s &lt; 0.5</span>
<span class="lineno"> 67 </span><span class="spaces"> </span><span class="nottickedoff">then 0.5 * (2*s)**steepness</span>
<span class="lineno"> 68 </span><span class="spaces"> </span><span class="nottickedoff">else 1-0.5 * (2 - 2*s)**steepness</span></span>
<span class="lineno"> 65 </span><span class="decl"><span class="istickedoff">curveS steepness s =</span>
<span class="lineno"> 66 </span><span class="spaces"> </span><span class="istickedoff">if s &lt; 0.5</span>
<span class="lineno"> 67 </span><span class="spaces"> </span><span class="istickedoff">then 0.5 * (2*s)**steepness</span>
<span class="lineno"> 68 </span><span class="spaces"> </span><span class="istickedoff">else 1-0.5 * (2 - 2*s)**steepness</span></span>
<span class="lineno"> 69 </span>
<span class="lineno"> 70 </span>powerS :: Double -&gt; Signal
<span class="lineno"> 71 </span><span class="decl"><span class="nottickedoff">powerS steepness s = s**steepness</span></span>
@ -97,10 +97,10 @@ span.spaces { background: white }
<span class="lineno"> 78 </span>--
<span class="lineno"> 79 </span>-- &lt;&lt;docs/gifs/doc_oscillateS.gif&gt;&gt;
<span class="lineno"> 80 </span>oscillateS :: Signal
<span class="lineno"> 81 </span><span class="decl"><span class="nottickedoff">oscillateS t =</span>
<span class="lineno"> 82 </span><span class="spaces"> </span><span class="nottickedoff">if t &lt; 1/2</span>
<span class="lineno"> 83 </span><span class="spaces"> </span><span class="nottickedoff">then t*2</span>
<span class="lineno"> 84 </span><span class="spaces"> </span><span class="nottickedoff">else 2-t*2</span></span>
<span class="lineno"> 81 </span><span class="decl"><span class="istickedoff">oscillateS t =</span>
<span class="lineno"> 82 </span><span class="spaces"> </span><span class="istickedoff">if t &lt; 1/2</span>
<span class="lineno"> 83 </span><span class="spaces"> </span><span class="istickedoff">then t*2</span>
<span class="lineno"> 84 </span><span class="spaces"> </span><span class="istickedoff">else 2-t*2</span></span>
<span class="lineno"> 85 </span>
<span class="lineno"> 86 </span>-- | Bell-curve signal. Takes a steepness parameter. 2 is a good default.
<span class="lineno"> 87 </span>--
@ -110,7 +110,7 @@ span.spaces { background: white }
<span class="lineno"> 91 </span>--
<span class="lineno"> 92 </span>-- &lt;&lt;docs/gifs/doc_bellS.gif&gt;&gt;
<span class="lineno"> 93 </span>bellS :: Double -&gt; Signal
<span class="lineno"> 94 </span><span class="decl"><span class="nottickedoff">bellS steepness = curveS steepness . oscillateS</span></span>
<span class="lineno"> 94 </span><span class="decl"><span class="istickedoff">bellS steepness = curveS steepness . oscillateS</span></span>
<span class="lineno"> 95 </span>
<span class="lineno"> 96 </span>-- | Cubic Bezier signal. Gives you a fair amount of control over how the
<span class="lineno"> 97 </span>-- signal will 'curve'.
@ -121,9 +121,9 @@ span.spaces { background: white }
<span class="lineno"> 102 </span>--
<span class="lineno"> 103 </span>-- &lt;&lt;docs/gifs/doc_cubicBezierS.gif&gt;&gt;
<span class="lineno"> 104 </span>cubicBezierS :: (Double, Double, Double, Double) -&gt; Signal
<span class="lineno"> 105 </span><span class="decl"><span class="nottickedoff">cubicBezierS (x1, x2, x3, x4) s = </span>
<span class="lineno"> 106 </span><span class="spaces"> </span><span class="nottickedoff">let ms = 1-s</span>
<span class="lineno"> 107 </span><span class="spaces"> </span><span class="nottickedoff">in x1*ms^(3::Int) + 3*x2*ms^(2::Int)*s + 3*x3*ms*s^(2::Int) + x4*s^(3::Int)</span></span>
<span class="lineno"> 105 </span><span class="decl"><span class="istickedoff">cubicBezierS (x1, x2, x3, x4) s = </span>
<span class="lineno"> 106 </span><span class="spaces"> </span><span class="istickedoff">let ms = 1-s</span>
<span class="lineno"> 107 </span><span class="spaces"> </span><span class="istickedoff">in x1*ms^(3::Int) + 3*x2*ms^(2::Int)*s + 3*x3*ms*s^(2::Int) + x4*s^(3::Int)</span></span>
</pre>
</body>