30 )
  , ( "卌" , 40 )
  ]

ruleTens :: Rule
ruleTens = Rule
  { name = "integer (20,30,40)"
  , pattern =
    [ regex "(廿|卅|卌)"
tensMap :: HashMap.HashMap Text Integer
tensMap = HashMap.fromList
  [ ( "廿" , 20 )
  , ( "卅" , 30 )
  , ( "卌" , 40 )
  ]
tensMap = HashMap.fromList
  [ ( "廿" , 20 )
  , ( "卅" , 30 )
  , ( "卌" , 40 )
  ]