1 files changed, 13 insertions, 0 deletions
diff --git a/3669/CH8/EX8.14/14.sce b/3669/CH8/EX8.14/14.sce
new file mode 100644
index 000000000..be3466179
--- /dev/null
+++ b/3669/CH8/EX8.14/14.sce
@@ -0,0 +1,13 @@
+
+//Variable declaration
+Kb=1.38*10**-23;    //boltzmann constant
+T1=300;    //temperature(K)
+T2=320;    //temperature(K)
+rho1=5;    //resistivity(ohm m)
+rho2=2.5;    //resistivity(ohm m)
+e=1.6*10**-19; 
+//Calculation
+Eg=2*Kb*log(rho1/rho2)/((1/T1)-(1/T2));     //energy gap(J)
+
+//Result
+printf('energy gap is %0.3f   eV  \n',(Eg/e))