このディレクトリの索引
http://pc11.2ch.net/test/read.cgi/db/1252492296/776
#  例えば、都道府県名が保存してあるフィールドに 
#  温泉万歳北海道編 など、どこかに都道府県名が入っているかもしれない 
#  文字列を与え、その文字列に都道府県名が入っているかどうかを 
#  判断させることってできますか? 
# 
# 

'例えば、都道府県名が保存してあるフィールドに温泉万歳北海道編など、どこかに都道府県名が入っているかもしれない文字列を与え、その文字列に都道府県名が入っているかどうかを判断させる'(_文字列) :-
      都道府県名(_都道府県名),
      sub_atom(_文字列,_,_,_,_都道府県名).

都道府県名(北海道).
都道府県名(青森県).
都道府県名(岩手県).
都道府県名(宮城県).
都道府県名(秋田県).
都道府県名(山形県).
都道府県名(福島県).
都道府県名(茨城県).
都道府県名(栃木県).
都道府県名(群馬県).
都道府県名(埼玉県).
都道府県名(千葉県).
都道府県名(東京都).
都道府県名(神奈川県).
都道府県名(新潟県).
都道府県名(富山県).
都道府県名(石川県).
都道府県名(福井県).
都道府県名(山梨県).
都道府県名(長野県).
都道府県名(岐阜県).
都道府県名(静岡県).
都道府県名(愛知県).
都道府県名(三重県).
都道府県名(滋賀県).
都道府県名(京都府).
都道府県名(大阪府).
都道府県名(兵庫県).
都道府県名(奈良県).
都道府県名(和歌山県).
都道府県名(鳥取県).
都道府県名(島根県).
都道府県名(岡山県).
都道府県名(広島県).
都道府県名(山口県).
都道府県名(徳島県).
都道府県名(香川県).
都道府県名(愛媛県).
都道府県名(高知県).
都道府県名(福岡県).
都道府県名(佐賀県).
都道府県名(長崎県).
都道府県名(熊本県).
都道府県名(大分県).
都道府県名(宮崎県).
都道府県名(鹿児島県).
都道府県名(沖縄県).