From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 503/CH9/EX9.12/ch9_12.sci | 26 ++++++++++++++++++++++++++ 1 file changed, 26 insertions(+) create mode 100755 503/CH9/EX9.12/ch9_12.sci (limited to '503/CH9/EX9.12/ch9_12.sci') diff --git a/503/CH9/EX9.12/ch9_12.sci b/503/CH9/EX9.12/ch9_12.sci new file mode 100755 index 000000000..92d922b75 --- /dev/null +++ b/503/CH9/EX9.12/ch9_12.sci @@ -0,0 +1,26 @@ +//find line current and starting torque with direct switching, stator resistance starting, autotransformer starting, star delta starting, autotransformer ratio give 1 pu + +clc; +//I_s/I_fl=6; +s_fl=0.05; +disp('by direct switching'); +Is=6;disp(Is,'line current(pu)'); +T=Is^2*s_fl;disp(T,'torque(pu)'); + +disp('by stator resistance starting'); +Is=2;disp(Is,'line current(pu)'); //given +T=Is^2*s_fl;disp(T,'torque(pu)'); + +disp('by autotransformer starting'); +x=2/6; +Is_motor=2; +Is=Is_motor*x;disp(Is,'line current(pu)'); +T=Is^2*s_fl;disp(T,'torque(pu)'); + +disp('by star delta starting'); +Is=(1/3)*6;disp(Is,'line current(pu)'); +T=Is^2*s_fl*3;disp(T,'torque(pu)'); + +disp('by autotransformer starting'); +Ts=1; +x=sqrt(Ts/((6^2)*s_fl));disp(x,'x'); \ No newline at end of file -- cgit