blob: 7a422f62b0740e42766bc3dd69660ae7242d3b40 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
clc,clear
printf('Example 4.20\n\n')
V=10 //secondary voltage
P=400*10^3 //power drawn in watts
phi=acos(0.6) //power factor angle
I= P/(V*cos(phi)) //secondary current
Z=V/I //impedance of secondary circuit
R=Z*cos(phi) //resistance of secondary circuit when hearth is full
X=Z*sin(phi) //reactance of secondary circuit
//x is ratio of height of charge to full hearth
//Heat produced will be maximum when resistance of secondary circuit equals reactance ; i.e. when R/x= X
x=R/X
printf('Height of charge should be %.2f times height of hearth to obtain maximum heat',x)
|