Skip to content

Commit

Permalink
says の中身を括弧でくくらず,インデントするだけにする
Browse files Browse the repository at this point in the history
  • Loading branch information
Seasawher committed Oct 25, 2023
1 parent dcfbe77 commit c719cf9
Showing 1 changed file with 2 additions and 4 deletions.
6 changes: 2 additions & 4 deletions Examples/Split.lean
Original file line number Diff line number Diff line change
Expand Up @@ -29,9 +29,8 @@ example (x : Int) : myabs (2 * x) = 2 * myabs x := by
replace h : x ≥ 0 := by linarith [h]

-- `simp` で if を消すことができる
simp? [h] says (
simp? [h] says
simp only [ge_iff_le, h, ite_true]
)

case inr h =>
-- `2 * x < 0` の場合
Expand All @@ -44,7 +43,6 @@ example (x : Int) : myabs (2 * x) = 2 * myabs x := by
have hx : ¬ x ≥ 0 := by linarith [h]

-- `simp` で簡約
simp? [h, hx] says (
simp? [h, hx] says
simp only [ge_iff_le, hx, ite_false, mul_neg]
)
-- ANCHOR_END: first

0 comments on commit c719cf9

Please sign in to comment.