Result := (case Op is
  Add => A + B,
  Subtract => A - B,
  Multiply => A * B,
  Divide => A / B
);