| m ^ m0 < m ^ n1 ↔ m0 < n1 ⊦ m ^ m0 * m < m ^ n1 * m ↔ m0 < n1, m = 1, m = 0 |
Used simplifier rules: mult-c: ⊦ m * n = n * m; from specification nat-mult%mult-a: ⊦ m0 * m * n = (m0 * m) * n; from specification nat-mult% ⊦ m0 ≠ 0 → (m0 * m < m0 * n ↔ m < n); (s)