initial commit / add all books

1 files changed, 20 insertions, 0 deletions

diff --git a/25/CH11/EX11.5/11_5.sce b/25/CH11/EX11.5/11_5.sce
new file mode 100755
index 000000000..792860837
--- /dev/null
+++ b/25/CH11/EX11.5/11_5.sce
@@ -0,0 +1,20 @@
+//example:-11.5,page no.-617.

+//program to determine the stability of the transistor by calculating k and |delta|.

+s11=0.894*expm(%i*(-60.6)*%pi/180);

+s21=3.122*expm(%i*(123.6)*%pi/180);

+s12=0.02*expm(%i*(62.4)*%pi/180);

+s22=0.781*expm(%i*(-27.6)*%pi/180);

+delta=(s11*s22)-(s12*s21);

+[mag_delta,theta_delta]=polar(delta);

+k=(1+(abs(delta)^2)-(abs(s11)^2)-(abs(s22)^2))/(2*abs(s12*s21));

+Cl=conj(s22-delta*conj(s11))/(abs(s22)^2-abs(delta)^2);

+[mag_Cl,theta_Cl]=polar(Cl);

+Rl=abs(s12*s21)/(abs(s22)^2-abs(delta)^2);

+Cs=conj(s11-delta*conj(s22))/(abs(s11)^2-abs(delta)^2);

+[mag_Cs,theta_Cs]=polar(Cs);

+Rs=abs(s12*s21)/(abs(s11)^2-abs(delta)^2);

+disp([mag_Cl,theta_Cl])

+disp([mag_Cs,theta_Cs])

+disp(Rl)

+disp(Rs)

+disp("NOTE:-theta is in radian")
\ No newline at end of file