このディレクトリの索引
http://toro.2ch.net/test/read.cgi/db/1343899481/300
#  MS SQL server2012です。 
#   
#  下記のデータベースから 
#  親の値=Aで検索して 
#  子の値を取得し、さらに 
#  子の値=親の値で検索したいのですが 
#  求めたい結果を一気に表示する方法が 
#  あったら教えてください。 
#   
#  親子 
#  AB 
#  BC 
#  CD 
#  XY 
#  Z0 
#   
#  求めいた結果 
#  親子 
#  AB 
#  BC 
#  CD 
#  よろしくお願いします。 
# 
# 

親子('A','B'). 
親子('B','C').
親子('C','D'). 
親子('X','Y').
親子('Z','0'). 


'データベースから親の値=Aで検索して子の値を取得し、さらに子の値=親の値で検索したいのですが結果を一気に表示する方法があったら教えてください。' :-
        'データベースから親の値=Aで検索して子の値を取得し、さらに子の値=親の値で検索した'('A',X,Y),
        writef('%t,%t\n',[X,Y]),
        fail.
'データベースから親の値=Aで検索して子の値を取得し、さらに子の値=親の値で検索したいのですが結果を一気に表示する方法があったら教えてください。'.

'データベースから親の値で検索して子の値を取得し、さらに子の値=親の値で検索した'(_親の値,_子の値) :-
        親の値で検索して子の値を取得し(_親の値_1,_親の値,_子の値).

親の値で検索して子の値を取得し(A,X,Y) :-
        親子(A,B),
        さらに子の値=親の値で検索した(A,B,X,Y).

'さらに子の値=親の値で検索した'(X,Y,X,Y).
'さらに子の値=親の値で検索した'(_,B,X,Y) :-
        親の値で検索して子の値を取得し(B,X,Y).