8bbcbb14cf
sed -E -i 's/(attribute(\s*(\w|\.)+)* \[[^]]+)\] \[/\1, /' {library,tests}/**/*.lean # repeat as needed
11 lines
382 B
Text
11 lines
382 B
Text
open tactic
|
|
|
|
attribute [congr, priority std.priority.default+1]
|
|
theorem forall_congr_prop_eq {P₁ P₂ Q₁ Q₂ : Prop} :
|
|
P₁ = P₂ → (P₂ → Q₁ = Q₂) → (P₁ → Q₁) = (P₂ → Q₂) :=
|
|
sorry
|
|
|
|
print [congr] congr
|
|
|
|
example (A : Type) (a b c : A) : (a = b) → (a = c) → a = b := by simp
|
|
example (A : Type) (a b c : A) : (a = c) → (a = b) → a = b := by simp
|