summaryrefslogtreecommitdiff
path: root/3869/CH6/EX6.29/Ex6_29.sce
diff options
context:
space:
mode:
authorprashantsinalkar2018-02-03 11:01:52 +0530
committerprashantsinalkar2018-02-03 11:01:52 +0530
commit7bc77cb1ed33745c720952c92b3b2747c5cbf2df (patch)
tree449d555969bfd7befe906877abab098c6e63a0e8 /3869/CH6/EX6.29/Ex6_29.sce
parentd1e070fe2d77c8e7f6ba4b0c57b1b42e26349059 (diff)
downloadScilab-TBC-Uploads-master.tar.gz
Scilab-TBC-Uploads-master.tar.bz2
Scilab-TBC-Uploads-master.zip
Added new codeHEADmaster
Diffstat (limited to '3869/CH6/EX6.29/Ex6_29.sce')
-rw-r--r--3869/CH6/EX6.29/Ex6_29.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/3869/CH6/EX6.29/Ex6_29.sce b/3869/CH6/EX6.29/Ex6_29.sce
new file mode 100644
index 000000000..804b06217
--- /dev/null
+++ b/3869/CH6/EX6.29/Ex6_29.sce
@@ -0,0 +1,22 @@
+clear
+//
+//
+//
+
+//Variable declaration
+h=1
+k=1
+l=1 //miller indices
+a=0.352 //lattice parameter(nm)
+theta=(28+(30/60))*%pi/180 //angle(radian)
+hp=6.626*10**-34 //plancks constant(Js)
+m=1.67*10**-27 //mass of proton(kg)
+kB=1.38*10**-23 //boltzmann constant
+
+//Calculation
+d=a/sqrt(h**2+k**2+l**2)
+lamda=2*d*sin(theta) //wavelength(nm)
+T=(hp**2)/(3*m*kB*(lamda*10**-9)**2) //effective temperature of neutrons(K)
+
+//Result
+printf("\n effective temperature of neutrons is %0.0f K",T)