ruleNationalDay :: Rule
ruleNationalDay = Rule
  { name = "national day"
  , pattern =
    [ regex "(国庆|國慶)(节|節)?"
    ]
  , prod = \_ -> tt $ monthDay 10 1
  }

rules :: [
ruleNationalDay :: Rule
ruleNationalDay = Rule
  { name = "national day"
  , pattern =
    [ regex "(国庆|國慶)(节|節)?"
    ]
  , prod = \_ -> tt $ monthDay 10 1
  }
ruleNationalDay = Rule
  { name = "national day"
  , pattern =
    [ regex "(国庆|國慶)(节|節)?"
    ]
  , prod = \_ -> tt $ monthDay 10 1
  }