import Browser
import Html exposing (Html, div, text)
main =
Browser.element
{ init = init
, view = view
, update = update
, subscriptions = subscriptions
}
type alias Model = String
type Msg
= None
init : () -> (Model, Cmd Msg)
init _ =
("It's working", Cmd.none)
update : Msg -> Model -> (Model, Cmd Msg)
update msg model =
case msg of
None ->
(model, Cmd.none)
subscriptions : Model -> Sub Msg
subscriptions model =
Sub.none
view : Model -> Html Msg
view model =
div [] [ text model ]