multiEventRule :: (Int -> Event -> state -> state) -> Rule state
multiEventRule = EventRule
multiEventRule :: (Int -> Event -> state -> state) -> Rule state
multiEventRule = EventRule
multiEventRule = EventRule