Skip to content

Commit

Permalink
feat: port Order.SuccPred.Basic (#1233)
Browse files Browse the repository at this point in the history
Port of order.succ_pred.basic
  • Loading branch information
arienmalec committed Jan 1, 2023
1 parent 25a1365 commit a6184c4
Show file tree
Hide file tree
Showing 3 changed files with 1,498 additions and 1 deletion.
1 change: 1 addition & 0 deletions Mathlib.lean
Original file line number Diff line number Diff line change
Expand Up @@ -455,6 +455,7 @@ import Mathlib.Order.RelIso.Basic
import Mathlib.Order.RelIso.Group
import Mathlib.Order.RelIso.Set
import Mathlib.Order.SemiconjSup
import Mathlib.Order.SuccPred.Basic
import Mathlib.Order.SymmDiff
import Mathlib.Order.Synonym
import Mathlib.Order.WellFounded
Expand Down
2 changes: 1 addition & 1 deletion Mathlib/Order/RelClasses.lean
Original file line number Diff line number Diff line change
Expand Up @@ -408,7 +408,7 @@ def toWellFoundedRelation : WellFoundedRelation α :=
end WellFoundedGt

/-- Construct a decidable linear order from a well-founded linear order. -/
noncomputable def IsWellOrder.LinearOrder (r : α → α → Prop) [IsWellOrder α r] : LinearOrder α :=
noncomputable def IsWellOrder.linearOrder (r : α → α → Prop) [IsWellOrder α r] : LinearOrder α :=
letI := fun x y => Classical.dec ¬r x y
linearOrderOfSTO r

Expand Down
Loading

0 comments on commit a6184c4

Please sign in to comment.