summaryrefslogtreecommitdiff
path: root/623/CH2/EX2.1.9/U2_C1_9.sce
blob: 09c1a14368558d55fa9c717b0e592b9b4b2f2d1c (plain)
1
2
3
4
5
6
7
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);