e1b7984836
See comment at `Methods.wellBehavedDischarge`. The default discharger is now well-behaved.
21 lines
484 B
Text
21 lines
484 B
Text
@[congr]
|
|
theorem exists_prop_congr {p p' : Prop} {q q' : p → Prop} (hq : ∀ h, q h ↔ q' h) (hp : p ↔ p') :
|
|
Exists q ↔ ∃ h : p', q' (hp.2 h) := sorry
|
|
|
|
set_option maxHeartbeats 1000 in
|
|
example (x : Nat) :
|
|
∃ (h : x = x)
|
|
(h : x = x)
|
|
(h : x = x)
|
|
(h : x = x)
|
|
(h : x = x)
|
|
(h : x = x)
|
|
(h : x = x)
|
|
(h : x = x)
|
|
(h : x = x)
|
|
(h : x = x)
|
|
(h : x = x)
|
|
(h : x = x)
|
|
(h : x = x), True := by
|
|
simp only
|
|
sorry
|