summaryrefslogtreecommitdiff
path: root/1445/CH1/EX1.7/ch1_ex_7.sce
diff options
context:
space:
mode:
Diffstat (limited to '1445/CH1/EX1.7/ch1_ex_7.sce')
-rw-r--r--1445/CH1/EX1.7/ch1_ex_7.sce43
1 files changed, 43 insertions, 0 deletions
diff --git a/1445/CH1/EX1.7/ch1_ex_7.sce b/1445/CH1/EX1.7/ch1_ex_7.sce
new file mode 100644
index 000000000..f6f477eeb
--- /dev/null
+++ b/1445/CH1/EX1.7/ch1_ex_7.sce
@@ -0,0 +1,43 @@
+//CHAPTER 1- D.C. CIRCUIT ANALYSIS AND NETWORK THEOREMS
+//Example 7
+
+disp("CHAPTER 1");
+disp("EXAMPLE 7");
+
+//VARIABLE INITIALIZATION
+I1=1; //current source in Amperes
+v1=4; //voltage source in Volts
+v2=3; //voltage source in Volts
+v3=6; //voltage source in Volts
+r1=2; //resistance in Ohms
+r2=2; //resistance in Ohms
+r3=1; //resistance in Ohms
+r4=3; //resistance in Ohms
+
+//SOLUTION
+//converting all the voltage sources into current souces
+I2=v1/r1;
+I3=v2/r3;
+I4=v3/r4;
+disp(sprintf("The four current sources are %d A, %d A, %d A and %d A",I1,I2,I3,I4));
+
+req1=(r1*r2)/(r1+r2); // 2Ω and 2Ω are in parallel
+req2=(r3*r4)/(r3+r4); // 3Ω and 1Ω are in parallel
+v2=(I1+I4)*req1;
+v3=(I3-I2)*req2;
+req=req1+req2;
+v=v2+v3;
+I=v/req;
+disp("VOLTAGE EQUIVALENT CIRCUIT:");
+disp(sprintf(" Voltage source= %f V",v));
+disp(sprintf(" Equivalent resistance(in series)= %f Ω",req));
+disp("CURRENT EQUIVALENT CIRCUIT:");
+disp(sprintf(" Current source= %f A",I));
+disp(sprintf(" Equivalent resistance(in parallel)= %f Ω",req));
+
+//END
+
+
+
+
+