Добрый день. Пользуюсь 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")
|
Т.е., из данных, которые есть сейчас, должны выйти записи по одному человеку. |