module Cat.Groupoid where
Groupoidsπ
A category is a (pre)groupoid if every morphism of is invertible.
is-pregroupoid : β {o β} β Precategory o β β Type (o β β) is-pregroupoid C = β {x y} (f : Hom x y) β is-invertible f where open Cat.Reasoning C