fact: Definition sort {σ: signature} (nm: names σ) : sorts σ := pr2 (ar σ nm).
imports: UniMath.MoreFoundations.Notations UniMath.Combinatorics.StandardFiniteSets UniMath.Combinatorics.DecSet UniMath.Combinatorics.MoreLists