Module Std_internal.Contract_data

module Contract_data: Response.Contract_data

type t = private {
   contract : Raw_contract.t;
   market_name : string;
   trading_class : string;
   min_tick : float;
   order_types : string list;
   valid_exchanges : Exchange.t list;
   price_magnifier : int;
   underlying_id : int;
   long_name : string;
   contract_month : string;
   industry : string;
   category : string;
   subcategory : string;
   time_zone : Core.Std.Time.Zone.t option;
   trading_hours : Trading_times.t list;
   liquid_hours : Trading_times.t list;
}
val liquid_hours : t -> Trading_times.t list
val trading_hours : t -> Trading_times.t list
val time_zone : t -> Core.Std.Time.Zone.t option
val subcategory : t -> string
val category : t -> string
val industry : t -> string
val contract_month : t -> string
val long_name : t -> string
val underlying_id : t -> int
val price_magnifier : t -> int
val valid_exchanges : t -> Exchange.t list
val order_types : t -> string list
val min_tick : t -> float
val trading_class : t -> string
val market_name : t -> string
val contract : t -> [< Security_type.t ] Contract.t
module Fields: sig .. end
include Response_intf.S
val create : contract:[< Security_type.t ] Contract.t ->
market_name:string ->
trading_class:string ->
min_tick:float ->
order_types:string list ->
valid_exchanges:Exchange.t list ->
price_magnifier:int ->
underlying_id:int ->
long_name:string ->
contract_month:string ->
industry:string ->
category:string ->
subcategory:string ->
time_zone:Core.Std.Time.Zone.t ->
trading_hours:Trading_times.t list ->
liquid_hours:Trading_times.t list -> t
val contract : t -> [< Security_type.t ] Contract.t
val regular_trading_times : t -> Trading_times.t
val extended_trading_times : t -> Trading_times.t
val t_of_sexp : Sexplib.Sexp.t -> t
val sexp_of_t : t -> Sexplib.Sexp.t