summaryrefslogtreecommitdiff
path: root/1445/CH1/EX1.57/ch1_ex_57.sce
diff options
context:
space:
mode:
Diffstat (limited to '1445/CH1/EX1.57/ch1_ex_57.sce')
-rw-r--r--1445/CH1/EX1.57/ch1_ex_57.sce33
1 files changed, 33 insertions, 0 deletions
diff --git a/1445/CH1/EX1.57/ch1_ex_57.sce b/1445/CH1/EX1.57/ch1_ex_57.sce
new file mode 100644
index 000000000..56df93750
--- /dev/null
+++ b/1445/CH1/EX1.57/ch1_ex_57.sce
@@ -0,0 +1,33 @@
+//CHAPTER 1- D.C. CIRCUIT ANALYSIS AND NETWORK THEOREMS
+//Example 57
+
+disp("CHAPTER 1");
+disp("EXAMPLE 57");
+
+//VARIABLE INITIALIZATION
+v=10; //voltage source in Ohms
+r1=2; //RHS resistance in Ohms
+r2=2; //in Ohms
+r3=4; //in Ohms
+r4=4; //in Ohms
+I=20; //current source in Amperes
+
+//SOLUTION
+
+r=r1+r2;
+//deactivating voltage source of 10Ω
+v1=-I/((1/r)+(1/r3)+(1/r4)); //from equation
+I1=v1/r3;
+
+//deactivating current source of 20A
+v2=(v/r)/((1/r)+(1/r3)+(1/r4));
+I2=v2/r3;
+
+I_tot=I1+I2;
+if(I_tot>0)
+disp(sprintf("The value of I is %f A (upward)",I_tot));
+else
+disp(sprintf("The value of I is %f A (downward)",-I_tot));
+
+//END
+