sig
type t = [ `Beta | `Delta | `Fx | `Pair ]
val __t_of_sexp__ : Sexplib.Sexp.t -> Raw_order.Hedge_type.t
val t_of_sexp : Sexplib.Sexp.t -> Raw_order.Hedge_type.t
val sexp_of_t : Raw_order.Hedge_type.t -> Sexplib.Sexp.t
val tws_of_t : [< `Beta | `Delta | `Fx | `Pair ] -> string
val t_of_tws : string -> [> `Beta | `Delta | `Fx | `Pair ]
val val_type : [ `Beta | `Delta | `Fx | `Pair ] Tws_prot.Val_type.t
end