The complete question is to evaluate quantum battery capacity. It comes from
https://journals.aps.org/pra/abstract/10.1103/PhysRevA.109.042424
syms c1 c2 c3 I_2 I_4 sigma_1 sigma_2 sigma_3 sigma_11 sigma_22 sigma_33;
syms e_A e_B;
assume(abs(c1) >= abs(c2));
assumeAlso(abs(c2) >= abs(c3));
assume(e_A >= e_B);
assumeAlso(e_B >= 0);
%defining matrices
I_2 = [1,0;0,1];
sigma_1 = [0,1;1,0];
sigma_2 = [0,-1i;1i,0];
sigma_3 = [1,0;0,-1];
I_4=kron(I_2,I_2);
sigma_11 = kron(sigma_1,sigma_1);
sigma_22 = kron(sigma_2,sigma_2);
sigma_33 = kron(sigma_3,sigma_3);
%defining QState
rho_AB=(1/4).*(I_4+c1.*sigma_11+c2.*sigma_22+c3.*sigma_33)
%evaluating eigenvalues of QState
e_AB = eig(rho_AB)
%defining Hamiltonian
sigma_3_I_2 = kron(sigma_3,I_2);
I_2_sigma_3 = kron(I_2,sigma_3);
H_AB = e_A.*sigma_3_I_2 + e_B.*I_2_sigma_3
rho = rho_AB;
H = H_AB;
seig_rho = sort(simplify(eig(rho)))
n_rho = numel(seig_rho);
seig_H = sort(simplify(eig(H)))
%defining Quantum Bttery Capaity: C_rho_H = \sum_i(e_H(i)*(e_rho(i)-e_rho(n+1-i)))
c = @(x,y) (x.*y);
for i=1:1:n_rho
di_eig(i) = seig_rho(i)-seig_rho(n_rho+1-i);
C(i) = c(seig_H(i),di_eig(i));
end
C_rho_H = sum(C)
C_rho_H = simplify(sum(C))
%The correct answer should be
% C_rho_H = (|c1|+|c2|)(e_A+e_B)+(|c1|-|c2|)(e_A-e_B)