MultiWayIf.1.hs

{-# LANGUAGE MultiWayIf #-}


instance Animatable Double where
    interpolate ease from to t =
        if | t <= 0 -> from
           | t >= 1 -> to
           | otherwise -> from + easeDouble ease t * (to - from)
    animAdd = (+)
    animSub = (-)
    animZero = 0