我知道这是一个愚蠢的问题,但我现在真的很绝望,因为我找不到构建它的方法。我总是收到这个错误
ERROR: call/2: Undefined procedure: main/1
ERROR: However, there are definitions for:
ERROR: main/0
即使我尝试过
father(ahmad,samer).
father(ahmad,lolo).
father(ahmad,koko).
grandfather(X,Y):-
father(U,X),
father(Y,U).
main :- father(ahmad, X), writef('%t\n', [X]).
那么有人可以帮助我以正确的方式做到这一点吗?