type order = {
  customer : string;
  total : int;
}

input orders : collection order

let tax n = n * 20 / 100

query revenue =
  orders |> map (fun o -> tax o.total) |> sum