fd2c42a8bf
sed -Ei 's/^(\s*)((private |protected )?(noncomputable )?(abbreviation|definition|meta_definition|theorem|lemma|proposition|corollary)\s+\S+\s*)((\s*\[(\S+(\s+[0-9]+)*|priority.*)\])+)\s*/\1attribute \6\n\1\2/' library/**/*.lean tests/**/*.lean sed -Ei 's/\s+$//' library/**/*.lean # remove trailing whitespace
11 lines
383 B
Text
11 lines
383 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
|