このディレクトリの索引

ジャンケンの勝ち負け(_拳,_拳,あいこ) :-
        member(_拳,[グー,チョキ,パー]).
ジャンケンの勝ち負け(_左,_右,左の勝ち) :-
        append(_,[_左,_右|_],[グー,チョキ,パー,グー]).
ジャンケンの勝ち負け(_左,_右,右の勝ち) :-
        append(_,[_左,_右|_],[グー,パー,チョキ,グー]).