このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1289913298/6
#  [1] 授業単元:C言語基礎 
#  [2] 問題文(含コード&リンク):http://ime.nu/www.dotup.org/uploda/www.dotup.org1254228.txt.html 
#  
#  [3]小文字のアルファベットから成る英単語に含まれる母音('a', 'i', 'u', 'e', 'o')の数
#     を数える関数 count_boin を作成せよ.ただし,引数として英単語と母音の文字列を受け取り,
#     戻り値として母音の数を返すものとする.また,ポインタを使って簡潔かつ高速に文字列を
#     操作すること.この関数内で配列を使用しないこと,意味のないポインタの使い方をしないこと。
#     
#  
#     下のmain 関数を用いて,正常な動作結果が得られることを確認せよ

'小文字のアルファベットから成る英単語に含まれる母音(a,i,u,e,o)の数を数える'(_小文字のアルファベットから成る英単語,_母音の数) :-
          atom_chars(_小文字のアルファベットから成る英単語,Chars),
          count((append(_,[Char|_],Chars),append(_,[Char|_],[a,i,u,e,o])),_母音の数).