2 files changed, 55 insertions, 0 deletions
diff --git a/605/CH10/EX10.10/10_10.sce b/605/CH10/EX10.10/10_10.sce
new file mode 100755
index 000000000..5766bfe69
--- /dev/null
+++ b/605/CH10/EX10.10/10_10.sce
@@ -0,0 +1,29 @@
+
+Zs=20
+Zo=50
+ZL=30
+S11=0.45*exp(%i*150*%pi/180)
+S21=0.01*exp(-10*%pi/180*%i)
+S12=2.05*exp(10*%pi/180*%i)
+S22=0.4*exp(-150*%pi/180*%i)
+function x=mod(n)
+    r=real(n)
+    i=imag(n)
+    x=sqrt(r^2+i^2)
+endfunction
+Fs=(Zs-Zo)/(Zs+Zo)
+printf("\nFs=(Zs-Zo)/(Zs+Zo)=%.3f",Fs)
+FL=(ZL-Zo)/(ZL+Zo)
+printf("\nFL=(ZL-Zo)/(ZL-Zo)=%.3f",FL)
+Fin=S11+(S21*S12*FL)/(1-S22*FL)
+disp(Fin,"Fin=")
+Fout=S22+(S21*S12*Fs)/(1-S11*Fs)
+disp(Fout,"Fout=")
+GT=(1-mod(Fs)^2)*mod(S12)^2/mod(1-S11*Fs)^2*(1-mod(FL)^2)/mod(1-Fout*FL)^2
+printf("\nGT=%.4f",GT)
+GP=mod(S12)^2*(1-mod(FL)^2)/mod(1-S22*FL)^2/(1-mod(Fin)^2)
+printf("\nGP=%.4f",GP)
+GA=(1-mod(Fs)^2)/mod((1-S11*Fs))^2*mod(S12)^2/(1-mod(Fout)^2)
+printf("\nGA=%.4f",GA)
+
+printf("\nGT(dB)=%.1f dB\nGP(dB)=%.2f dB\nGA(dB)=%.2f dB",10*log10(GT),10*log10(GP),10*log10(GA))
+\ No newline at end of file
diff --git a/605/CH10/EX10.11/10_11.sce b/605/CH10/EX10.11/10_11.sce
new file mode 100755
index 000000000..f3f56441d
--- /dev/null
+++ b/605/CH10/EX10.11/10_11.sce
@@ -0,0 +1,26 @@
+
+Zo=50
+S11=0.97*exp(-43*%i*%pi/180)
+S12=0.0
+S21=3.39*exp(%i*140*%pi/180)
+S22=0.63*exp(-%i*32*%pi/180)
+FL=0.63*exp(%i*32*%pi/180)
+Fs=0.97*exp(%i*43*%pi/180)
+function x=mod(n)
+    r=real(n)
+    i=imag(n)
+    x=sqrt(r^2+i^2)
+endfunction
+Fin=S11+S12*S21*FL/(1-S22*FL)
+Fout=S22+S21*S12*Fs/(1-S11*Fs)
+GTU=(1-mod(Fs)^2)/mod(1-mod(S11)*mod(Fs))^2*mod(S21)^2*(1-mod(FL)^2)/mod(1-mod(S22)*mod(FL))^2
+printf("\nGTU=%.4f",GTU)
+GP=1/(1-mod(Fin)^2)*mod(S21)^2*(1-mod(FL)^2)/(1-mod(S22)*mod(FL))^2
+printf("\nGP=%.4f",GP)
+GA=(1-mod(Fs)^2)*mod(S21)^2/(1-mod(S11)*mod(Fs))^2/(1-mod(Fout)^2)
+printf("\nGA=%.4f",GA)
+
+
+
+
+