1 files changed, 14 insertions, 0 deletions
diff --git a/635/CH1/EX1.4/Ch01Ex4.sci b/635/CH1/EX1.4/Ch01Ex4.sci
new file mode 100755
index 000000000..0fe424fc6
--- /dev/null
+++ b/635/CH1/EX1.4/Ch01Ex4.sci
@@ -0,0 +1,14 @@
+// Scilab Code Ex 1.4 Lattice constant of a unit cell: Page-9 (2010)
+M = 58.5;        // Atomic weight of NaCl, gram per mole
+d = 2180D+03;    // Density of rock salt, per metre cube
+n = 4;    // No. of atoms per unit cell for an fcc lattice of NaCl crystal
+N = 6.023D+23;    // Avogadro's No.
+// Volume of the unit cell is given by
+// a^3 = M*n/(N*d)
+// Solving for a
+a = (n*M/(d*N))^(1/3);    // Lattice constant of unit cell of NaCl
+disp (a/1D-10, "Lattice constant for the rock salt (NaCl) crystal, in angstrom, is : ");
+
+// Result 
+// Lattice constant for the rock salt (NaCl) crystal, in angstrom, is :
+// 5.6275
+\ No newline at end of file