proposition: Lemma L3toolES m (c: 'cV[R]_m) d (i: 'I_m) : L3tool c d (lift 0 i) = c i 0.
proof: Proof. rewrite /L3tool. case: splitP => x /=; first by rewrite [x]ord1. by rewrite /bump leq0n => /eqP; rewrite eqSS => /eqP/ord_inj->. Qed.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat div seq path) mathcomp(ssralg fintype perm choice) mathcomp(matrix bigop zmodp mxalgebra poly polydiv mxpoly) ssrcomplements dvdring minor atomic_operations