我在序言中有一个这样的数据库：
parent('John',Elizabeth').
parent('Mary',Elizabeth').
其中第一个名字是父母的名字，第二个名字是孩子的名字。我需要创建一个像这样的方法：
hasNoChildren(X).
给出了所有没有孩子的父母的名单。我有方法
hasChildren(X) :- parent(X, Y).
做相反的事情。我尝试过：
hasNoChildren(X) :- \+ hasChildren(X).
但这对我不起作用。有人可以帮我吗？