Source file app__generated.ml

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

@layer kado.app{
 *.app_hash_c8a4d2a5dd.set-min-height-to-100vh_hash_c8a4d2a5dd {
  min-height:100vh
 }
 
 *.app_hash_c8a4d2a5dd.dark_hash_c8a4d2a5dd {
  color-scheme:dark;
  background:var(--bg_hash_c8a4d2a5dd,#1a1d21)
 }
 
 *.app_hash_c8a4d2a5dd.light_hash_c8a4d2a5dd {
  color-scheme:light;
  background:var(--bg_hash_c8a4d2a5dd,#e5e2de)
 }
 
}|}
  [@@@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 -> unit -> Virtual_dom.Vdom.Attr.t
        val set_all : bg:string -> Virtual_dom.Vdom.Attr.t
      end
      module For_referencing :
      sig
        val app : string
        val bg : string
        val dark : string
        val light : string
        val set_min_height_to_100vh : string
      end
      val app : Virtual_dom.Vdom.Attr.t
      val dark : Virtual_dom.Vdom.Attr.t
      val light : Virtual_dom.Vdom.Attr.t
      val set_min_height_to_100vh : Virtual_dom.Vdom.Attr.t
    end
  type t = (module S)
  module Default : S =
    struct
      module Variables =
        struct
          let ppx_css_variable_set__003_ ?bg  () =
            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_c8a4d2a5dd|}, 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  = ppx_css_variable_set__003_ () ~bg
        end
      module For_referencing =
        struct
          let light = {|light_hash_c8a4d2a5dd|}
          let app = {|app_hash_c8a4d2a5dd|}
          let dark = {|dark_hash_c8a4d2a5dd|}
          let set_min_height_to_100vh =
            {|set-min-height-to-100vh_hash_c8a4d2a5dd|}
          let bg = {|--bg_hash_c8a4d2a5dd|}
        end
      let light = Virtual_dom.Vdom.Attr.class_ {|light_hash_c8a4d2a5dd|}
      let app = Virtual_dom.Vdom.Attr.class_ {|app_hash_c8a4d2a5dd|}
      let dark = Virtual_dom.Vdom.Attr.class_ {|dark_hash_c8a4d2a5dd|}
      let set_min_height_to_100vh =
        Virtual_dom.Vdom.Attr.class_
          {|set-min-height-to-100vh_hash_c8a4d2a5dd|}
    end 
  include Default
  let default : t = (module Default) end