Stub file for Elm projects

Main.elm

module Main exposing (main)

import Html exposing (..)


-- MODEL

type alias Model =
  {
  }


initializeModel : Model
initializeModel =
  Model


-- UPDATE


type Msg
  = Initialize


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


-- SUBSCRIPTIONS


subscriptions : Model -> Sub Msg
subscriptions model =
  Sub.batch
    []


-- VIEW


view : Model -> Html Msg
view model =
  div [] []


-- ENTRY POINT


main : Program Never Model Msg
main =
  Html.program
    { init = initializeApp
    , subscriptions = subscriptions
    , update = update
    , view = view
    }


initializeApp : (Model, Cmd Msg)
initializeApp =
  ( initializeModel
  , Cmd.none
  )