summaryrefslogtreecommitdiff
path: root/1919/CH11/EX11.7/Ex11_7.sce
blob: 4ef0dbeff6f5a7113924e6fac6ed2efebc025aa3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

// Theory and Problems of Thermodynamics
// Chapter 11
// Kinetic Theory of Gases
// Example 7
clear ;clc;

//Given data
V1 = 1                  // X-component velocity low range
V2 = 1.6                // X-component velocity upper range

// Caluclations
// Required fraction from The Maxwell-Boltzmann distribution of the X-component // velocity

// F = (1/sqrt(%pi))integrate(exp(-X^2),'X',1,1.6)
// F = 1/2*((2/sqrt(%pi))integrate(exp(-X^2),'X',1,1.6) - (2/sqrt(%pi))integrate// (exp(-X^2),'X',0,1))

F = erf(V2) - (2/sqrt(%pi))*V2*exp(-V2^2) - erf(V1) + (2/sqrt(%pi))*exp(-V1)

// Output results
mprintf('The fraction of molecules of a gas with speed between Vmp and 1.6Vmp = %4.4f', F)