sig
  type ws
  val make : k:int -> nbreak:int -> Gsl_bspline.ws
  external ncoeffs : Gsl_bspline.ws -> int = "ml_gsl_bspline_ncoeffs"
    "noalloc"
  external knots : [< Gsl_vectmat.vec ] -> Gsl_bspline.ws -> unit
    = "ml_gsl_bspline_knots"
  external knots_uniform : a:float -> b:float -> Gsl_bspline.ws -> unit
    = "ml_gsl_bspline_knots_uniform"
  external _eval : float -> [< Gsl_vectmat.vec ] -> Gsl_bspline.ws -> unit
    = "ml_gsl_bspline_eval"
  val eval : Gsl_bspline.ws -> float -> [> Gsl_vectmat.vec ]
end