λ (a b : ↥g), g.mul a b : ↥g → ↥g → g.carrier