Базовая программа для решения головоломок следующая.
solve_puzle(puzle(Qeys,Questions,Solve),Solve):-
solve(Qeys),
solve(Questions).
solve([Qey|Qeys]):-
Qey,solve(Qeys).
solve([]).
Вычислению подлежит отношение solve_puzle(Puzle,Solve), где Solve является решением головоломки Puzle. Головоломка представляется структурой puzle(Qeys,Questions,Solve), где структура данных, подлежащая конкретизации, представляется ключами и вопросами, а получаемые значения определяются аргументом Solve.
Программа solve_puzle тривиальна. Все, что она делает, состоит в последовательном решении каждого ключа и вопроса, которые представляются как цели Пролога и выполняются с использованием метапеременных.
Опубликовал vovan666
May 27 2013 04:51:55 ·
0 Комментариев ·
4250 Прочтений ·
• Не нашли ответ на свой вопрос? Тогда задайте вопрос в комментариях или на форуме! •
Комментарии
Нет комментариев.
Добавить комментарий
Рейтинги
Рейтинг доступен только для пользователей.
Пожалуйста, залогиньтесь или зарегистрируйтесь для голосования.
Нет данных для оценки.
Гость
Вы не зарегистрированны? Нажмите здесь для регистрации.
Главная
Каталог файлов
