chore(hott/algebra) make carrier hset witness an instance
This commit is contained in:
parent
8948926a07
commit
f480d67881
1 changed files with 2 additions and 0 deletions
|
@ -52,6 +52,8 @@ structure semigroup [class] (A : Type) extends has_mul A :=
|
|||
(carrier_hset : is_hset A)
|
||||
(mul_assoc : ∀a b c, mul (mul a b) c = mul a (mul b c))
|
||||
|
||||
attribute semigroup.carrier_hset [instance]
|
||||
|
||||
theorem mul_assoc [s : semigroup A] (a b c : A) : a * b * c = a * (b * c) :=
|
||||
!semigroup.mul_assoc
|
||||
|
||||
|
|
Loading…
Reference in a new issue