*operation* void find_pde(Propagation_directive_exp *& r,DemIdent *inst_name)
  *traverse*
    *from* Dir_meta_def_Amplist *to* Dir_meta_def
  *wrapper* Dir_meta_def
    *prefix*
    (@
      if (this->get_dir_name()->get_name()->g_equal(inst_name))
      r = this->get_pde();
    @)