Sidebar layout

Get the code

import Css
import Html.Styled as Html exposing (Html)
import Html.Styled.Attributes as Html


sidebar : Html msg
sidebar =
    Html.div
        [ Html.css
            [ Css.displayFlex ]
        ]
        [ Html.aside
            [ Html.css
                [ Css.width <| Css.pct 30 ]
            ]
            []
        , Html.main_
            [ Html.css
                [ Css.flex <| Css.int 1
                , Css.overflow Css.auto
                ]
            ]
            []
        ]