このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1301067486/282
#  ○ds 
#  ○nds 
#  ○gameds 
#  ○gamends 
#  ×legends 
#  検索したときに、○だけヒットさせるにはどうすればいいか教えてください 
# 
# 

dsで終わる文字列でleからはじまらないもの(_文字列,_前文字列,_適合文字列,_後文字列) :-
        sub_atom(_文字列,_,_,_,_前文字列,_適合文字列,_後文字列,L1,L2,L3),
        append(L0,[d,s],L2),
        \+(append(_,[d,s|_],L2)),
        \+(append([l,e],_,L0)).