From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 1271/CH18/EX18.13/13.txt           |  5 +++++
 1271/CH18/EX18.13/example18_13.sce | 16 ++++++++++++++++
 2 files changed, 21 insertions(+)
 create mode 100755 1271/CH18/EX18.13/13.txt
 create mode 100755 1271/CH18/EX18.13/example18_13.sce

(limited to '1271/CH18/EX18.13')

diff --git a/1271/CH18/EX18.13/13.txt b/1271/CH18/EX18.13/13.txt
new file mode 100755
index 000000000..e4757a78d
--- /dev/null
+++ b/1271/CH18/EX18.13/13.txt
@@ -0,0 +1,5 @@
+# PROBLEM 13 # 
+Standard formula used 
+   Chi = mu_0*N*M^2 /(3*k*t) 
+
+ Susceptibility is 5.642285e-07
diff --git a/1271/CH18/EX18.13/example18_13.sce b/1271/CH18/EX18.13/example18_13.sce
new file mode 100755
index 000000000..eb8a2cabf
--- /dev/null
+++ b/1271/CH18/EX18.13/example18_13.sce
@@ -0,0 +1,16 @@
+clc 
+// Given that 
+N = 6.5e25 // no. of atom per m^3
+T = 300 // room temperature in K
+mu_ = 4 * %pi * 1e-7 // magnetic permittivity of space
+k = 1.38e-23 // Boltzmann's constant in J/K
+m = 9.1e-31 // mass of electron in kg
+e = 1.6e-19 // charge in an electron in C
+h = 6.62e-34 // Planck constant in J sec
+// Sample Problem 13 on page no. 18.25
+printf("\n # PROBLEM 13 # \n")
+printf("Standard formula used \n ")
+printf("  Chi = mu_0*N*M^2 /(3*k*t) \n")
+M = (e * h) / (4 * %pi * m)
+X = (mu_ * N * M^2) / (3 * k * T)
+printf("\n Susceptibility is %e",X)
-- 
cgit