このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1294836668/250
#  文字列のリストlistがあって 
#  for x in list: 
#  このfor文の中で、今あいてにしてる文字xの隣の文字にアクセスするにはどうすればよい? 
#  for i in len(list): 
#  x = list[i] 
#  とかで回せばできそうですが、それ以外には・・・? 
# 

'今あいてにしてる文字xの隣の文字にアクセスするにはどうすればよい?'(_文字ならび,_前の文字,_今あいてにしてる文字,_後の文字) :-
        '今あいてにしてる文字xの隣の文字にアクセスするにはどうすればよい?'(_文字ならび,[''],_前の文字,_今あいてにしてる文字,_後の文字).

'今あいてにしてる文字xの隣の文字にアクセスするにはどうすればよい?'([_今開いてしている文字],[_前の文字|R0],_前の文字,_今あいてにしてる文字,'') :- !.
'今あいてにしてる文字xの隣の文字にアクセスするにはどうすればよい?'([_今あいてしている文字|R],[_前の文字|R0],_前の文字,_今あいてにしてる文字,_後の文字) :-
        R = [_後の文字|_],
        '今あいてにしてる文字xの隣の文字にアクセスするにはどうすればよい?'(R,[_今あいてしている文字,_前の文字|R0],_前の文字,_今あいてにしてる文字,_後の文字).