We should not assume that the arguments at to_revert are sorted by idx. This commit fixes the bug reported at: https://groups.google.com/forum/#!topic/lean-user/x4Zwpou3le0
13 lines
238 B
Text
13 lines
238 B
Text
constant α: Type
|
||
|
||
inductive P: α → Prop
|
||
|
||
inductive Q: α → α → Prop
|
||
| of: ∀ {a₁ a₂}, Q a₁ a₂
|
||
|
||
example {a: α} (P_a: P a) (Q_a: ∃ a', Q a' a): true :=
|
||
begin
|
||
cases Q_a with a' Q_a'_a,
|
||
cases Q_a'_a,
|
||
cases P_a,
|
||
end
|