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 }
type alias Model =
{ name : String, age : Int }
model : Model
model =
{ name = "Sam", age = 23 }
type Msg
= Noop
update : Msg -> Model -> Model
update msg model =
model
view : Model -> 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