summaryrefslogtreecommitdiff
path: root/3745/CH1/EX1.50/Ex1_50.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3745/CH1/EX1.50/Ex1_50.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3745/CH1/EX1.50/Ex1_50.sce')
-rw-r--r--3745/CH1/EX1.50/Ex1_50.sce26
1 files changed, 26 insertions, 0 deletions
diff --git a/3745/CH1/EX1.50/Ex1_50.sce b/3745/CH1/EX1.50/Ex1_50.sce
new file mode 100644
index 000000000..4110c0ef7
--- /dev/null
+++ b/3745/CH1/EX1.50/Ex1_50.sce
@@ -0,0 +1,26 @@
+// Ex 50 Page 395
+
+clc;clear;close;
+// Given
+I12=2000;//A (I12=I1+I2)
+R1=0.04;//ohm
+R2=0.025;//ohm
+rf1=25;//ohm
+rf2=20;//ohm
+E1=440;//V
+E2=420;//V
+
+//E-Vad=V where Vad=I1+V/rf1
+//V*(1+R1/rf1)+R1*I1=E1//eqn(1)
+//V*(1+R2/rf2)-I1*R2=E2-I12*R2// eqn(2)
+A=[(1+R1/rf1),R1;(1+R2/rf2),-R2]; // matrix for solution
+B=[E1;E2-I12*R2];//matrix for solution
+X=A**-1*B;//solution
+V=X(1);//V
+I1=X(2);//A
+I2=I12-I1;//A
+printf("Current for each machine = %.f A & %.f A ",I1,I2)
+Po1=V*I1;//W
+Po2=V*I2;//W
+printf("\n Power output for each machine = %.1f kW & %.1f kW",Po1/1000,Po2/1000)
+//ans in the book are wrong.