doc-src/Tutorial/Misc/arith2.ML

- Inserted additional check for equality types in check_mode_clause that
avoids ill-typed code to be generated.
- Mode inference algorithm now outputs additional diagnostic messages.

Goal "min i (max j (k*k)) = max (min (k*k) i) (min i (j::nat))";