Write Stream Prolog的另一种方式

Question

我正在寻找以txt或其他文本格式打印prolog变量的替代方法;或者只是在某处保存局部变量。我已经使用过Write Stream，但我遇到了一些问题，所以我希望有另一种方法可以做到这一点。

例如：

ask(Q, Answer) :-
  open('text8.txt',write,Stream),
  write(Stream,Q), 
  write(Stream,'?\nEnd'), close(Stream).