Open Seasawher opened 1 month ago
レイリーの定理の証明で以下のように役に立つ場面があった。
/- x : ℕ r : ℝ xpos : x > 0 rpos : r > 0 nmem : x ∉ Beatty r M : ℕ := ⌊↑x / r⌋₊ lem : 0 ≤ ↑x / r le : ↑M * r ≤ ↑x hx : ↑M * r = ↑x ⊢ M > 0 -/ -- これは `x > 0` より従う。 rify at xpos ⊢ nlinarith
何気に nlinarith が健闘している場面でもある。
nlinarith
これは型キャスト系のタクティクである。こういう、タクティクの系統についての情報をタグなどで管理できると良いのだけど…
レイリーの定理の証明で以下のように役に立つ場面があった。