fact: Definition freeon (s : {set 'I_n}) (t d : 'rV[A]_n) : bool := [forall j, (j \notin s) ==> (t ``_ j == d ``_ j)].
imports: mathcomp(all_ssreflect ssralg fingroup finalg zmodp matrix) Reals mathcomp(Rstruct) ssr_ext ssralg_ext ssrR f2