proposition: Lemma inv_is_ahom (f : 'AEnd(L)) : ahom_in {:L} f^-1.
proof: Proof. have /ahomP/kHom_lrmorphism hom1f := valP f. exact/ahomP/kHom_lrmorphism/inv_kHomf. Qed.
imports: HB(structures) mathcomp(ssreflect ssrbool ssrfun eqtype ssrnat seq div) mathcomp(choice fintype tuple finfun bigop ssralg poly) mathcomp(polydiv finset fingroup morphism quotient perm) mathcomp(action zmodp cyclic matrix mxalgebra vector) mathcomp(falgebra fieldext separable)