(.using
  [library
   [lux "*"
    [data
     [text
      ["%" format {"+" format}]]]
    [type
     abstract]]]
  ["[0]" // "_"
   ["[1][0]" value {"+" Value}]
   ["[1][0]" property {"+" Property}]])

(abstract: .public Style
  Text

  (def: .public empty
    Style
    (:abstraction ""))

  (def: .public separator
    " ")

  (def: .public (with [property value])
    (All (_ brand)
      (-> [(Property brand) (Value brand)]
          (-> Style Style)))
    (|>> :representation
         (format (//property.name property) ": " (//value.value value) ";" ..separator)
         :abstraction))

  (def: .public inline
    (-> Style Text)
    (|>> :representation))
  )
