Есть программа на SWI (кусок из нее) в файле my.pl:
родитель('Петр', 'Алексей').
родитель('Галина', 'Алексей').
родитель('Владимир', 'Елена').
родитель('Наталья', 'Елена').
родитель('Алексей', 'Мария').
родитель('Елена', 'Мария').
ребенок(Y, X) :- родитель( X, Y).
потомок(X, Y) :- родитель(Y, X).
потомок(X, Z) :- ребенок(X, Y), потомок(Y, Z).
предок(X, Z) :- родитель(X, Z).
предок(X, Z) :- родитель(X, Y), предок( Y, Z).
С помощью Consult я загружаю этот файл и после приглашения ввожу: предок(X, 'Мария'). и получаю список предков. Затем ввожу потомок(X, 'Петр'). и получаю список потомков. А можно ли создать файл с командами для SWI, при двойном щелчке на котором загружался бы файл my.pl, из коммандного файла брались бы цели и в SWI появлялся результат?
