proposition: Lemma epsilon_mx_dot n m p (M: rmx n m) (N: rmx m p): epsilon_mx (M⋅N) ≡ epsilon_mx M ⋅ epsilon_mx N.
proof: Proof. intros i j. simpl. unfold epsilon_mx, mx_map, mx_dot. rewrite epsilon_sup. now setoid_rewrite andb_dot. Qed.
imports: monoid regex lset boolean sups matrix_ext normalisation