fact: Hypothesis find2P : forall m n (E : 'M[E]_(1 + m,1 + n)) a, pick_spec [pred ij | ~~(a %| E ij.1 (lift 0 ij.2))] (find2 E a).
imports: HB(structures) mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat div seq path) mathcomp(ssralg ssrint ssrnum fintype choice) mathcomp(matrix mxalgebra bigop zmodp perm) dvdring mxstructure stronglydiscrete coherent edr