view : List (Attribute msg) -> { value : Color, onInput : Color -> msg } -> Html msg
viewReadOnly : List (Attribute msg) -> Color -> Html msg
disabled : Basics.Bool -> Attribute msg
readOnly : Basics.Bool -> Attribute msg
htmlAttrs : List (Html.Attribute msg) -> Attribute msg
noAttr : Attribute msg