m * n = m0 * n + n0, n0 < n ⊦ n0 = 0
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic