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

>    plots[semilogplot]([subs(a=0.5,b=0.5,abs_P_T2),subs(a=1,b=1,abs_P_T2),subs(a=2,b=2,abs_P_T2)],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_T2),subs(a=1,b=1,phi_P_T2),subs(a=2,b=2,phi_P_T2)],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,omega=1,abs_P_T2),subs(a=1,b=1,omega=1,abs_P_T2),subs(a=2,b=2,omega=1,abs_P_T2)]);

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

[Maple Plot]

[Maple Plot]

[1/2, 1/4, 1/11]

[28.64788974, 85.94366926, 208.3482891]