From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 343/CH1/EX1.64/ex_64.sce | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)
 create mode 100755 343/CH1/EX1.64/ex_64.sce

(limited to '343/CH1/EX1.64/ex_64.sce')

diff --git a/343/CH1/EX1.64/ex_64.sce b/343/CH1/EX1.64/ex_64.sce
new file mode 100755
index 000000000..b5e4e791f
--- /dev/null
+++ b/343/CH1/EX1.64/ex_64.sce
@@ -0,0 +1,27 @@
+R1=8;                          //Assigning values to parameters
+R2=4;
+R3=12;
+R4=12;
+R5=34;
+R6=30;
+R7=30;
+R8=17;
+R9=13;
+V=180;
+R10=R1+R2;
+R11=R8+R9;
+Ra=(R10*R3)/(R3+R4+R10);       //Converting Delta to Star
+Rb=(R3*R4)/(R3+R4+R10);
+Rc=(R10*R4)/(R3+R4+R10);
+Rx=(R6*R7)/(R6+R7+R11);       //Converting Delta to Star
+Ry=(R7*R11)/(R6+R7+R11);
+Rz=(R6*R11)/(R6+R7+R11);
+Rp=R5+Ra+Rx;
+Rm=Rc+Ry;
+Rn=(Rp*Rm)/(Rp+Rm);
+Rth=Rb+Rz+Rn;
+I=V/(Rp+Rc+Rz);
+Vth=Rp*I
+Rl=10;
+Il=Vth/(Rl+Rth);
+disp("Amperes",Il,"Current in 10 Ohm load using Thevenin theorem is")
\ No newline at end of file
-- 
cgit