VPF::Вывести все записи до указанного времени

NastyaR

Дата 23.5.2018, 16:59 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

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

Добрый день. Пользуюсь swi пролог (онлайн).
Подскажите пожалуйста, как можно вывести всех клиентов с временем отправления ДО 13:00

Код


findTime(T):-
    table(CLIENT,FLIGHT,DEPARTURE,APPOINTMENT,GRADE,VISA,PRIORITY,datatime_of_departure(_,T),D_O_A),
    write("Поиск по времени: "),
    write([CLIENT,FLIGHT,DEPARTURE,APPOINTMENT,GRADE,VISA,PRIORITY,T,D_O_A]), fail.
 
table(client("Ростов Георгий Ермолаевич"),
      flight("рейс №19"),
      departure("из Экибастуз"),
      appointment("в Астана"),
      grade("класс 3"),
      visa("виза есть"),
      priority("приоритет: красный"),
      datatime_of_departure("09.08.2018","11:25"), %дата и время отправления
      datatime_of_appointment("10.08.2018","10:25")
     ).
table(client("Фареста Ариадна Данииловна"),
      flight("рейс №65"),
      departure("из Павлодар"),
      appointment("в Экибастуз"),
      grade("класс 2"),
      visa("виза нет"),
      priority("приоритет: желтый"),
      datatime_of_departure("09.08.2018","23:15"),
      datatime_of_appointment("17.08.2018","17:15")

Т.е., из данных, которые есть сейчас, должны выйти записи по одному человеку.

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