diff options
Diffstat (limited to '3014/CH3/EX3.11/Ex3_11.sce')
| -rwxr-xr-x | 3014/CH3/EX3.11/Ex3_11.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/3014/CH3/EX3.11/Ex3_11.sce b/3014/CH3/EX3.11/Ex3_11.sce new file mode 100755 index 000000000..97855a53c --- /dev/null +++ b/3014/CH3/EX3.11/Ex3_11.sce @@ -0,0 +1,12 @@ + clc
+//given that
+lambda = 1 //wavelength in angstrom
+h = 6.62e-34 // Planks constant
+m_e = 9.1e-31 // mass of electron in kg
+c = 3e8 // speed of light in m/sec
+theta = 90 // angle for longest passing wavelength
+printf("Example 3.11")
+d_lambda= h*(1-cos(theta*%pi/180))/(m_e*c) // calculation of wavelength shift
+
+printf("\nWavelength shift is %f angstrom. \n\n\n",d_lambda*1e10)
+
|