enjoy_haskell:Syakyo p3468