proposition: Lemma linearPl a : {morph f^~ z : u v / a *: u + v >-> s a u + v}.
proof: Proof. by move=> ??; rewrite -applyrE linearP. Qed.
imports: HB(structures) mathcomp(all_ssreflect ssralg fingroup zmodp poly ssrnum) mathcomp(matrix mxalgebra vector falgebra ssrnum algC algnum) mathcomp(fieldext) mathcomp(vector)