passwordUpdateView :: View Html -> Html
passwordUpdateView v = do
    H.legend "Password:"
    bootstrapFormFieldPassword "password" "Password:" v
    bootstrapFormFieldPassword "password-check" "Password Check:" v
passwordUpdateView :: View Html -> Html
passwordUpdateView v = do
    H.legend "Password:"
    bootstrapFormFieldPassword "password" "Password:" v
    bootstrapFormFieldPassword "password-check" "Password Check:" v
passwordUpdateView v = do
    H.legend "Password:"
    bootstrapFormFieldPassword "password" "Password:" v
    bootstrapFormFieldPassword "password-check" "Password Check:" v