| m ≤ n ⊦ m0 = 0, m0 * m ≤ m0 * n |
m0 * n < m0 * m, m ≤ n ⊦ m = 0, m0 = 0
Used simplifier rules: zero-01: ⊦ m0 * m = 0 ↔ m0 = 0 ∨ m = 0;%mult-a: ⊦ m0 * m * n = (m0 * m) * n;%mult-c: ⊦ m * n = n * m;%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ m ≤ n ↔ ¬ n < m; (ss)