1 files changed, 30 insertions, 0 deletions
diff --git a/1076/CH13/EX19.20/13_20.sce b/1076/CH13/EX19.20/13_20.sce
new file mode 100755
index 000000000..0e03cfbd4
--- /dev/null
+++ b/1076/CH13/EX19.20/13_20.sce
@@ -0,0 +1,30 @@
+clear
+clc
+
+f=50
+G=20
+V=13.2
+H=9
+nP=4
+
+J=G*H
+mprintf("\n(a)Stored Energy = %.0f MJ", J)
+disp("The unit is incorrectly mentioned as "'mJ'' in the textbook.");
+
+Pi= 25*.735
+P=15
+Pa=Pi-P
+M=G*H/(180*f)
+a=Pa/M
+mprintf("\n(b)Acceleration = %.2f elec deg/sec sq",a )
+
+
+c=15
+t=c/f
+dd=.5*a*t*t
+mprintf("\n(c)change in angle = %.2f deg",dd )
+
+A=a * 60 / (180*nP)
+Ns=120*f/nP
+N=Ns+(A*t)
+mprintf("\n(d)New speed = %.3f rpm",fix(N*1000)/1000 )