1 files changed, 11 insertions, 0 deletions
diff --git a/1871/CH10/EX10.1/Ch010Ex1.sce b/1871/CH10/EX10.1/Ch010Ex1.sce
new file mode 100755
index 000000000..ea506792f
--- /dev/null
+++ b/1871/CH10/EX10.1/Ch010Ex1.sce
@@ -0,0 +1,11 @@
+// Scilab code Ex10.1 : Pg:405 (2008)
+clc;clear;
+E = 1000;    // Electric field applied to sodium chloride crystal, V/m
+P = 4.3e-008;    // Polarization, Coulomb per meter square
+epsilon_0 = 8.85e-012;    // Permittivity of free space, force per meter
+// Since P = epsilon_0*(epsilon_r-1)*E, solving for epsilon_r
+epsilon_r = 1 + P/(epsilon_0*E);    // Relative permittivity of sodium chloride
+printf("\nThe relative permittivity of sodium chloride = %4.2f ", epsilon_r);
+
+// Result 
+// The relative permittivity of sodium chloride = 5.86  
+\ No newline at end of file