module Main exposing (..)

import Html exposing (Html, body, div, button, text)
import Html.Attributes exposing (attribute, class)
import Counter
import Data exposing (Model)

main : Program Never Model Msg
main =
    Html.beginnerProgram { model = model, view = view, update = update }

model : Model
model = { counter = 10 }

type Msg = Counter.Msg | Int

update : Msg -> Model -> Model
update msg model =
    case msg of
        Counter.Msg ->
            Counter.update msg model


view : Model -> Html Msg
view model =
    body [ attribute "id" "main" ] [ Counter.view "Counter" model ]