Definition aspace_cap A B BeA := ASpace (@aspace_cap_subproof A B BeA).Canonical centraliser1_aspace u := ASpace (centraliser1_is_aspace u).Canonical centraliser_aspace V := ASpace (centraliser_is_aspace V).

(* Specifications: *)
Lemma Falgebra_FieldMixin : GRing.IntegralDomain.axiom aT -> GRing.Field.mixin_of aT.
Lemma skew_field_algid1 A : algid A = 1.
Lemma agenvEl U : agenv U = (1 + U * agenv U)%VS.
Lemma agenvEr U : agenv U = (1 + agenv U * U)%VS.
Lemma agenv_modl U V : (U * V <= V -> agenv U * V <= V)%VS.
Lemma agenv_modr U V : (V * U <= V -> V * agenv U <= V)%VS.