このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1301067486/916
#  質問です。 
#   
#  数字と文字が混在する文字列の中から、数字だけを取り出すことは可能でしょうか? 
#  (ただし、複数個の数字文字列としてではなく、一つの文字列として取り出す場合) 
#   
#  例えば 
#  「a12b3cd456efg」から「123456」を取り出す 
#  (「12」と「3」と「456」ではなく) 
# 
# 

'数字と文字が混在する文字列の中から、数字だけを取り出す。ただし、複数個の数字文字列としてではなく、一つの文字列として取り出す'(_文字列,_数字文字列) :-
        findall(_数字,(
                    sub_atom(_文字列,_,1,_,_文字),
                    member(_文字,['0','1','2','3','4','5','6','7','8','9'])),
                L),
        concat_atom(L,_数字文字列).