2 files changed, 14 insertions, 0 deletions
diff --git a/24/CH42/EX42.5/Example42_5.sce b/24/CH42/EX42.5/Example42_5.sce
new file mode 100755
index 000000000..00f4390ab
--- /dev/null
+++ b/24/CH42/EX42.5/Example42_5.sce
@@ -0,0 +1,12 @@
+//Given that
+E = 7.0  //in ev
+density = 2*10^28  //density of states 
+V = 2*10^-9  //in m^3
+
+//Sample Problem 42-5
+txt = mopen('Example42_5_result.txt', 'wt')
+mfprintf(txt, '**Sample Problem 42-5**\n')
+P = 0.50
+No = density * P * V
+mfprintf(txt, 'Number of occupied states per eV at 7 ev is equal to %e', No)
+mclose(txt)
+\ No newline at end of file
diff --git a/24/CH42/EX42.5/Example42_5_result.txt b/24/CH42/EX42.5/Example42_5_result.txt
new file mode 100755
index 000000000..618d779df
--- /dev/null
+++ b/24/CH42/EX42.5/Example42_5_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 42-5**
+Number of occupied states per eV at 7 ev is equal to 2.000000e+019
+\ No newline at end of file