1 files changed, 12 insertions, 0 deletions
diff --git a/1109/CH6/EX6.3/6_3.sce b/1109/CH6/EX6.3/6_3.sce
new file mode 100755
index 000000000..fde3ac15b
--- /dev/null
+++ b/1109/CH6/EX6.3/6_3.sce
@@ -0,0 +1,12 @@
+clear;
+clc;
+Zo=50;f=300*(10^6);ZR=50+(%i*50);
+lo=300/(f*(10^-6)); //where f is in megahertz ,lo=wavelength of wave in air
+K=(ZR-Zo)/(ZR+Zo);
+ampK=sqrt((real(K)^2)+(imag(K)^2));
+S=(1+ampK)/(1-ampK);
+printf("-VSWR = %f\n",round(S*100)/100);
+phi=atan(imag(K)/real(K));
+ymax=phi*lo/(2*2*%pi);
+ymin=ymax+(lo/4);
+printf("-Position of voltage minimum nearest load = %f metres",round(ymin*10000)/10000);