1 files changed, 52 insertions, 0 deletions
diff --git a/3826/CH1/EX1.9/Ex1_9.sce b/3826/CH1/EX1.9/Ex1_9.sce
new file mode 100644
index 000000000..a59c03563
--- /dev/null
+++ b/3826/CH1/EX1.9/Ex1_9.sce
@@ -0,0 +1,52 @@
+//Example 1_9 page no:100
+clc;
+//given
+T = 1400;
+Tl = 1900;
+k = 7.85/1400;
+motor_rpm = 750;
+//calculating load torque
+Tm = Tl - (Tl/1.53);
+slip = k * 660;
+speed = motor_rpm - 35.2;
+disp("After 5s");
+disp(Tm,"the torque at the end of 5s is (in Nm)");
+disp(slip,"the slip is (in rad/s)");
+disp(speed,"the speed is(rpm)");
+Tm = (Tl)-( Tl - 0)*exp(-0.085*10);
+disp("After 10s");
+disp(Tm,"the torque at the end of 10s is (in Nm)");
+slip = k * 1088;
+speed = motor_rpm - 58;
+disp(slip,"the slip is (in rad/s)");
+disp(speed,"the speed is(rpm)");
+T_m = 1088;
+Tm = 280 + ( T_m - 280)*exp(-0.085*15);
+disp("After 15s");
+disp(Tm,"the torque at the end of 15s is (in Nm)");
+slip = k * Tm;
+speed = motor_rpm - 27;
+disp(slip,"the slip is (in rad/s)");
+disp(speed,"the speed is(rpm)");
+Tm = 280 + ( 1088 - 280)*exp(-0.085*30);
+slip = k * 343;
+speed = motor_rpm - 18.4;
+disp("After 30s");
+disp(Tm,"the torque at the end of 30s is (in Nm)");
+disp(slip,"the slip is (in rad/s)");
+disp(speed,"the speed is(rpm)");
+Tm = Tl - (Tl - 280)*exp(-0.085*10)
+slip = k * 1235;
+speed = motor_rpm - 66;
+disp("At the end of this period");
+disp(Tm,"the torque at the end of this period is (in Nm)");
+disp(slip,"the slip is (in rad/s)");
+disp(speed,"the speed is(rpm)");
+Tm = 280 + ( 1235 - 280)*exp(-0.085*30);
+slip = k * Tm;
+speed = motor_rpm - 19;
+disp("At the end of second off-peak period");
+disp(Tm,"the torque at the end of this period is (in Nm)");
+disp(slip,"the slip is (in rad/s)");
+disp(speed,"the speed is(rpm)");
+//the result vary slightly hence values are rounded off in text book