elmman/src/Subscriptions.elm

15 lines
314 B
Elm

module Subscriptions exposing (..)
import AnimationFrame exposing (times, diffs)
import Types exposing (Model, Msg(Tick, Tock, Press))
import Keyboard exposing (downs)
subscriptions : Model -> Sub Msg
subscriptions model =
Sub.batch
[ times Tick
, diffs Tock
, downs Press
]