summaryrefslogtreecommitdiff
path: root/1628/CH13/EX13.8/Ex13_8.sce
blob: 7ddcac1eeb226d05b8a1290b18c450897ea7a9f6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23


                       // Example  13.8

                        // We Know that Pi= Ph+ Pe=( Af+ Bf^2 )
                        // there for at 60Hz   100= 60A+ 3600B
                        //           at 40Hz   60 = 40A+ 1600B
                        // After Solving Equation We have 
A=1.167;                // Alphabet for Simlicity
B=0.00834;              // Alphabet for Simlicity
f=50;                   // Frequency
Ph=A*f;                 // Hysteresis Loss
disp('Hysteresis Loss ( at 50 Hz ) = '+string(Ph)+' Watt');

Pe=B*f^2;               // Eddy-Current Loss
disp('Eddy-Current Loss ( at 50 Hz ) = '+string(Pe)+' Watt');






                  //   p 495       13.8