Module Froc_dom_anim

module Froc_dom_anim: sig .. end

type color 

type point = float * float 

type shape = Dom.canvasRenderingContext2D -> unit 

val color : ?a:int -> int -> int -> int -> color

val disk : point -> float -> color -> shape

val filled_poly : point list -> color -> shape

val attach : Dom.canvas -> shape list Froc.behavior -> unit