Графические интерфейсы на базе SWI-Prolog/XPCE не запускается

Узнай цену своей работы

Формулировка задачи:

Имеется файл s48.pl. Захожу в языке в swi-prolog в нужную папку, где находятся s48.pl и prog_1.pl. prog_1.pl работает поиск по базе тоже. Но не знаю как запустить s48.pl чтобы появлялась панель окошками и кнопки. Пробовал: [s48.pl]. True. А GUI не появляется. Какую команду ввести я не знаю и книжке не рассмотрено. В интернете тоже не нашел. В внутренней справке команды ввожу в консоль- появляются разные примитивы, т.е библиотека работоспособна.

s48.pl

Листинг программы
  1. /*Программа 2.2 */
  2. :- include('prog_1.pl').
  3. gui_to_likes :-
  4.  
  5. new(MyWin, dialog('Интерфейс к БЗ Любят')),
  6. send_list(MyWin, append, [
  7. new(Who,text_item('Любит кто')),
  8. new(MyList, list_browser),
  9. button('Любит что:', message(@prolog,
  10. output, MyList, Who?selection )),
  11. button(выход, message(MyWin, destroy))
  12. ]),
  13. send(MyList, alignment, center),
  14. send(MyWin, open(point(100,400))).
  15. output(FrmList,X) :-
  16. send(FrmList, clear),
  17. likes(X,W),
  18. send(FrmList, append, W),
  19. fail.

Решение задачи: «Графические интерфейсы на базе SWI-Prolog/XPCE не запускается»

textual
Листинг программы
  1. /* Программа 2.1 */
  2. likes('Иван','Марья').% факт
  3. likes('Петр','футбол').% факт
  4. likes('Иван',X) :- likes('Петр',X). % правило
  5.  
  6. go(X,стадион) :- likes(X,футбол).

Объяснение кода листинга программы

  1. Программа 2.1
  2. Факт: likes('Иван','Марья').
  3. Факт: likes('Петр','футбол').
  4. Правило: likes('Иван',X) :- likes('Петр',X).
  5. Правило: go(X,стадион) :- likes(X,футбол).

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

7   голосов , оценка 4.286 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут