summaryrefslogtreecommitdiff
path: root/3556/CH9/EX9.12
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3556/CH9/EX9.12
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3556/CH9/EX9.12')
-rw-r--r--3556/CH9/EX9.12/Ex9_12.sce41
1 files changed, 41 insertions, 0 deletions
diff --git a/3556/CH9/EX9.12/Ex9_12.sce b/3556/CH9/EX9.12/Ex9_12.sce
new file mode 100644
index 000000000..aaa14b1a2
--- /dev/null
+++ b/3556/CH9/EX9.12/Ex9_12.sce
@@ -0,0 +1,41 @@
+clc
+// Fundamental of Electric Circuit
+// Charles K. Alexander and Matthew N.O Sadiku
+// Mc Graw Hill of New York
+// 5th Edition
+
+// Part 2 : AC Circuits
+// Chapter 9 : Sinusoids and Phasors
+// Example 9 - 12
+
+clear; clc; close;
+//
+// Given data
+Vs = complex(50*cosd(0.0000),50*sind(0.0000));
+Z1 = complex(2.0000,-4.0000);
+Z2 = complex(0.0000,4.0000);
+Z3 = complex(8.0000,0.0000);
+Z4 = complex(0.0000,-3.0000);
+Z5 = complex(8.0000,6.0000);
+Z6 = complex(12.0000,0.0000);
+// Delta Network Converted to Y Network
+Ztot1 = Z1 + Z2 + Z3;
+Zan = (Z1*Z2)/Ztot1
+Zbn = (Z2*Z3)/Ztot1
+Zcn = (Z1*Z3)/Ztot1
+// Calculations Zp1 and Zp2
+Zp1 = (Zbn + Z4);
+Zp2 = Zcn + Z5;
+// Calculations Ztot
+Zp = (Zp1*Zp2)/(Zp1+Zp2);
+Ztot = Z6 + Zan + Zp;
+Ztot_mag = norm(Ztot);
+Ztot_angle = atand(imag(Ztot),real(Ztot));
+// Calculations I
+I = Vs/Ztot;
+I_mag = norm(I);
+I_angle = atand(imag(I),real(I));
+//
+disp("Example 9-12 Solution : ");
+printf(" \n I_mag = Magnitude of I = %.3f A",I_mag)
+printf(" \n I_angle = Angle of I = %.3f degree",I_angle)