proposition: Lemma mx_blocks_star_diagonal n m (M: MX n n) (N: MX m m) : (mx_blocks M 0 0 N)# == mx_blocks (M#) 0 0 (N#).
proof: Proof. intros. rewrite mx_blocks_star_trigonal. apply mx_blocks_compat; trivial. semiring_reflexivity. Qed.
imports: ATBR(Common) ATBR(Classes) ATBR(Graph) ATBR(Monoid) ATBR(SemiLattice) ATBR(SemiRing) ATBR(KleeneAlgebra) ATBR(MxGraph) ATBR(MxSemiLattice) ATBR(MxSemiRing)