beginnerProgram boilerplate

Main.elm

module Main exposing (..)

import Html exposing (..)
import Html.Attributes exposing (..)
import Html.Events exposing (..)

type alias Model = Int

type Msg = NoOp

update : Msg -> Model -> Model
update msg model =
    1

view : Model -> Html Msg
view model =
    text "boilerplate!"

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

module Main exposing (..)

import Html exposing (..)
import Html.Attributes exposing (..)
import Html.Events exposing (..)


type alias Model =
    Int


type Msg
    = NoOp


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


view : Model -> Html Msg
view model =
    text "boilerplate!"


main =
    program
        { update = update
        , view = view
        , init = ( 1, Cmd.none )
        , subscriptions = always Sub.none
        }