Expensive Dinner solutions

Expensive Dinner was solved using OCaml by 3 contestants. Solution sizes: average 947 bytes (shortest: 717; longest: 1296).