fact: Definition strictf (p q: nat) (f: 'I_p -> 'I_q) := [forall x : 'I_p, [forall y : 'I_p, (x < y) == (f x < f y)]].
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat div seq path) mathcomp(ssralg fintype perm choice finfun) mathcomp(matrix bigop zmodp mxalgebra fingroup) minor