以前書いたものの修正版です。