Вопрос по Prolog

[LLIALLIJIbIK]

Добрый день, уважаемые. В прологе ни бум-бум, срочно в течении часа нужно написать программу. "Задание: на входе имеется список. Нужно преобразовать список в дерево таким образом, чтобы в дерево попали только элементы из заданного диапазона, а затем преобразовать дерево в двоичный справочник." Кому не трудно, прошу помочь.

[hon]

У вас три выхода из этой нелепой ситуации:

1. Попросить перенести тему во фрилианс. Там за несколько $ вам сделают в лучшем виде.
2. Почитать учебники и написать программу самостоятельно. При проблемах с наработками и указанием проблемы снова обратиться на форум.
3. Ждать чуда.

[LLIALLIJIbIK]

Подскажите теперь, почему выдает false, а не строит двоичный справочник:
tree_insert(X, nil, tr(X,nil,nil)).
tree_insert(X,tr(X,L,R),tr(X,L,R)):-!.
tree_insert(X,tr(K,L,R),tr(K,L1,R)) :-X<K,!,tree_insert(X,L,L1).
tree_insert(X,tr(K,L,R),tr(K,L,R1)) :-tree_insert(X,R,R1).

list_to_tree([],empty).
list_to_tree([H|T],Tr):- H>0, H<4, T>0, T<4, list_to_tree(T,Tr1), tree_insert(H,Tr1,Tr).

[rrrFer]

да очень просто.

Тут сразу видно, что ты копипастил код с двух разных программ. Структуры данных этих программ были разными, поэтому fail )