Skip to content

Instantly share code, notes, and snippets.

@evancz
Created February 27, 2014 16:11
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save evancz/9253197 to your computer and use it in GitHub Desktop.
Save evancz/9253197 to your computer and use it in GitHub Desktop.
A bunch of synced check boxes
import Graphics.Input as Input
main : Signal Element
main = lift display check.signal
check : Input.Input Bool
check = Input.input True
display : Bool -> Element
display checked =
let box = container 30 30 middle (Input.checkbox check.handle id checked) in
flow right [ box, box, box ]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment