Závislosti pro a=b=0.5, 1 a 2

>	plots[semilogplot]([subs(a=0.5,b=0.5,abs_P_T),subs(a=1,b=1,abs_P_T),subs(a=2,b=2,abs_P_T)],omega=0.1..10,color=[blue,red,green],legend=["a=b=0.5","a=b=1","a=b=2"],thickness=2);

>	plots[semilogplot]([subs(a=0.5,b=0.5,phi_P_T),subs(a=1,b=1,phi_P_T),subs(a=2,b=2,phi_P_T)],omega=0.1..10,color=[blue,red,green],legend=["a=b=0.5","a=b=1","a=b=2"],thickness=2);

>	simplify([subs(a=1/2,b=1/2,subs(omega=1/sqrt(a*b),abs_P_T)),subs(a=1,b=1,subs(omega=1/sqrt(a*b),abs_P_T)),subs(a=2,b=2,subs(omega=1/sqrt(a*b),abs_P_T))]);

>	evalf(180/Pi*[subs(a=0.5,b=0.5,SR_phi_T),subs(a=1,b=1,SR_phi_T),subs(a=2,b=2,SR_phi_T)]);