1 files changed, 9 insertions, 0 deletions
diff --git a/503/CH9/EX9.10/ch9_10.sci b/503/CH9/EX9.10/ch9_10.sci
new file mode 100755
index 000000000..9e6ca1df0
--- /dev/null
+++ b/503/CH9/EX9.10/ch9_10.sci
@@ -0,0 +1,9 @@
+//to calculate max torque and slip, starting torque
+
+clc;
+k=5;    //k=I_s/I_fl
+s_fl=0.04;
+s_max_T=sqrt((s_fl^2*(1-k^2))/((k*s_fl)^2-1));disp(s_max_T,'slip');
+T_max=.5*(s_max_T^2+s_fl^2)/(s_fl*s_max_T);disp(T_max,'max torque(pu)');
+
+T_s=k^2*s_fl;disp(T_s,'starting torque(pu)');
+\ No newline at end of file