Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
5 changes: 0 additions & 5 deletions Examples/Solution/HeytingAndBooleanAlgebra.lean
Original file line number Diff line number Diff line change
Expand Up @@ -261,14 +261,9 @@ abbrev Three := Fin 3

/- ### 問2.1 半順序集合であること -/

-- この二つの定理は使用して良い
theorem min_def (a b : Nat) : min a b = if a ≤ b then a else b := by aesop
theorem max_def (a b : Nat) : max a b = if a ≤ b then b else a := by aesop

-- ここに `local add_aesop_rules` コマンドを追加して証明が通るようにしてください。
-- いくつルールを追加しても構いません。
--##--
local add_aesop_rules norm [simp [min_def, max_def]]
local add_aesop_rules safe [cases Fin]
local add_aesop_rules norm [simp Fin.le_def]
local add_aesop_rules safe [tactic (by omega)]
Expand Down
4 changes: 0 additions & 4 deletions Exercise/HeytingAndBooleanAlgebra.lean
Original file line number Diff line number Diff line change
Expand Up @@ -258,10 +258,6 @@ abbrev Three := Fin 3

/- ### 問2.1 半順序集合であること -/

-- この二つの定理は使用して良い
theorem min_def (a b : Nat) : min a b = if a ≤ b then a else b := by aesop
theorem max_def (a b : Nat) : max a b = if a ≤ b then b else a := by aesop

-- ここに `local add_aesop_rules` コマンドを追加して証明が通るようにしてください。
-- いくつルールを追加しても構いません。

Expand Down