2017-06-25 04:45:03 +00:00
|
|
|
module Subscriptions exposing (..)
|
|
|
|
|
|
|
|
import AnimationFrame exposing (times, diffs)
|
2017-06-28 16:09:20 +00:00
|
|
|
import Types exposing (Model, Msg(Tick, Tock, Press))
|
|
|
|
import Keyboard exposing (downs)
|
2017-06-25 04:45:03 +00:00
|
|
|
|
|
|
|
|
|
|
|
subscriptions : Model -> Sub Msg
|
|
|
|
subscriptions model =
|
|
|
|
Sub.batch
|
|
|
|
[ times Tick
|
|
|
|
, diffs Tock
|
2017-06-28 16:09:20 +00:00
|
|
|
, downs Press
|
2017-06-25 04:45:03 +00:00
|
|
|
]
|