1 files changed, 25 insertions, 0 deletions
diff --git a/1919/CH11/EX11.11/Ex11_11.sce b/1919/CH11/EX11.11/Ex11_11.sce
new file mode 100755
index 000000000..cbdb095b7
--- /dev/null
+++ b/1919/CH11/EX11.11/Ex11_11.sce
@@ -0,0 +1,25 @@
+
+// Theory and Problems of Thermodynamics
+// Chapter 11
+// Kinetic Theory of Gases
+// Example 11
+
+clear ;clc;
+
+//Given data
+T = 273                 // temperature of oxygen in K
+vis =19.2               // viscosity of oxygen 
+R = 8.314               // gas constant
+N0 = 6.023*1e23         // number of atoms per mole
+M = 32*1e-3             // molar mass of oxygen in kg/mol
+
+// Calculations
+V = (8*R*T/(%pi*M))^0.5         // average velocity of gas molecule
+
+sig = M*V/(N0*vis*(1e-6)*3*(2^0.5))
+
+//sig = 4*%pi*r1^2
+r1 = (sig/(4*%pi))^0.5
+
+// output results
+mprintf('Hard sphere radius of oxygen molecule = %4.2f nm', r1*1e9)