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

---
 1367/CH6/EX6.1/6_1.sce | 15 +++++++++++++++
 1 file changed, 15 insertions(+)
 create mode 100755 1367/CH6/EX6.1/6_1.sce

(limited to '1367/CH6/EX6.1/6_1.sce')

diff --git a/1367/CH6/EX6.1/6_1.sce b/1367/CH6/EX6.1/6_1.sce
new file mode 100755
index 000000000..ee12dfcf2
--- /dev/null
+++ b/1367/CH6/EX6.1/6_1.sce
@@ -0,0 +1,15 @@
+//Find No. of Frenkel defect
+//Ex:6.1
+clc;
+clear;
+close;
+na=6.023*10^23;//Avagadro's no.
+p=3170;//density in kg/m^3
+mw=7.9*10^-2;//molecular weight of CaF2
+nl=na*p/mw;//calcium ions/cubic m
+ni=2*nl;// /cubic m
+t=1300;//in K
+ef=2.7*1.6*10^-19;//energy of formation of one frenkel defect
+k=1.38*10^-23;//boltzmann constant
+nf=sqrt(nl*ni)*exp(-ef/(2*k*t));//in /cubic m
+disp(nf,"No. of Frenkel defect per unit volume of Calcium Fluoride (in /m^3) = ");
\ No newline at end of file
-- 
cgit