app-first-test.elm

module App exposing
  ( Model
  , defaultModel
  , view
  , update
  )

import Html exposing (Html)
import Html.Attributes as Attr

type Msg
  = Msg
  
type alias Model =
  { items : List String
  }

defaultModel : Model
defaultModel =
  { items = []
  }

view : Model -> Html Msg
view model =
  Html.div []
    [ Html.ul [ Attr.id "items" ] []
    ]

update : Msg -> Model -> ( Model, Cmd Msg )
update msg model =
  (model, Cmd.none)