Prolog输出消息理解

Question

这是一个非常快的，我不知道谷歌的正确方法！

假设我们有一个输出，它给出了：

X = [4|_1218]

通常需要更改以使输出只是说4？

member1(Head, [Head|_]):-!.   
member1(Item, [_|Tail]):-
    member1(Item, Tail).


findnotin([Head|_], RuledOut, [Head|_]):-
    not(member1(Head, RuledOut)).

编辑已完成的程序：

find_not_in([], _, _).
find_not_in([Head|Candidates], RuleOut, [Head|Legal]):-
    not(member1(Head, RuleOut)),
    find_not_in(Candidates, RuleOut, Legal).

find_not_in([_|Candidates], RuleOut, Legal):-
    find_not_in(Candidates, RuleOut, Legal).