ShowPage.hsのリファクタリング等