Richard Lawrence wyleyr

## keybase.md

      
              1 file
            
          
              0 forks
            
          
              0 comments
            
          
              0 stars
            
          
                wyleyr
                / keybase.md
            
            
              Created
              February 4, 2019 10:53
            
              
                Keybase proof
              
          
    Keybase proof

I hereby claim:

I am wyleyr on github.
I am wyleyr (https://keybase.io/wyleyr) on keybase.
I have a public key ASCOo-urQKDg28XpRYrJ6ke7JAh3rcYwK5edR4X6yzjj5go

To claim this, I am signing this object:

  
## Boxes.elm
import Graphics.Input (Input, input, button, clickable)
import Graphics.Input.Field (Field, field, Content, noContent, Selection, Forward, defaultStyle)

-- State representation
data State = State Int [Box]

data Event = NewID Int | NewBox Bool | NewContent Content

-- Box type, constructor and accessors
data Box = Box Int String
	import Graphics.Input (Input, input, button, clickable)
	import Graphics.Input.Field (Field, field, Content, noContent, Selection, Forward, defaultStyle)

	-- State representation
	data State = State Int [Box]

	data Event = NewID Int \| NewBox Bool \| NewContent Content

	-- Box type, constructor and accessors
	data Box = Box Int String