Source file cards_style__generated.ml

include struct
  let () =
    Inline_css.Private.append
      {|
/* _none_ */

@layer kado.card{
 *.container_hash_2bed732cc1 {
  border-radius:3px;
  background:var(--bg_hash_2bed732cc1);
  color:var(--fg_hash_2bed732cc1);
  position:relative
 }
 
 *.fieldset_container_hash_2bed732cc1 {
  padding:0 0.5em 0.25em 0.5em;
  border:1px solid var(--border_hash_2bed732cc1)
 }
 
 *.fieldset_container_hash_2bed732cc1>legend {
  line-height:1em
 }
 
 *.title-text_hash_2bed732cc1 {
  font-weight:bold;
  font-size:0.8em;
  padding:0 0.5em;
  min-height:1em
 }
 
 *:not(.card_legend_hash_2bed732cc1).title-text_hash_2bed732cc1 {
  color:var(--title-fg_hash_2bed732cc1)
 }
 
 *.card_legend_hash_2bed732cc1.title-text_hash_2bed732cc1 {
  color:var(--contrasting-fg-intent-color_hash_2bed732cc1)
 }
 
 *:not(.card_legend_hash_2bed732cc1).title-bar_hash_2bed732cc1 {
  background:var(--title-bg_hash_2bed732cc1);
  border:2px solid var(--title-border_hash_2bed732cc1);
  border-top-left-radius:3px;
  border-top-right-radius:3px
 }
 
 *.content_prominent_hash_2bed732cc1 {
  padding:0.25em 0.5em;
  border-bottom-left-radius:3px;
  border-bottom-right-radius:3px;
  border:1px solid var(--border_hash_2bed732cc1)
 }
 
 *.content_prominent_hash_2bed732cc1.no-title_hash_2bed732cc1 {
  border-top-left-radius:3px;
  border-top-right-radius:3px
 }
 
 *.content_prominent_hash_2bed732cc1.yes-title_hash_2bed732cc1 {
  border-top:0
 }
 
}|}
  [@@@ocaml.warning "-32"]
  let (__type_info_for_ppx_css :
    ?rewrite:(string * string) list ->
      ?dont_hash:string list ->
        ?dont_hash_prefixes:string list -> string -> unit)
    =
    fun ?rewrite:_ ->
      fun ?dont_hash:_ -> fun ?dont_hash_prefixes:_ -> fun _ -> ()
  module type S  =
    sig
      module Variables :
      sig
        val set :
          ?bg:string ->
            ?border:string ->
              ?contrasting_fg_intent_color:string ->
                ?fg:string ->
                  ?title_bg:string ->
                    ?title_border:string ->
                      ?title_fg:string -> unit -> Virtual_dom.Vdom.Attr.t
        val set_all :
          bg:string ->
            border:string ->
              contrasting_fg_intent_color:string ->
                fg:string ->
                  title_bg:string ->
                    title_border:string ->
                      title_fg:string -> Virtual_dom.Vdom.Attr.t
      end
      module For_referencing :
      sig
        val bg : string
        val border : string
        val card_legend : string
        val container : string
        val content_prominent : string
        val contrasting_fg_intent_color : string
        val fg : string
        val fieldset_container : string
        val no_title : string
        val title_bar : string
        val title_bg : string
        val title_border : string
        val title_fg : string
        val title_text : string
        val yes_title : string
      end
      val card_legend : Virtual_dom.Vdom.Attr.t
      val container : Virtual_dom.Vdom.Attr.t
      val content_prominent : Virtual_dom.Vdom.Attr.t
      val fieldset_container : Virtual_dom.Vdom.Attr.t
      val no_title : Virtual_dom.Vdom.Attr.t
      val title_bar : Virtual_dom.Vdom.Attr.t
      val title_text : Virtual_dom.Vdom.Attr.t
      val yes_title : Virtual_dom.Vdom.Attr.t
    end
  type t = (module S)
  module Default : S =
    struct
      module Variables =
        struct
          let ppx_css_variable_set__003_ ?bg  ?border 
            ?contrasting_fg_intent_color  ?fg  ?title_bg  ?title_border 
            ?title_fg  () =
            let ppx_css_acc__001_ = [] in
            let ppx_css_acc__001_ =
              match bg with
              | None -> ppx_css_acc__001_
              | Some ppx_css_value__002_ ->
                  ({|--bg_hash_2bed732cc1|}, ppx_css_value__002_) ::
                  ppx_css_acc__001_ in
            let ppx_css_acc__001_ =
              match border with
              | None -> ppx_css_acc__001_
              | Some ppx_css_value__002_ ->
                  ({|--border_hash_2bed732cc1|}, ppx_css_value__002_) ::
                  ppx_css_acc__001_ in
            let ppx_css_acc__001_ =
              match contrasting_fg_intent_color with
              | None -> ppx_css_acc__001_
              | Some ppx_css_value__002_ ->
                  ({|--contrasting-fg-intent-color_hash_2bed732cc1|},
                    ppx_css_value__002_)
                  :: ppx_css_acc__001_ in
            let ppx_css_acc__001_ =
              match fg with
              | None -> ppx_css_acc__001_
              | Some ppx_css_value__002_ ->
                  ({|--fg_hash_2bed732cc1|}, ppx_css_value__002_) ::
                  ppx_css_acc__001_ in
            let ppx_css_acc__001_ =
              match title_bg with
              | None -> ppx_css_acc__001_
              | Some ppx_css_value__002_ ->
                  ({|--title-bg_hash_2bed732cc1|}, ppx_css_value__002_) ::
                  ppx_css_acc__001_ in
            let ppx_css_acc__001_ =
              match title_border with
              | None -> ppx_css_acc__001_
              | Some ppx_css_value__002_ ->
                  ({|--title-border_hash_2bed732cc1|}, ppx_css_value__002_)
                  :: ppx_css_acc__001_ in
            let ppx_css_acc__001_ =
              match title_fg with
              | None -> ppx_css_acc__001_
              | Some ppx_css_value__002_ ->
                  ({|--title-fg_hash_2bed732cc1|}, ppx_css_value__002_) ::
                  ppx_css_acc__001_ in
            Virtual_dom.Vdom.Attr.__css_vars_no_kebabs ppx_css_acc__001_
          let set = ppx_css_variable_set__003_
          let set_all ~bg  ~border  ~contrasting_fg_intent_color  ~fg 
            ~title_bg  ~title_border  ~title_fg  =
            ppx_css_variable_set__003_ () ~bg ~border
              ~contrasting_fg_intent_color ~fg ~title_bg ~title_border
              ~title_fg
        end
      module For_referencing =
        struct
          let card_legend = {|card_legend_hash_2bed732cc1|}
          let content_prominent = {|content_prominent_hash_2bed732cc1|}
          let title_bar = {|title-bar_hash_2bed732cc1|}
          let container = {|container_hash_2bed732cc1|}
          let yes_title = {|yes-title_hash_2bed732cc1|}
          let title_text = {|title-text_hash_2bed732cc1|}
          let fieldset_container = {|fieldset_container_hash_2bed732cc1|}
          let no_title = {|no-title_hash_2bed732cc1|}
          let fg = {|--fg_hash_2bed732cc1|}
          let contrasting_fg_intent_color =
            {|--contrasting-fg-intent-color_hash_2bed732cc1|}
          let bg = {|--bg_hash_2bed732cc1|}
          let title_border = {|--title-border_hash_2bed732cc1|}
          let border = {|--border_hash_2bed732cc1|}
          let title_fg = {|--title-fg_hash_2bed732cc1|}
          let title_bg = {|--title-bg_hash_2bed732cc1|}
        end
      let card_legend =
        Virtual_dom.Vdom.Attr.class_ {|card_legend_hash_2bed732cc1|}
      let content_prominent =
        Virtual_dom.Vdom.Attr.class_ {|content_prominent_hash_2bed732cc1|}
      let title_bar =
        Virtual_dom.Vdom.Attr.class_ {|title-bar_hash_2bed732cc1|}
      let container =
        Virtual_dom.Vdom.Attr.class_ {|container_hash_2bed732cc1|}
      let yes_title =
        Virtual_dom.Vdom.Attr.class_ {|yes-title_hash_2bed732cc1|}
      let title_text =
        Virtual_dom.Vdom.Attr.class_ {|title-text_hash_2bed732cc1|}
      let fieldset_container =
        Virtual_dom.Vdom.Attr.class_ {|fieldset_container_hash_2bed732cc1|}
      let no_title =
        Virtual_dom.Vdom.Attr.class_ {|no-title_hash_2bed732cc1|}
    end 
  include Default
  let default : t = (module Default) end