File 文件输入SWI Prolog

有人能给我看一下从文件中逐行读取乘法字符串并在控制台中打印的代码吗？我可以将一些东西写入文件，但在阅读时遇到问题。 我试过了

见\1

，

见\0

读取（流，X）

在google中找到了一些谓词，但没有成功

---

你可以这样写：

read_and_just_print(File) :-
    open(File, read, Stream),
    repeat,
    read_line_to_codes(Stream, X),
    ( X \== end_of_file -> atom_codes(X1,X),writeln(X1), fail ; close(Stream), ! ).

---

你可以这样写：

read_and_just_print(File) :-
    open(File, read, Stream),
    repeat,
    read_line_to_codes(Stream, X),
    ( X \== end_of_file -> atom_codes(X1,X),writeln(X1), fail ; close(Stream), ! ).