fixed fade jump, and fixed match in subtract
This commit is contained in:
@@ -6,8 +6,8 @@
|
||||
(fn ^double [^double t ^double start ^double delta ^double duration]
|
||||
(let [pct-done (/ t duration)
|
||||
pct-done (Math/pow pct-done power)]
|
||||
(+ start
|
||||
(* delta pct-done)))))
|
||||
(+ start
|
||||
(* delta pct-done)))))
|
||||
|
||||
(def ease-linear (ease-in-expo-maker 1.0))
|
||||
(def ease-in-quadratic (ease-in-expo-maker 2.0))
|
||||
@@ -42,9 +42,9 @@
|
||||
|
||||
(defn ease-out-quadratic ^double [^double t ^double start ^double delta ^double duration]
|
||||
(let [t (/ t duration)]
|
||||
(unchecked-add (-> (unchecked-subtract 1 delta)
|
||||
(unchecked-add (-> (unchecked-subtract 0.0 delta)
|
||||
(unchecked-multiply t)
|
||||
(unchecked-multiply (unchecked-subtract t 2)))
|
||||
(unchecked-multiply (unchecked-subtract t 2.0)))
|
||||
start)))
|
||||
|
||||
(defn ease-out-cubic ^double [^double t ^double start ^double delta ^double duration]
|
||||
|
||||
Reference in New Issue
Block a user