@@ -99,14 +99,13 @@ constructor provides poor definitional equalities. If other fields are known ex
9999should be provided; for example, if `inf` is known explicitly, construct the
100100`ConditionallyCompleteLattice` instance as
101101```
102- @[implicit_reducible]
103- instance : ConditionallyCompleteLattice my_T :=
104- { inf := better_inf,
105- le_inf := ...,
106- inf_le_right := ...,
107- inf_le_left := ...
108- -- don't care to fix sup, sInf
109- ..conditionallyCompleteLatticeOfsSup my_T _ }
102+ instance : ConditionallyCompleteLattice my_T where
103+ inf := better_inf
104+ le_inf := ...
105+ inf_le_right := ...
106+ inf_le_left := ...
107+ -- don't care to fix sup, sInf
108+ __ := conditionallyCompleteLatticeOfsSup my_T ...
110109```
111110-/
112111@[implicit_reducible]
@@ -141,20 +140,19 @@ def conditionallyCompleteLatticeOfsSup (α : Type*) [H1 : PartialOrder α] [H2 :
141140 isLUB_csSup _ hn hb := isLUB_sSup _ hb hn
142141 isGLB_csInf _ hn hb := isLUB_lowerBounds.mp (isLUB_sSup _ hn.bddAbove_lowerBounds hb)
143142
144- /-- Create a `ConditionallyCompleteLattice` from a `PartialOrder` and `inf ` function
143+ /-- Create a `ConditionallyCompleteLattice` from a `PartialOrder` and `sInf ` function
145144that returns the greatest lower bound of a nonempty set which is bounded below. Usually this
146145constructor provides poor definitional equalities. If other fields are known explicitly, they
147146should be provided; for example, if `inf` is known explicitly, construct the
148147`ConditionallyCompleteLattice` instance as
149148```
150- @[implicit_reducible]
151149instance : ConditionallyCompleteLattice my_T :=
152- { inf := better_inf,
153- le_inf := ...,
154- inf_le_right := ...,
155- inf_le_left := ...
156- -- don't care to fix sup, sSup
157- .. conditionallyCompleteLatticeOfsInf my_T _ }
150+ inf := better_inf
151+ le_inf := ...
152+ inf_le_right := ...
153+ inf_le_left := ...
154+ -- don't care to fix sup, sSup
155+ __ := conditionallyCompleteLatticeOfsInf my_T ...
158156```
159157-/
160158@[implicit_reducible]
@@ -192,7 +190,7 @@ def conditionallyCompleteLatticeOfsInf (α : Type*) [H1 : PartialOrder α] [H2 :
192190
193191/-- A version of `conditionallyCompleteLatticeOfsSup` when we already know that `α` is a lattice.
194192
195- This should only be used when it is both hard and unnecessary to provide `inf ` explicitly. -/
193+ This should only be used when it is both hard and unnecessary to provide `sInf ` explicitly. -/
196194@[implicit_reducible]
197195def conditionallyCompleteLatticeOfLatticeOfsSup (α : Type *) [H1 : Lattice α] [SupSet α]
198196 (isLUB_sSup : ∀ s : Set α, BddAbove s → s.Nonempty → IsLUB s (sSup s)) :
@@ -205,7 +203,7 @@ def conditionallyCompleteLatticeOfLatticeOfsSup (α : Type*) [H1 : Lattice α] [
205203
206204/-- A version of `conditionallyCompleteLatticeOfsInf` when we already know that `α` is a lattice.
207205
208- This should only be used when it is both hard and unnecessary to provide `sup ` explicitly. -/
206+ This should only be used when it is both hard and unnecessary to provide `sSup ` explicitly. -/
209207@[implicit_reducible]
210208def conditionallyCompleteLatticeOfLatticeOfsInf (α : Type *) [H1 : Lattice α] [InfSet α]
211209 (isGLB_sInf : ∀ s : Set α, BddBelow s → s.Nonempty → IsGLB s (sInf s)) :
0 commit comments