compute max value.

max.kl

operator entry() {
  Scalar array[];
  for (Size i = 0; i < 1000000; i++) {
    array.push(1);
    array.push(0);
    array.push(2);
    array.push(3);
    array.push(1);
    array.push(5);
  }

  ArrayProducer<Scalar> vp = createConstArray(array);
  ValueProducer<Scalar> r = createReduce(vp, max);

  report r.produce();
}

operator max(
  Scalar input,
  io Scalar output) {
  output = input > output ? input : output;
}