A = magic(4);
B = complex (magic(4), magic(4));
[v,l,w] = eig (A,B)

