Module Shape.Vid

type t
val of_string : string -> t