enjoy_haskell:syakyo p3236