I don't know Prolog too well, so I'll just paste what your program (241983) spits out to standard error stream:
% library(readutil) compiled into read_util 0.01 sec, 6,728 bytes
ERROR: (/solutions/solution:11):
Out of global stack
Warning: (/solutions/solution:11):
Goal (directive) failed: user:p(0)
% /solutions/solution compiled 1.52 sec, 13,428,092 bytes
ERROR: Undefined procedure: program/0
ERROR: Undefined procedure: program/0
ERROR: Undefined procedure: program/0
...
(..lots of those)
So -- it seems to me it's rather some programming error.