let get_class_type_of_attribute doc_modules name = let father = Odoc_info.Name.father name in get_class_type doc_modules father