5df7770977
This PR changes `addPPExplicitToExposeDiff` to show universe differences
and to visit into projections, e.g.:
```
error: tactic 'rfl' failed, the left-hand side
(Test.mk (∀ (x : PUnit.{1}), True)).1
is not definitionally equal to the right-hand side
(Test.mk (∀ (x : PUnit.{2}), True)).1
```
for
```lean
inductive Test where
| mk (x : Prop)
example : (Test.mk (∀ _ : PUnit.{1}, True)).1 = (Test.mk (∀ _ : PUnit.{2}, True)).1 := by
rfl
```
11 lines
289 B
Text
11 lines
289 B
Text
inductive foo {n : Nat} : Prop
|
|
|
|
-- Check that the error message will print the types with implicit arguments shown
|
|
example (h : @foo 42) : @foo 23 := by
|
|
apply h
|
|
|
|
example : (1 : Nat) = 1 := by
|
|
apply (rfl : (1 : Int) = 1)
|
|
|
|
example : PUnit.{0} = PUnit.{0} := by
|
|
apply Eq.refl PUnit.{1}
|