From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 1445/CH1/EX1.36/ch1_ex_36.sce | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)
 create mode 100644 1445/CH1/EX1.36/ch1_ex_36.sce

(limited to '1445/CH1/EX1.36')

diff --git a/1445/CH1/EX1.36/ch1_ex_36.sce b/1445/CH1/EX1.36/ch1_ex_36.sce
new file mode 100644
index 000000000..2b032eb5b
--- /dev/null
+++ b/1445/CH1/EX1.36/ch1_ex_36.sce
@@ -0,0 +1,30 @@
+//CHAPTER 1- D.C. CIRCUIT ANALYSIS AND NETWORK THEOREMS 
+//Example 36
+
+disp("CHAPTER 1");
+disp("EXAMPLE 36");
+
+//VARIABLE INITIALIZATION
+I=10;                              //current source in Amperes
+v=10;                              //voltage source in Volts
+r1=4;                              //top resistance in Ohms
+r2=4;                              //right resistance in Ohms
+r3=4;                              //bottom resistance in Ohms
+r4=6;                              //left resistance in Ohms
+r5=1;                              //in Ohms
+
+//SOLUTION
+//(1)v1+(12/5)In=30........eq (1)
+//(2)v1+(-4)In=10..........eq (2)
+A=[1 12/5;2 -4];
+b=[30;10];
+x=inv(A)*b;
+v1=x(1,:);                          //to access the 1st element of 2X1 matrix 
+In=x(2,:);                          //to access the 2nd element of 2X1 matrix
+req1=(r1*r4)/(r1+r4);
+req2=(r2*r3)/(r2+r3);
+rn=req1+req2;
+I1=(rn*In)/(rn+r5); 
+disp(sprintf("By Norton Theorem, the current through 1Ω resistor is %f A",I1));
+
+//END
-- 
cgit