Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
import Graphics.Element exposing (..)
import Mouse
clickCount : Signal Int
clickCount =
Signal.foldp (\click total -> total + 1) 0 Mouse.clicks
main : Signal Element
main = Signal.map show clickCount
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.