Browser_draw (elm_playground.Browser

type drawn = (float * float * Playground.shape) list

val frame : 
  ?t:float ->
  Playground.color ->
  float ->
  float ->
  float ->
  float ->
  Playground.shape

val raised : float -> float -> float -> float -> Playground.shape list

val sunken : float -> float -> float -> float -> Playground.shape list

val glyphs : 
  ?visited:(string -> bool) ->
  ?picture_of:(string -> Browser_picture.t option) ->
  Html_layout.fragment ->
  Playground.shape list

val draw : 
  ?extensions:bool ->
  visited:(string -> bool) ->
  picture_of:(string -> Browser_picture.t option) ->
  Html_layout.box ->
  drawn

val control_shapes : 
  value:(Dom.element -> Forms.value) ->
  focused:bool ->
  Html_layout.fragment ->
  Html_layout.control ->
  Playground.shape list

val controls_drawn : 
  value:(Dom.element -> Forms.value) ->
  focus:Dom.element option ->
  Html_layout.box ->
  drawn

val outlines : Html_layout.box -> drawn