Module Std_internal.Security_id

module Security_id: Security_id

module Type: sig .. end

module Id: sig .. end

type t = [ `CUSIP of Id.t
       | `ISIN of Id.t
       | `RIC of Id.t
       | `SEDOL of Id.t ] 

include Stringable.S

val isin : Id.t -> t

val ric : Id.t -> t

val cusip : Id.t -> t

val sedol : Id.t -> t

val sec_id_type : t -> Type.t

val sec_id : t -> Id.t

val t_of_sexp : Sexplib.Sexp.t -> t

val __t_of_sexp__ : Sexplib.Sexp.t -> t

val sexp_of_t : t -> Sexplib.Sexp.t