6469890178
This PR ensures we apply the ring normalizer to equalities being propagated from the `grind` core module to `grind lia`. It also ensures we use the safe/managed polynomial functions when normalizing. Closes #11539
11 lines
455 B
Text
11 lines
455 B
Text
example {n a b : Nat}
|
|
(this : (b : Int) ^ (n + 1) + ↑(n + 1) * ↑b ^ (n + 1 - 1) * (↑a - ↑b) ≤
|
|
(↑b + (↑a - ↑b)) ^ (n + 1)) :
|
|
(n + 1) * a * b ^ n ≤ a ^ (n + 1) + n * b * b ^ n := by
|
|
grind (splits := 0)
|
|
|
|
example {n a b : Nat}
|
|
(this : (b : Int) ^ (n + 1) + ↑(n + 1) * ↑b ^ (n + 1 - 1) * (↑a - ↑b) ≤
|
|
(↑b + (↑a - ↑b)) ^ (n + 1)) :
|
|
(n + 1) * a * b ^ n ≤ a ^ (n + 1) + n * b * b ^ n := by
|
|
grind
|