Поиск:

Ответ в темуСоздание новой темы Создание опроса
> как объединить 2 списка и отсортировать 
:(
    Опции темы
rang3r
Дата 27.3.2010, 14:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 61
Регистрация: 2.4.2009

Репутация: нет
Всего: нет



Доброго всем времени суток, столкнулся с такой проблемой необходимо соединить 2 списка, и отсортировать получившийся список. написал несколько предикатов для сортировки, но не могу передать в него предикат который делает объединение 2 списков.
Код

   domains 
 ilist=integer*
predicates
 insort(ilist,ilist).
 order(integer,integer).
 insortx(integer,ilist,ilist).
 append(ilist,ilist,ilist).
 clauses 
 insort([], []).

    insort([X|L], M) :- insort(L, N), insortx(X, N, M).

    insortx(X, [A|L], [A|M]) :- order(A, X), !, insortx(X, L, M).

    insortx(X, L, [X|L]).

    order(X, Y) :- X <= Y.
append([], L, L). 
append([X|L1], L2, [X|L3]):- append(L1, L2, L3).    
 
так вот вопрос, как изменить предикат insort(), так что бы, в него подавались 2 списка, а он их объединял и сортировал .
PM MAIL Skype   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума Prolog
Void
  • Пожалуйста, создавайте темы с содержательными названиями.
  • Уважаемые учащиеся, здесь всегда рады помочь Вам, но не делать за Вас вашу работу. У вас гораздо больше шансов получить помощь, если Вы приложите усилия и поделитесь с нами проблемами и результатами. В противном случае добро пожаловать в раздел Центр Помощи.
  • Получив ответ на интересующий Вас вопрос, не забудьте пометить его как решённый.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Void.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Prolog | Следующая тема »


 




[ Время генерации скрипта: 0.0830 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.