summaryrefslogtreecommitdiff
path: root/1892/CH1/EX1.7/Example1_7.sce
blob: def6d7ef88e0ab8ae69f26aa6b32e573d4adca1a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
// Example 1.7

clear; clc; close;

format('v',6);
// Given data
P=4;//No. of poles
f=50;//in Hz
Kdash=4;//stator turns by rotor turn
R2=0.01;//in ohm
X2=0.1;//in ohm
E1_line=400;//in volt

//Calculations
K=1/Kdash;//rotor turns by stator turns
Ns=120*f/P;//in rpm
E1ph=E1_line/sqrt(3);//
//Formula : E2ph/E1ph=K
E2ph=E1ph*K;//in volt
//(i) at start S=1
ns=Ns/60;//in rps
K=3/2/%pi/ns;
Tst=K*E2ph^2*R2/(R2^2+X2^2);//in N-m
disp(Tst,"(i) Starting Torque in N-m : ");
//part (ii) 
Sm=R2/X2;//slip for max torque
disp(Sm*100,"(ii) Slip at which max torque devloped in % : ");
//Part (iii)
N=Ns*(1-Sm);//in rpm
disp(N,"(iii) Speed at which max torque occur in rpm : ");
//Part (iv)
Tm=K*E2ph^2/2/X2;//in N-m
disp(Tm,"Maximum  torque in N-m : ");
//Part (v)
Sf=4;//in %
Sf=Sf/100;//slip
Tfl=K*Sf*E2ph^2*R2/(R2^2+(Sf*X2)^2);//in N-m
disp(Tfl,"(v) Full load Torque devloped in N-m : ");