#416 notls_pipe.hsのちょっとしたリファクタリング