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

---
 3813/CH4/EX4.20/Ex4_20.sce | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100644 3813/CH4/EX4.20/Ex4_20.sce

(limited to '3813/CH4/EX4.20/Ex4_20.sce')

diff --git a/3813/CH4/EX4.20/Ex4_20.sce b/3813/CH4/EX4.20/Ex4_20.sce
new file mode 100644
index 000000000..735e05895
--- /dev/null
+++ b/3813/CH4/EX4.20/Ex4_20.sce
@@ -0,0 +1,28 @@
+//Electric Drives:concepts and applications by V.subrahmanyam
+//Publisher:Tata McGraw-Hill 
+//Edition:Second 
+//Ex4_20
+clc;
+clear;
+R=0.05;// Resistance in ohm
+N0=1000;//Speed in rpm
+Rf=46;// Resistance in ohm
+I1=75;//Current in A
+I2=150;//Current in A
+I3=250;//Current in A
+V=230;// voltage in V
+Eb=230;//Back emf in V
+If=V/Rf;
+Ia1=I1-If;
+Eb1=V-(Ia1*R);
+N1=(Eb1/Eb)*N0;
+disp(N1,"The speed N1 in rpm is:")
+Ia2=I2-If;
+Eb2=V-(Ia2*R);
+N2=(Eb2/Eb)*N0;
+disp(N2,"The speed N2 in rpm is:")
+Ia3=I3-If;
+Eb3=V-(Ia3*R);
+N3=(Eb3/Eb)*N0;
+disp(N3,"The speed N3 in rpm is:")
+
-- 
cgit