summaryrefslogtreecommitdiff
path: root/3760/CH2/EX2.4/Ex2_4.sce
blob: 95272dbf3909495949a0ebeca8df458016972fde (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clc;
l=0.02; // air gap length
i1=20; // intermediate current 
i2=40; // current during armature movement from open to close position
// from fig 2.11
f1=0.04*i1; // flux linkage during open position at A
f2=1.2+0.03*(i1-20); // flux linkage during close position at D
f3=0.04*i2; // flux linkage during open position at B
f4=1.2+0.03*(i2-20); // flux linkage during close position at C
// Mechanical work done=area ODCFEO-area OABFEO
W=((i1*f2)/2)+(((f2+f4)*i1)/2)-((i2*f3)/2); 
fe=W/l;
printf('Average electromagnetic force is %d N',fe);