sociated to a given irreducible module.                    *)

Section Components.Definition component_mx_expr (U : 'M[F]_n) :=x_unfoldable := [unlockable fun component_mx].mxsimple U.

(* Specifications: *)
Local Notation compU := (component_mx U).
Qed.
Qed.
Qed.
Proof. exact: mx_iso_component (mx_iso_refl U). Qed. Lemma hom_com
Qed.
Qed.
}.