Introduction to elm-mdl - 4

Main.elm

view : Model -> Html Msg
view model =
    Layout.render Mdl
        model.mdl
        [ Layout.fixedHeader
        ]
        { header = [ h1 [ style [ ( "padding", "2rem" ) ] ] [ text "Counter" ] ]
        , drawer = []
        , tabs = ( [ text "Milk", text "Oranges" ], [] )
        , main = [ viewBody model ]
        }