This PR adds support for decidable equality of empty lists and empty arrays. Decidable equality for lists and arrays is suitably modified so that all diamonds are definitionally equal. Following #9302, the strong condition of definitionally equal under `with_reducible_and_instances` is tested. This also moves some of the comments added in #9302 out of docstrings. --------- Co-authored-by: Aaron Liu <aaronliu2008@outlook.com> Co-authored-by: Eric Wieser <wieser.eric@gmail.com>
28 lines
778 B
Text
28 lines
778 B
Text
def optL (a : Option α) := if a = .none then 1 else 2
|
||
def optR (a : Option α) := if .none = a then 1 else 2
|
||
|
||
/-- info: 1 -/
|
||
#guard_msgs in #eval @optL Nat .none
|
||
/-- info: 2 -/
|
||
#guard_msgs in #eval optL (some ())
|
||
/-- info: 1 -/
|
||
#guard_msgs in #eval @optR Bool .none
|
||
/-- info: 2 -/
|
||
#guard_msgs in #eval optR (some 1.5)
|
||
|
||
|
||
-- test instance diamonds
|
||
example :
|
||
@Option.decidableEqNone α none = @Option.decidableNoneEq α none := by
|
||
with_reducible_and_instances rfl
|
||
|
||
section
|
||
variable {α : Type u} [DecidableEq α]
|
||
example (x : Option α) :
|
||
Option.instDecidableEq x none = Option.decidableEqNone x := by
|
||
with_reducible_and_instances rfl
|
||
|
||
example (x : Option α) :
|
||
Option.instDecidableEq none x = Option.decidableNoneEq x := by
|
||
with_reducible_and_instances rfl
|
||
end
|