module Flags exposing (..)

import Browser
import Browser.Navigation
import Html exposing (p, text)
import Url


main : Program Int Int Msg
main =
    Browser.application
        { init = init
        , view = view
        , update = update
        , subscriptions = \_ -> Sub.none
        , onUrlRequest = \_ -> NoOp
        , onUrlChange = \_ -> NoOp
        }


init : Int -> Url.Url -> Browser.Navigation.Key -> ( Int, Cmd Msg )
init flags url key =
    ( flags, Cmd.none )


view : Int -> Browser.Document msg
view model =
    Browser.Document "Hi" [ p [] [ text (String.fromInt model) ] ]


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


type Msg
    = NoOp