sig
type t =
[ `Day
| `Fill_or_kill
| `Good_till_cancel
| `Good_till_date_time
| `Immediate_or_cancel ]
val __t_of_sexp__ : Sexplib.Sexp.t -> Raw_order.Time_in_force.t
val t_of_sexp : Sexplib.Sexp.t -> Raw_order.Time_in_force.t
val sexp_of_t : Raw_order.Time_in_force.t -> Sexplib.Sexp.t
val tws_of_t :
[< `Day
| `Fill_or_kill
| `Good_till_cancel
| `Good_till_date_time
| `Immediate_or_cancel ] ->
string
val t_of_tws :
string ->
[> `Day
| `Fill_or_kill
| `Good_till_cancel
| `Good_till_date_time
| `Immediate_or_cancel ]
val val_type :
[ `Day
| `Fill_or_kill
| `Good_till_cancel
| `Good_till_date_time
| `Immediate_or_cancel ] Tws_prot.Val_type.t
end