sig
  type t = Ocamlodbc.sql_column_type
  val string : Ocamlodbc.sql_column_type -> string
end