*operation* void find_set(Vertex_selector *&r,DemIdent* set_name)
  *traverse*
    *from* Class_set_def_Amplist *to-stop* Class_set_def
  *wrapper* Class_set_def
    *prefix*
    (@
       if (this->get_class_set_name()->get_name()->g_equal(set_name))
         r = this->get_class_set();
    @)