fact: Definition perm_mx n (s : 'S_n) := \matrix_(i, j) (if s i == j then 1 else 0).
imports: ssreflect ssrbool ssrfun eqtype ssrnat seq choice fintype finfun bigops ssralg groups perm zmodp morphisms Ring RingClass bigopsClass Setoid Morphisms