summaryrefslogtreecommitdiff
path: root/1535/CH15/EX15.3/Ch15Ex3.sci
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1535/CH15/EX15.3/Ch15Ex3.sci
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1535/CH15/EX15.3/Ch15Ex3.sci')
-rwxr-xr-x1535/CH15/EX15.3/Ch15Ex3.sci11
1 files changed, 11 insertions, 0 deletions
diff --git a/1535/CH15/EX15.3/Ch15Ex3.sci b/1535/CH15/EX15.3/Ch15Ex3.sci
new file mode 100755
index 000000000..c07746ea6
--- /dev/null
+++ b/1535/CH15/EX15.3/Ch15Ex3.sci
@@ -0,0 +1,11 @@
+// Scilab Code Ex15.3: Page-323 (2010)
+k = 1.38e-023; // Boltzmann constant, J/K
+h = 6.626e-034; // Planck's constant, Js
+theta_E = 1990; // Einstein temperature of Cu, K
+f_E = k*theta_E/h; // Einstein frequency for Cu, K
+printf("\nThe Einstein frequency for Cu = %4.2e Hz", f_E);
+printf("\nThe frequency falls in the near infrared region");
+
+// Result
+// The Einstein frequency for Cu = 4.14e+013 Hz
+// The frequency falls in the near infrared region \ No newline at end of file