blob: 353b3166ce05b8abfd240d5802c4044be4d97421 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
clc,clear
printf('Example 4.22\n\n')
P=200//power absorbed in watts
phi=acos(0.05) //power factor angle
f=3*10^6 //supply frequency in hertz
k_0=8.854*10^-12 //permittivity of free space
k=5 //relative permittivity of material
A=1500*10^-6 //Area of slab
t=20*10^-3 //thickness of insulating material
C=k_0*k*A/t //capacitance of capacitor formed
V=sqrt(P/(2*%pi*f*C*cos(phi))) //voltage required
printf('Voltage required for heating = %.0f V',V)
I=P/(V*cos(phi)) //current flowing through material
printf('\nCurrent flowing through material = %.1f A',I)
printf('\n\nWARNING :Answers may not match due to rounding off')
|
