summaryrefslogtreecommitdiff
path: root/3363/CH2/EX2.4
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /3363/CH2/EX2.4
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '3363/CH2/EX2.4')
-rwxr-xr-x3363/CH2/EX2.4/EX2_4.sce27
1 files changed, 27 insertions, 0 deletions
diff --git a/3363/CH2/EX2.4/EX2_4.sce b/3363/CH2/EX2.4/EX2_4.sce
new file mode 100755
index 000000000..682bc7ebc
--- /dev/null
+++ b/3363/CH2/EX2.4/EX2_4.sce
@@ -0,0 +1,27 @@
+//Example 2.4, page 57
+clc
+disp('Part a')
+h=6.63*10^-34//Joule-sec
+c=3*10^8//m/sec
+m_o=9.11*10^-31//in kg
+
+delta_h=(h*(1-cosd(90)))/(m_o*c)
+printf("\n Compton shift is %e m",delta_h)
+disp('Part b')
+delta1=1*10^-10
+K=(h*c*delta_h)/(delta1*(delta1+delta_h))
+printf("\n X-ray beam is %e Joule",K)
+delta2=1.88*10^-12
+K=(h*c*delta_h)/(delta2*(delta2+delta_h))
+printf("\n X-ray beam is %e Joule",K)
+disp('Part c')
+E1=(h*c)/delta1
+E1_ev=(6.241509*10^18)*E1
+printf("\n X-ray energy is %f ev",E1_ev)
+E2=(h*c)/delta2
+E2_ev=(6.241509*10^18)*E2
+printf("\n X-ray energy is %f ev",E2_ev)
+Per1=(100*.295*10^3)/E1_ev
+Per2=(100*378*10^3)/E2_ev
+printf("\n Energy lost in percentage %f ",Per1)
+printf("\n Energy lost in percentage %f ",Per2)