In the standard library, we should use explicit universe variables for universe polymorphic definitions. Users that want to declare universe polymorphic definitions but do not want to provide universe level parameters should use Type _ or Type*
4 lines
261 B
Text
4 lines
261 B
Text
λ (A : Type u) (a b c d : A) (H₁ : eq a b) (H₂ : eq c b) (H₃ : eq d c),
|
|
have this : eq a c, from eq.trans H₁ (eq.symm H₂),
|
|
show eq a d, from eq.trans this (eq.symm H₃) :
|
|
∀ (A : Type u) (a b c d : A), eq a b → eq c b → eq d c → eq a d
|