lean4-htt/tests/lean/run/optionDecEq.lean
Robert J. Simmons b6399e18c3
feat: allow decidable equality for empty lists and empty arrays (#11269)
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>
2025-11-20 20:19:31 +00:00

28 lines
778 B
Text
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

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