1 files changed, 15 insertions, 0 deletions
diff --git a/1019/CH6/EX6.7/Example_6_7.sce b/1019/CH6/EX6.7/Example_6_7.sce
new file mode 100644
index 000000000..ed4c8fe09
--- /dev/null
+++ b/1019/CH6/EX6.7/Example_6_7.sce
@@ -0,0 +1,15 @@
+//Example 6.7
+clear;
+clc;
+
+//Given
+NA=6.023*(10^23);//avogadros number
+W=6;//number of orientations
+n=1;//moles present
+N=NA;//number of particles
+R=8.314;//gas constant in J mol^-1 K^-1
+
+//To determine the residual entropy of a crystal in which the molecules can adapt 6 orientations of equal energy at 0 K
+S=R*log(W);//residual entropy in J K^-1 mol^-1
+mprintf('the residual entropy of a crystal in which the molecules can adapt 6 orientations of equal energy at 0 K = %f J K^-1 mol^-1',S);
+//end
+\ No newline at end of file