10 lines
172 B
Text
10 lines
172 B
Text
M:=<<3|2+I>,<2-I|1>>:
|
|
|
|
with(LinearAlgebra):
|
|
IsNormal:=A->EqualEntries(A^%H.A,A.A^%H):
|
|
|
|
M^%H;
|
|
HermitianTranspose(M);
|
|
type(M,'Matrix'(hermitian));
|
|
IsNormal(M);
|
|
IsUnitary(M);
|