summaryrefslogtreecommitdiff
path: root/3845/CH24/EX24.3
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3845/CH24/EX24.3
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3845/CH24/EX24.3')
-rw-r--r--3845/CH24/EX24.3/Ex24_3.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/3845/CH24/EX24.3/Ex24_3.sce b/3845/CH24/EX24.3/Ex24_3.sce
new file mode 100644
index 000000000..979530a48
--- /dev/null
+++ b/3845/CH24/EX24.3/Ex24_3.sce
@@ -0,0 +1,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
+