module Cat.Groupoid whereGroupoidsπ
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