sig
  type t = [ `Buy | `Sell | `Sell_short ]
  val of_string : string -> t
  val to_string : t -> string
  val tws_of_t : t -> Tws_prot.raw_tws
  val t_of_tws : Tws_prot.raw_tws -> t
  val val_type : t Tws_prot.Val_type.t
  val t_of_sexp : Sexplib.Sexp.t -> Order_action.t
  val __t_of_sexp__ : Sexplib.Sexp.t -> Order_action.t
  val sexp_of_t : Order_action.t -> Sexplib.Sexp.t
end