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

---
 1892/CH1/EX1.26/Example1_26.sce | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100755 1892/CH1/EX1.26/Example1_26.sce

(limited to '1892/CH1/EX1.26')

diff --git a/1892/CH1/EX1.26/Example1_26.sce b/1892/CH1/EX1.26/Example1_26.sce
new file mode 100755
index 000000000..f073bbe07
--- /dev/null
+++ b/1892/CH1/EX1.26/Example1_26.sce
@@ -0,0 +1,21 @@
+// Example 1.26
+
+clear; clc; close;
+format('v',7);
+// Given data
+f=50;//in Hz
+P=4;//no. of poles
+X2=0.1;//in ohm
+R2=0.02;//in ohm
+//Tst=2/3*Tmax
+TstByTm=2/3;//ratio
+
+//Calculations
+disp("Tst proportional to E2^2*R2dash/(R2dash^2+X2^2)");
+disp("Tm proportional to E2^2/(2*X2)");
+//formula : TstByTm=(E2^2*R2dash/(R2dash^2+X2^2))/(E2^2/(2*X2))
+P=[TstByTm -2*X2 TstByTm*X2^2];//Polynomial for R2dash
+R2dash=roots(P);//
+R2dash=R2dash(2);//discarding higher value bcoc R2dash < X2
+Rex=R2dash-R2;//in ohm
+disp(Rex,"Extra resistance required in ohm : ");
-- 
cgit