将项添加到Prolog中的列表

Question

我正在尝试将项目添加到Prolog中的列表中。

safe_square(Xa, Ya, X, Y) :-
   append([X], [Y], Path),
   path(Path).

path(Path) :-
    append(Path, _, NewPath),
    write(NewPath).

此方法无效。