Drawer navigation

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


drawer : Html msg
drawer =
    Html.div
        [ Html.css
            [ Css.width <| Css.pct 100
            , Css.height <| Css.pct 100
            , Css.position Css.fixed
            , Css.left Css.zero
            , Css.top Css.zero
            , Css.zIndex <| Css.int 9999
            ]
        [ Html.div
            [ Html.css
                [ Css.width <| Css.pct 100
                , Css.height <| Css.pct 100
                , Css.position Css.fixed
                , Css.left Css.zero
                , Css.top Css.zero
                , Css.zIndex <| Css.int -1
                , Css.backgroundColor <| Css.rgba 0 0 0 0.5
                ]
            []
        , Html.div
            [ Html.css
                [ Css.width <| Css.px 200
                , Css.height <| Css.pct 100
                , Css.position Css.fixed
                , Css.left Css.zero
                , Css.top Css.zero
                , Css.backgroundColor <| Css.hex "FFFFFF"
                ]
            ]
            []
        ]