summaryrefslogtreecommitdiff
path: root/3556/CH10/EX10.10
diff options
context:
space:
mode:
Diffstat (limited to '3556/CH10/EX10.10')
-rw-r--r--3556/CH10/EX10.10/Ex10_10.sce30
1 files changed, 30 insertions, 0 deletions
diff --git a/3556/CH10/EX10.10/Ex10_10.sce b/3556/CH10/EX10.10/Ex10_10.sce
new file mode 100644
index 000000000..5a0769ad1
--- /dev/null
+++ b/3556/CH10/EX10.10/Ex10_10.sce
@@ -0,0 +1,30 @@
+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 10 : Sinusoidal Steady State Analysis
+// Example 10 - 10
+clear; clc; close;
+
+// Given data
+Z1 = complex(5.0000,0.0000)
+Z2 = complex(20.0000,15.0000)
+I2 = complex(0.0000,8.0000)
+Is = complex(15.0000,0.0000)
+// Calculations Inorton (In)
+I3 = complex(3.0000,0.0000)+ I2;
+In = I3;
+In_mag = norm(In);
+In_angle = atand(imag(In),real(In));
+// Calculation Io
+Io = (Z1/(Z1+Z2))*In;
+Io_mag = norm(Io);
+Io_angle = atand(imag(Io),real(Io))
+//
+// Display the result
+disp("Example 10-10 Solution : ");
+printf(" \n Io_mag = Magnitude of Io = %.3f Volt",Io_mag)
+printf(" \n Io_angle = Angle of Io = %.3f degree",Io_angle)