summaryrefslogtreecommitdiff
path: root/25/CH6/EX6.8/6_8.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /25/CH6/EX6.8/6_8.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '25/CH6/EX6.8/6_8.sce')
-rwxr-xr-x25/CH6/EX6.8/6_8.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/25/CH6/EX6.8/6_8.sce b/25/CH6/EX6.8/6_8.sce
new file mode 100755
index 000000000..70d30165d
--- /dev/null
+++ b/25/CH6/EX6.8/6_8.sce
@@ -0,0 +1,11 @@
+// example:-6.8,page no.-316.
+// program to design a three section chebysev transformer.
+Zl=100;Zo=50;taom=0.05;N=3;A=0.05;
+thetam=asec(cosh((1/N)*acosh((1/taom)*abs((Zl-Zo)/(Zl+Zo)))))*(180/%pi);
+x=(cosh((1/N)*acosh((1/taom)*abs((Zl-Zo)/(Zl+Zo)))))
+tao_o=A*(x^3)/2;
+tao_1=(3*A*(x^3-x))/2; // from symmetry tao_3=tao_0;
+Z1=Zo*((1+tao_o)/(1-tao_o));
+Z2=Z1*((1+tao_1)/(1-tao_1));
+Z3=Zl*((1-tao_o)/(1+tao_o));
+disp(Z1,Z2,Z3,'the characteristic impedences are = ') \ No newline at end of file