let divStyle = do
        flexGrow 1
        display flex
        flexDirection column
        paddingAll (px 7)
        height (pct 100)
    elStyle "div" divStyle $ do
        el "h3" $ text_ desc
        el "h4" $ text_ extraInfo