1 files changed, 14 insertions, 0 deletions
diff --git a/377/CH14/EX14.4/14_4.sce b/377/CH14/EX14.4/14_4.sce
new file mode 100644
index 000000000..589c488ae
--- /dev/null
+++ b/377/CH14/EX14.4/14_4.sce
@@ -0,0 +1,14 @@
+disp("φs=χsi+(Eg/(2*q))+(Ev-Ef)");
+k=0.026;  //say k=K*T/q
+ni=10^10;
+Na=10^17;
+a=4.05;  //say a=χsi
+b=0.56;  //say b=Eg/(2*q)
+c=k*log(Na/ni);  //say c=Ev-Ef
+printf('\n The value of Ev-Ef is %fV',c);
+d=a+b+c;  //say d=φs
+printf('\n The value of φs is %fV\n',d);
+disp("φms=φm-φs");
+f=4.1;  //say f=φm
+g=f-d;  //say g=φms
+printf('\n The value of φms is %1.2fV\n',g);
+\ No newline at end of file