Create a gist now

Instantly share code, notes, and snippets.

What would you like to do?
module Main exposing (..)
import Html exposing (..)
import Html.Attributes exposing (..)
import Html.Events exposing (..)
main =
Html.beginnerProgram { model = model, view = view, update = update }
model : { name : String, age : Int }
model =
{ name = "Sam", age = 23 }
type Msg
= Noop
update : Msg -> { name : String, age : Int } -> { name : String, age : Int }
update msg model =
model
view : { name : String, age : Int } -> Html Msg
view model =
div [] [ text (toString model) ]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment