このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1308749241/476
#  [1]アルゴリズム 
#  [2]連結リスト(一方向)の最後に要素を追加するプログラムを作成しなさい。 
#  ただし、連結リストの最後の要素を指すポインタを保持している場合と保持し 
#  ていない場合について、プログラムを作成すること。 
#  [3.1]Linux 
#  [3.2]gcc 
#  [3.3]C 
#  [4]7月21日まで 
# 

'連結リスト(一方向)の最後に要素を追加する'(_起点,_最後に追加する要素) :-
        連結リスト(_起点,[],_値),
        次の起点(_起点,_次の起点),
        retract(連結リスト(_起点,[],_値)),
        assertz(連結リスト(_起点,_次の起点,_値)),
        assertz(連結リスト(_次の起点,[],_最後に追加する要素)),!.
'連結リスト(一方向)の最後に要素を追加する'(_起点,_最後に追加する要素) :-
        連結リスト(_起点,_次のリスト,_値),
        '連結リスト(一方向)の最後に要素を追加する'(_次のリスト,_最後に追加する要素).

次の起点(_起点,_次の起点) :-
        _次の起点 is _起点 + 1.