scratch/habit-screens/client/src/Main.elm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27

module Main exposing (main)

import Browser
import Habits
import Html exposing (..)
import State


subscriptions : State.Model -> Sub State.Msg
subscriptions model =
    Sub.none


view : State.Model -> Html State.Msg
view model =
    case model.view of
        State.Habits ->
            Habits.render model


main =
    Browser.element
        { init = \() -> State.init
        , subscriptions = subscriptions
        , update = State.update
        , view = view
        }