@jcoglan can make one in 15 minutes when I get into work. A reference implementation in haskell would look great, actually