- sage: J = random_eja().random_element().subalgebra_generated_by()
- sage: actual = J.one().operator().matrix()
- sage: expected = matrix.identity(J.base_ring(), J.dimension())
+ sage: x = random_eja(AA).random_element()
+ sage: A = x.subalgebra_generated_by(orthonormalize_basis=True)
+ sage: x = A.random_element()
+ sage: A.one()*x == x and x*A.one() == x
+ True
+
+ The matrix of the unit element's operator is the identity over
+ the rationals::
+
+ sage: set_random_seed()
+ sage: x = random_eja().random_element()
+ sage: A = x.subalgebra_generated_by()
+ sage: actual = A.one().operator().matrix()
+ sage: expected = matrix.identity(A.base_ring(), A.dimension())