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

---
 623/CH27/EX5.5.18/U5_C5_18.sce | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100755 623/CH27/EX5.5.18/U5_C5_18.sce

(limited to '623/CH27/EX5.5.18/U5_C5_18.sce')

diff --git a/623/CH27/EX5.5.18/U5_C5_18.sce b/623/CH27/EX5.5.18/U5_C5_18.sce
new file mode 100755
index 000000000..d9db6f9ad
--- /dev/null
+++ b/623/CH27/EX5.5.18/U5_C5_18.sce
@@ -0,0 +1,14 @@
+//variable initialization
+a=214.6*100;                                                                    //(m-1)
+b=0.6*100;                                                                      //(m-1)
+h=6.6*10^-34;                                                                   //Plank's constant (joule second)
+c=3*10^8;                                                                       //Speed of light (m/s)
+no=1/(%e);                                                                      //number of molecules in state with respect to ground state
+k=1.38*10^-23;                                                                  //Boltzmann constant (J K-1)
+
+//Calculation
+deltaE=h*c*(a-2*b);                                                             //difference in the energies of state 0 and state 1 (J)
+T1=deltaE/k;                                                                    //temperature at which number of molecules in state 1 is 1/e times of state 0 (K)
+T2=deltaE/(k*log(10));                                                          //temperature at which number of molecules in state 1 is 10% of state 0 (K)
+
+printf("n(i) T = %.0f K\n(ii) T = %.0f K",T1,T2);
-- 
cgit