１" >> return 1)
  <|> (string "２" >> return 2)
  <|> (string "３" >> return 3)
  <|> (string "４" >> return 4)
  <|> (string "５" >> return 5)
  <|> (string "６" >> return 6)
  <|> (string "７" >> return 7)
  <|> (string "８" >> return 8)
  <|> (string "９" >> return 9)

kanjiNum =
      (string "一" >> return 1)
  
zenkakuNum =
      (string "１" >> return 1)
  <|> (string "２" >> return 2)
  <|> (string "３" >> return 3)
  <|> (string "４" >> return 4)
  <|> (string "５" >> return 5)
  <|> (string "６" >> return 6)
  <|> (string "７" >> return 7)
  <|> (string "８" >> return 8)
  <|> (string "９" >> return 9)
zenkakuNum =
      (string "１" >> return 1)
  <|> (string "２" >> return 2)
  <|> (string "３" >> return 3)
  <|> (string "４" >> return 4)
  <|> (string "５" >> return 5)
  <|> (string "６" >> return 6)
  <|> (string "７" >> return 7)
  <|> (string "８" >> return 8)
  <|> (string "９" >> return 9)