restart:
with(linalg);
##with(LinearAlgebra);
A:=<<0|1/sqrt(2)|0>,<1/sqrt(2)|0|1/sqrt(2)>,<0|1/sqrt(2)|0>>;
eigenvectors_A:=eigenvectors(A);
EV1:=<<1/sqrt(2)>,<1>,<1/sqrt(2)>>;
EV1_normiert:=EV1/norm(EV1);
EV2:=<<1>,<-sqrt(2)>,<1>>;
EV2_normiert:=EV2/norm(EV2);
EV3:=<<-1>,<0>,<1>>;
EV3_normiert:=EV3/norm(EV3);
EW1:=1;
EW2:=-1;
normtest:=norm(EV1);
A_spektr:=EW1*multiply(EV1_normiert,transpose(EV1_normiert))+EW2*multiply(EV2_normiert,transpose(EV2_normiert));
evalm(%);
M:=<<1|0|0>,<0|0|0>,<0|0|-1>>;
B:= -I*(multiply(M,A)-multiply(A,M));
evalm(%);C:=multiply(A,A)+multiply(B,B)+multiply(M,M);
evalm(%);
messbar:= -I*(multiply(M,C)-multiply(C,M));
evalm(%);Eigenvektoren:=Eigenvectors(A,output=['vectors', 'values']);
Eigenwerte:=Eigenvalues(A);transpose(C);restart:TTdSMApJNVJUQUJMRV9TQVZFLzIwNDU5NDA0WCwlKWFueXRoaW5nRzYiNiJbZ2whIiUhISEjKiIkIiQiIiEsJCokIiIjIyIiIkYqRitGJ0YoRidGCihGJ0YoRidGJgo=TTdSMApJNVJUQUJMRV9TQVZFLzI0MzIyODAwWCwlKWFueXRoaW5nRzYiNiJbZ2whIiUhISEjJCIkIiIsJCokIiIjIyIiIkYpRipGK0YnRiYKTTdSMApJNVJUQUJMRV9TQVZFLzI0MzIyODAwWCwlKWFueXRoaW5nRzYiNiJbZ2whIiUhISEjJCIkIiIsJCokIiIjIyIiIkYpRipGK0YnRiYKTTdSMApJNVJUQUJMRV9TQVZFLzIxNjg0OTUyWCwlKWFueXRoaW5nRzYiNiJbZ2whIiUhISEjJCIkIiIiIiIsJCokIiIjI0YnRiohIiJGJ0YmCg==TTdSMApJM1JUQUJMRV9TQVZFLzQ0NDU0MFgsJSlhbnl0aGluZ0c2IjYiW2dsISIlISEhIyQiJCIiLCQqJCIiIyMiIiJGKUYqISIiRidGJgo=TTdSMApJNVJUQUJMRV9TQVZFLzIyNjE1OTIwWCwlKWFueXRoaW5nRzYiNiJbZ2whIiUhISEjJCIkIiIhIiIiIiEiIiJGJgo=TTdSMApJNVJUQUJMRV9TQVZFLzIyNjE1OTIwWCwlKWFueXRoaW5nRzYiNiJbZ2whIiUhISEjJCIkIiIhIiIiIiEiIiJGJgo=