sig
type t = [ `Away | `Default | `IB | `Post_trade_allocation ]
val __t_of_sexp__ : Sexplib.Sexp.t -> Raw_order.Clearing_intent.t
val t_of_sexp : Sexplib.Sexp.t -> Raw_order.Clearing_intent.t
val sexp_of_t : Raw_order.Clearing_intent.t -> Sexplib.Sexp.t
val tws_of_t :
[< `Away | `Default | `IB | `Post_trade_allocation ] -> string
val t_of_tws :
string -> [> `Away | `Default | `IB | `Post_trade_allocation ]
val val_type :
[ `Away | `Default | `IB | `Post_trade_allocation ] Tws_prot.Val_type.t
end