junk.pl:

#!/usr/bin/env swipl
:- initialization query.

query:-
    consult(user),
    triple(father,paul,F),
    write(user_output,F),
    halt.

junkfb.pl:

triple(father,john,george).
triple(father,paul,ringo).
chmod +x junk.pl
./junk.pl <junkfb.pl

See Also

Table of Contents
Blog
Videos
References