このディレクトリの索引
http://toro.2ch.net/test/read.cgi/db/1316769778/918
#  ・DBMS名とバージョン  
#  MySQL5 
#  ・テーブルデータ  
#  name (verchar) 
#   
#  abc040 
#  abc100 
#  abc90 
#  abc20 
#  abc1000 
#   
#  ・欲しい結果  
#  nameはユニーク 
#  abcは固定、そのあとに数値文字列 
#  ソートして、数値文字列の大きい順に抽出したい 
#   
#  abc1000 
#  abc100 
#  abc90 
#  abc040 
#  abc20 
#   
#  ・説明  
#   

'欲しい結果 nameはユニーク abcは固定、そのあとに数値文字列 ソートして、数値文字列の大きい順に抽出したい'(_name) :-
        findall([N,_name],
                    テーブルデータ(_name),
                    sPLIT(_name,[abc],[_,N])),
                L),
        降順にソートする(L1,L3),
        member([_,_name],L3).

降順にソートする(L1,L3) :-
        sort(L1,L2),
        reverse(L2,L3).