summaryrefslogtreecommitdiff
path: root/3835/CH6/EX6.2/Ex6_2.sce
blob: 5dc410b60510f21b41831e7cce1177d8bb977043 (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
clear
//
//given
e=3300
f=50
n1=600
n2=80
bm=1.2
h=425
l=1.6
density=7400
loss=1.5
//case a
phym=e/(4.44*f*n1)
csa=phym/bm
printf("\n cross sectional area= %e  m2",csa)
//case b
sv=(e*n2)/n1
printf("\n secondary voltage on no load= %0.1f  V",sv)
//case c
mc=(h*l)/n1
printf("\n primary magnetising current= %0.1f  A",mc)
//case d
v=l*csa
m=v*density
closs=m*loss
printf("\n core loss= %0.1f  W",closs)