diff options
Diffstat (limited to '3875/CH11/EX11.18/11_18.sce')
| -rw-r--r-- | 3875/CH11/EX11.18/11_18.sce | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/3875/CH11/EX11.18/11_18.sce b/3875/CH11/EX11.18/11_18.sce new file mode 100644 index 000000000..fd7484dc9 --- /dev/null +++ b/3875/CH11/EX11.18/11_18.sce @@ -0,0 +1,18 @@ +clc;
+clear;
+h=1 //x intercept of parallel plane
+k=1 //y intercept of parallel plane
+l=1 //z intercept of parallel plane
+a=0.352 //lattice constant in nm
+tetha=28.5 //Braggs angle in degree
+K_b=1.38*10^-23 //Boltzmann constant in J/K
+H=6.63*10^-34 //Plancks constant in J-s
+m=1.67*10^-27 //mass of nuetron in kg
+
+//calculation
+
+d=(a/sqrt(h^2+k^2+l^2)) //interplanar distance in nm
+lambda=2*d*sind(28.5) //wavelength in nm
+T=(H^2)/(3*m*K_b*((lambda*10^-9)^2))
+
+mprintf("The effective temperature of neutrons is = %d K",T)
|