sig
  val wrap_contract_spec :
    ((((((((((((((([> `Args ] * Contract_id.t option) * Symbol.t) * string) *
                Core.Std.Date.t option) *
               Price.t option) *
              Option_right.t option) *
             int option) *
            Exchange.t) *
           Exchange.t option) *
          Currency.t) *
         Symbol.t option) *
        bool) *
       Security_id.Type.t option) *
      Security_id.Id.t option) *
     int)
    Tws_prot.Pickler.Spec.t -> Raw_contract.t Tws_prot.Pickler.Spec.t
  val market_data_query : unit -> Raw_contract.t Tws_prot.Pickler.Spec.t
  val common_option_calc : unit -> Raw_contract.t Tws_prot.Pickler.Spec.t
  val contract_details_query : unit -> Raw_contract.t Tws_prot.Pickler.Spec.t
  val market_depth_query : unit -> Raw_contract.t Tws_prot.Pickler.Spec.t
  val history_query : unit -> Raw_contract.t Tws_prot.Pickler.Spec.t
  val realtime_bars_query : unit -> Raw_contract.t Tws_prot.Pickler.Spec.t
  val position_response : unit -> Raw_contract.t Tws_prot.Pickler.Spec.t
  val execution_response : unit -> Raw_contract.t Tws_prot.Pickler.Spec.t
end