blob: 79b94b3f52f786b84662c2ca36f0b8fd6a15e6e7 (
plain)
| 1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 | module Design.Appearing
  ( design
  ) where
import           Clay
design :: Css
design = do
  appearKeyframe
  ".g-Appearing" ? do
    appearAnimation
appearAnimation :: Css
appearAnimation = do
  animationName "appear"
  animationDuration (sec 0.2)
  animationTimingFunction easeIn
appearKeyframe :: Css
appearKeyframe = keyframes
  "appear"
  [ (0, "opacity" -: "0")
  ]
 |