| Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > Prolog > Является ли дерево поддеревом другого дерева |
| Автор: troika 7.12.2009, 15:10 |
| Подскажите пожалуйста как в прологе можно определить, является ли дерево Т1 поддеревом дерева Т. Я пользуюсь VIP 5.2. Спасибо |
| Автор: troika 9.12.2009, 21:57 |
| Уже нашел. Вот, может кому-нибудь пригодится DOMAINS tree=tr(integer,tree,tree);e PREDICATES check(tree,tree) GOAL check(tr(5,tr(7,tr(9,e,e),tr(8,e,e)),tr(6,e,tr(4,tr(3,e,e),tr(1,e,e)))), tr(4,tr(3,e,e),tr(1,e,e))). CLAUSES check(X,X):-!. check(tr(_,Left,Right),Tree):-check(Left,Tree);check(Right,Tree). |