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