blob: c07746ea69e9cd0666a9397af940f7657ed83d83 (
plain)
1
2
3
4
5
6
7
8
9
10
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
|
