このディレクトリの索引
http://toro.2ch.net/test/read.cgi/tech/1328439334/383
#  すいません質問なんですが、一行ごとに文字の表示が増えるプログラムを作る場合はfor文を3重にするのでしょうか? 
#  なんか違う様な気がするのですが、2重だといまいち組み方がわかりません ご教授お願いします 
#   
#  ABC 
#  ABC ABC 
#  ABC ABC ABC 
#  こんなかんじです 
# 
# 

一行ごとに表示要素数が増える :-
        一行ごとに表示要素数が増える('ABC',' ',5).

一行ごとに表示要素数が増える(_表示要素,_区切り要素,_最大表示回数) :-
        length(L,_最大表示回数),
        all(L0,_表示要素),
        一行ずつ要素を増やしながら行表示(L,_区切り要素).

一行ずつ要素を増やしながら行表示(L,_区切り要素) :-
        append(L0,_,L),
        L0 = [_|_],
        concat_atom(L0,_区切り要素,_表示行),
        writef('%t\n',[_表示行]).
        L0 = L.

all([],_).
all([V|R],V) :-
        all(R,V).