1 files changed, 14 insertions, 0 deletions
diff --git a/1109/CH6/EX6.19/6_19.sce b/1109/CH6/EX6.19/6_19.sce
new file mode 100755
index 000000000..d744f7e3b
--- /dev/null
+++ b/1109/CH6/EX6.19/6_19.sce
@@ -0,0 +1,14 @@
+clear;
+clc;
+f=150;S=4.48;Ymin=6*(10^-2);
+lo=300/(f); //lo=wavelength
+b=(2*%pi)/lo;
+phi=round(((2*b*Ymin)-%pi)*100)/100;
+phi1=-phi;
+ampK=round(((S-1)/(S+1))*10)/10;
+Ls=(lo/(4*%pi))*(phi1+%pi-round(acos(ampK)));
+printf("Point of attachment = %f cm\n",round(Ls*(10^4))/100);
+Lt=(lo/(2*%pi))*(atan(sqrt(1+(ampK*ampK)))/(2*ampK));
+printf("Length of the stub = %f cm",round(Lt*(10^4))/100);
+//the difference in result  is due to erroneous value in textbook.
+disp("The difference in result is due to erroneous value in textbook")