このディレクトリの索引
#  I need to find the first duplicate value in a list.
#  
#  prep(3,[1,3,5,3,5]). Should return True. prep(5,[1,3,5,3,5]). Should return False.
#  
#  I thought checking for equality with the current value and the previous list members until i find a duplicate, if it finds one it will test for equality with X but i have no idea how to do that in Prolog!
#  
#  I appreciate any help! Thanks
#  
#  私は、リスト内の最初の重複値を見つける必要があります。
#  
#  準備(3、[1,3,5,3,5])。trueを返す必要があります。準備(5、[1,3,5,3,5])。falseを返す必要があります。
#  
#  私は重複を見つけるまで、私は、現在の値と前のリストのメンバーと等しいかどうかを確認する考えが見つかった場合、それはXと等しいかどうかをテストしますが、私はどのようにPrologでこれを行うには見当がつかない!

最初の重複要素(_重複要素,_ならび) :-
        append(L,[_重複要素|_],_ならび),
        append(_,[_重複要素|_],L),
        \+(最初の重複要素(_,L)).

実は重複要素がある最初の要素(_重複要素,_ならび) :-
        append(_,[_最初に現れる重複要素|R],_ならび),
        append(_,[_最初に現れる重複要素|_],R),
        !,
        _重複要素 = _最初に現れる重複要素.