1 files changed, 12 insertions, 0 deletions
diff --git a/1370/CH5/EX5.1/exp5_1.sce b/1370/CH5/EX5.1/exp5_1.sce
new file mode 100755
index 000000000..8a279f63b
--- /dev/null
+++ b/1370/CH5/EX5.1/exp5_1.sce
@@ -0,0 +1,12 @@
+//Example 5.1
+clc
+disp("Given values are,")
+disp("P = 4, f = 50 Hz,  N = 1410 r.p.m")
+ns=(120*50)/4
+disp(ns,"N_s(in r.p.m) = 120*f / P =")
+disp("Full load absolute slip is given by,")
+s=((1500-1410)/1500)
+format(5)
+disp(s,"s = N_s-N / N_s =")
+s=0.06*100
+disp(s,"Therefore,  %s =")