Программирование на языке Пролог для искусственного интеллекта


         

Нет преемников



                            Преемники),   !,

                преемспис( G, Преемники, ДД),

                опт_f( ДД, F1),

                расширить( П, д( В, F1/G, ДД), Предел, Дер1,

                                                                    ЕстьРеш, Реш);

            ЕстьРеш = никогда).

                % Нет преемников - тупик

        расширить( П, д( В, F/G, [Д | ДД]), Предел, Дер1,

                                                                  ЕстьРеш, Реш):-

                F <= Предел,

                опт_f( ДД, OF), мин( Предел, OF, Предел1),

                расширить( [В | П], Д, Предел1, Д1, ЕстьРеш1, Реш),

Содержание  Назад  Вперед





Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий