summaryrefslogtreecommitdiff
path: root/2078/CH6/EX6.6
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2078/CH6/EX6.6
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 '2078/CH6/EX6.6')
-rwxr-xr-x2078/CH6/EX6.6/Example6_6.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/2078/CH6/EX6.6/Example6_6.sce b/2078/CH6/EX6.6/Example6_6.sce
new file mode 100755
index 000000000..ca823ecdd
--- /dev/null
+++ b/2078/CH6/EX6.6/Example6_6.sce
@@ -0,0 +1,22 @@
+//Exa 6.6
+clc;
+clear;
+close;
+format('v',8);
+//Given data :
+A=0.945*expm(%i*1.02*%pi/180);//Auxiliary constant
+D=A;//Auxiliary constant
+B=82.3*expm(%i*73.03*%pi/180);//ohm//Auxiliary constant
+C=0.001376*expm(%i*90.4*%pi/180);//S//Auxiliary constant
+//part (i)
+Y=C;//S
+Z=2*(A-1)/C;//ohm
+disp("For equivalent T-network : ");
+disp("Shunt admittance in S, magnitude is "+string(abs(Y))+" and angle in degree is "+string(atand(imag(Y),real(Y))));
+disp("Impedance in ohm, magnitude is "+string(abs(Z))+" and angle in degree is "+string(atand(imag(Z),real(Z))));
+disp("For equivalent pi-network : ");
+Z=B;//ohm
+disp("Series Impedance in ohm, magnitude is "+string(abs(Z))+" and angle in degree is "+string(atand(imag(Z),real(Z))));
+Y=2*(A-1)/B;//S
+disp("Shunt admittance in S, magnitude is "+string(abs(Y))+" and angle in degree is "+string(atand(imag(Y),real(Y))));
+//For T-Network Value of Z is wrog in the book.