In Clay: https://github.com/sebastiaanvisser/clay/blob/54dc9eaf0abd180ef9e35d97313062d99a02ee75/src/Clay/Transition.hs#L47 I'm going to replace `TimingFunction` newtype with the `data TimingFunction = Ease | EaseIn ...`