summaryrefslogtreecommitdiff
path: root/3760/CH6/EX6.28/Ex6_28.sce
blob: 3132bc6360cff7c84f7e34ad1fedb95cc81e62e8 (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
40
41
42
43
44
45
46
clc;
f=50;
V=440;
P=4;
N=1490; //Rated speed
N1=1600; //New Speed

Ns=(120*f)/P;
s=(Ns-N)/Ns;
//With neglecting resistances and leakage reactances
//Torque is directly proportional to s/(fr2)
//Appllying the condition for same torque we get
//a=s/f
a=(s/f);
//Ns/s=b
b=120/P;
//s=(Ns-N1)/Ns
//Using above equation we get equation (f*f)-7500f-400000
Q=[1 -7500 400000]
R=roots(Q);
f1=R(2);
mprintf('Value of new Frequency is %f Hz',f1);