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


         

Переход через верхнюю


        дост_хор( _, Альфа, Бета, Поз, Оц, Поз, Оц) :-

                ход_мина( Поз), Оц > Бета,  !;


                                                % Переход через верхнюю границу

                ход_макса( Поз), Оц < Альфа,  !.

                                                % Переход через нижнюю границу

        дост_хор( СписПоз, Альфа, Бета, Поз, Оц, ХорПоз, ХорОц) :-

                нов_границы( Альфа, Бета, Поз, Оц, НовАльфа, НовБета),


                                                % Уточнить границы

                прибл_лучш( СписПоз, НовАльфа, НовБета, Поз1, Оц1),

                выбор( Поз, Оц, Поз1, Оц1, ХорПоз, ХорОц).


        нов_границы( Альфа, Бета, Поз, Оц, Оц, Бета) :-

                ход_мина( Поз), Оц > Альфа,  !.


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