sig
  type t = Math.vector * Math.vector * Math.vector * Math.vector
  val create :
    Math.vector -> Math.vector -> Math.vector -> Math.vector -> Bezier.t
  val anchor1 : Bezier.t -> Math.vector
  val control1 : Bezier.t -> Math.vector
  val control2 : Bezier.t -> Math.vector
  val anchor2 : Bezier.t -> Math.vector
  val interpolate : Bezier.t -> float -> Math.vector
  val tangent : Bezier.t -> float -> Math.vector
end