The Chip

chip :: [Packet] → [Packet] type Packet = (Channel,Data) type Channel = Int type Data = [Word]
      ┌──────┐
ps ───┤ chip ├──►  ps'
      └──────┘