>>48

蛾検索(_検索語,_和名,_説明文) :-
   蛾(_和名,_科,_説明文),
   検索語が説明文の中にある(_検索語,_説明文).

検索語が説明文の中にある(_検索語,_説明文) :-
   sub_atom(_説明文,_,_,_,_検索語),!.