sig
  type t
  val get_svm_type :
    Libsvm.Svm.Model.t ->
    [ `C_SVC | `EPSILON_SVR | `NU_SVC | `NU_SVR | `ONE_CLASS ]
  val get_n_classes : Libsvm.Svm.Model.t -> int
  val get_labels : Libsvm.Svm.Model.t -> int list
  val get_n_sv : Libsvm.Svm.Model.t -> int
  val get_svr_probability : Libsvm.Svm.Model.t -> float
  val save : Libsvm.Svm.Model.t -> string -> unit
  val load : string -> Libsvm.Svm.Model.t
end