diff options
Diffstat (limited to '623/CH2/EX2.1.9/U2_C1_9.sce')
| -rwxr-xr-x | 623/CH2/EX2.1.9/U2_C1_9.sce | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/623/CH2/EX2.1.9/U2_C1_9.sce b/623/CH2/EX2.1.9/U2_C1_9.sce new file mode 100755 index 000000000..09c1a1436 --- /dev/null +++ b/623/CH2/EX2.1.9/U2_C1_9.sce @@ -0,0 +1,8 @@ +//variable initialization
+lembda_c=0.024 //Compton wavelength of electron (Å)
+Theta=(45*%pi)/180; //Scattering angle (radian)
+
+//Calculation of wavelength of incident photon
+lembda=lembda_c*(1-cos(Theta)); //Wavelength of incident photon (Å)
+
+printf("\n(a) Wavelength of incident photon = %.4f Å\n(b) Photon lies in the gamma ray spectrum",lembda);
|