summaryrefslogtreecommitdiff
path: root/3492/CH7/EX7.7/Ex7_7.sce
blob: 20a8a0f8c5302f01e246e5f76d5ad447fd19f98a (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
28
29
30
31
32
clc
//Chapter7
//Ex_7
//Given
//at 60 Hz
f=60 //Hz
E=100*10^3*10^2 //in V/m
//values taken from table 7.3
epsilon_o=8.85*10^-12 //in F/m
epsilon_r_HLPE=2.3
epsilon_r_Alumina=8.5
//let x=tan(delta)
x_HLPE=3*10^-4
x_Alumina=1*10^-3
W_vol_HLPE=2*%pi*f*E^2*epsilon_o*epsilon_r_HLPE*x_HLPE //in W/m3
W_vol_HLPE=W_vol_HLPE/10^3 //in mW/cm3
disp(W_vol_HLPE,"Heat dissipated per unit volume of HLPE at 60 Hz in mW/cm3 is")
W_vol_Alumina=2*%pi*f*E^2*epsilon_o*epsilon_r_Alumina*x_Alumina
W_vol_Alumina=W_vol_Alumina/10^3 //in mW/cm3
disp(W_vol_Alumina, "Heat dissipated per unit volume of Alumina at 60 Hz in mW/cm3 is")
//at 1 MHz
f=10^6 //Hz
x_HLPE=4*10^-4
x_Alumina=1*10^-3
W_vol_HLPE=2*%pi*f*E^2*epsilon_o*epsilon_r_HLPE*x_HLPE //in W/m3
W_vol_HLPE=W_vol_HLPE/10^6 //in W/cm3
disp(W_vol_HLPE,"Heat dissipated per unit volume of HLPE at 1 MHz in mW/cm3 is")
W_vol_Alumina=2*%pi*f*E^2*epsilon_o*epsilon_r_Alumina*x_Alumina
W_vol_Alumina=W_vol_Alumina/10^6 //in W/cm3
disp(W_vol_Alumina, "Heat dissipated per unit volume of Alumina at 1 MHz in mW/cm3 is")
disp("The heats at 60Hz are small comparing to heats at 1MHz")