このディレクトリの索引

#  大学の試験で出題された問題 by @shokinon on twitter at 2011-08-10
#  
#  第1パラメータの要素で、第2パラメータに与えたリストを2分割にし、
#  前半のリストを第3パラメータに、後半のリストを第4パラメータに求める
#  Prologプログラムsep(A,InL,L,R)を作成せよ。

sep(A,[A|R],[],R).
sep(A,[B|R1],[B|R2],R) :-
        sep(A,R1,R2,R).