diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /2078/CH6/EX6.6 | |
download | Scilab-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-x | 2078/CH6/EX6.6/Example6_6.sce | 22 |
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.
|