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