summaryrefslogtreecommitdiff
path: root/3845/CH24/EX24.3/Ex24_3.sce
blob: 979530a48c104523a212739a1cc3122a9f1c0c28 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//Example 24.3
rho=1000;//Density of tissue (kg/m^3)
d=0.8*10^-3;//Diameter of cornea (m)
A=%pi*d^2/4;//Area (m^2)
t=0.3*10^-6;//Thickness (m)
V=A*t;//Volume of tissue (m^3)
m=rho*V;//Mass of tissue evaporated (kg)
c=4186;//Specific heat of water (J/kg/K)
delta_T=100-34;//Change in temperature (C)
L_v=2256*10^3;//Latent heat of vaporization of water (J/kg)
Q_tot=m*(c*delta_T+L_v);//Energy absorbed (J)
printf('Total energy absorbed by the tissue = %0.0f*10^-9 kJ',Q_tot/1000/10^-9)
printf('\nDiscussion:')
ave_pow=Q_tot*400;//Average power if there are 400 bursts per second (W)
printf('\nAverage power if there are 400 laser bursts per second = %0.1f mW',ave_pow*1000)
//Answer varies due to round off error
//Openstax - College Physics
//Download for free at http://cnx.org/content/col11406/latest