sig
  type t = [ `Close | `Open ]
  val __t_of_sexp__ : Sexplib.Sexp.t -> Raw_order.Open_close.t
  val t_of_sexp : Sexplib.Sexp.t -> Raw_order.Open_close.t
  val sexp_of_t : Raw_order.Open_close.t -> Sexplib.Sexp.t
  val tws_of_t : [< `Close | `Open ] -> string
  val t_of_tws : string -> [> `Close | `Open ]
  val val_type : [ `Close | `Open ] Tws_prot.Val_type.t
end