module Order: sig .. end
type ([< Order_action.t ], [< Order_type.t ]) t
include Raw_order_intf.S
val (=) : ([< Order_action.t ] as 'a, [< Order_type.t ] as 'b) t ->
('a, 'b) t -> bool
val order_type : ([< Order_action.t ], [< Order_type.t ]) t -> Order_type.t
val quantity : ([< Order_action.t ], [< Order_type.t ]) t -> Volume.t
val buy_limit : quantity:Volume.t ->
Price.t -> ([< Order_action.t > `Buy ], [< Order_type.t > `Limit ]) t
val sell_limit : quantity:Volume.t ->
Price.t -> ([< Order_action.t > `Sell ], [< Order_type.t > `Limit ]) t
val buy_market : quantity:Volume.t ->
([< Order_action.t > `Buy ], [< Order_type.t > `Market ]) t
val sell_market : quantity:Volume.t ->
([< Order_action.t > `Sell ], [< Order_type.t > `Market ]) t
val t_of_sexp : (Sexplib.Sexp.t -> ([< Order_action.t ] as 'a)) ->
(Sexplib.Sexp.t -> ([< Order_type.t ] as 'b)) ->
Sexplib.Sexp.t -> ('a, 'b) t
val sexp_of_t : (([< Order_action.t ] as 'a) -> Sexplib.Sexp.t) ->
(([< Order_type.t ] as 'b) -> Sexplib.Sexp.t) ->
('a, 'b) t -> Sexplib.Sexp.t