sig
  val attribute_types : (Netdn.oid * string * string list) list
  val lookup_attribute_type_by_oid : Netdn.oid -> string * string list
  val lookup_attribute_type_by_name :
    string -> Netdn.oid * string * string list
end