sig
  type t = [ `Customer | `Firm ]
  val __t_of_sexp__ : Sexplib.Sexp.t -> Raw_order.Origin.t
  val t_of_sexp : Sexplib.Sexp.t -> Raw_order.Origin.t
  val sexp_of_t : Raw_order.Origin.t -> Sexplib.Sexp.t
  val tws_of_t : [< `Customer | `Firm ] -> string
  val t_of_tws : string -> [> `Customer | `Firm ]
  val val_type : [ `Customer | `Firm ] Tws_prot.Val_type.t
end