diff options
| author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
|---|---|---|
| committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
| commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
| tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3689/CH16 | |
| parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
| download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip | |
initial commit / add all books
Diffstat (limited to '3689/CH16')
| -rw-r--r-- | 3689/CH16/EX16.2/16_2.sce | 15 | ||||
| -rw-r--r-- | 3689/CH16/EX16.4/16_4.sce | 15 | ||||
| -rw-r--r-- | 3689/CH16/EX16.5/16_5.sce | 20 | ||||
| -rw-r--r-- | 3689/CH16/EX16.6/16_6.sce | 14 | ||||
| -rw-r--r-- | 3689/CH16/EX16.7/16_7.sce | 26 |
5 files changed, 90 insertions, 0 deletions
diff --git a/3689/CH16/EX16.2/16_2.sce b/3689/CH16/EX16.2/16_2.sce new file mode 100644 index 000000000..dc07fb11c --- /dev/null +++ b/3689/CH16/EX16.2/16_2.sce @@ -0,0 +1,15 @@ +////
+//Variable Declaration
+R = 8.314 //Ideal Gas Constant, J/(mol.K)
+T = 298 //Temperatureof Gas, K
+M = 0.040 //Molecular wt of Ar, kg/mol
+
+
+//Calculations
+vmp = sqrt(2*R*T/M)
+vave = sqrt(8*R*T/(M*%pi))
+vrms = sqrt(3*R*T/M)
+
+//Results
+printf("\n Maximum, average, root mean square speed of Ar\nat 298 K are %4.0f, %4.0f, %4.0f m/s",vmp,vave,vrms)
+
diff --git a/3689/CH16/EX16.4/16_4.sce b/3689/CH16/EX16.4/16_4.sce new file mode 100644 index 000000000..a4ad51f85 --- /dev/null +++ b/3689/CH16/EX16.4/16_4.sce @@ -0,0 +1,15 @@ +////
+//Variable Declaration
+R = 8.314 //Ideal Gas Constant, J/(mol.K)
+T = 298 //Temperature of Gas, K
+M = 0.040 //Molecular wt of Ar, kg/mol
+P = 101325 //Pressure, N/m2
+NA = 6.022e23 //Number of particles per mol
+V = 1.0 //Volume of Container, L
+
+//Calculations
+Zc = P*NA/sqrt(2*%pi*R*T*M)
+Nc = Zc
+//Results
+printf("\n Number of Collisions %4.2e per s",Nc)
+
diff --git a/3689/CH16/EX16.5/16_5.sce b/3689/CH16/EX16.5/16_5.sce new file mode 100644 index 000000000..bc703d58d --- /dev/null +++ b/3689/CH16/EX16.5/16_5.sce @@ -0,0 +1,20 @@ +////
+//Variable Declaration
+R = 8.314 //Ideal Gas Constant, J/(mol.K)
+T = 298 //Temperature of Gas, K
+M = 0.040 //Molecular wt of Ar, kg/mol
+P0 = 1013.25 //Pressure, N/m2
+NA = 6.022e23 //Number of particles per mol
+V = 1.0 //Volume of Container, L
+k = 1.38e-23 //Boltzmann constant, J/K
+t = 3600 //time of effusion, s
+A = 0.01 //Area, um2
+
+//Calculations
+A = A*1e-12
+V = V*1e-3
+expo = (A*t/V)*(k*T/(2*%pi*M/NA))
+P = P0*exp(-expo)
+//Results
+printf("\n Pressure after 1 hr of effusion is %4.3e Pa",P/101325)
+
diff --git a/3689/CH16/EX16.6/16_6.sce b/3689/CH16/EX16.6/16_6.sce new file mode 100644 index 000000000..28839b33d --- /dev/null +++ b/3689/CH16/EX16.6/16_6.sce @@ -0,0 +1,14 @@ +////
+//Variable Declaration
+R = 8.314 //Ideal Gas Constant, J/(mol.K)
+T = 298 //Temperature of Gas, K
+M = 0.044 //Molecular wt of CO2, kg/mol
+P = 101325 //Pressure, N/m2
+NA = 6.022e23 //Number of particles per mol
+sigm = 5.2e-19 //m2
+
+//Calculations
+zCO2 = (P*NA/(R*T))*sigm*sqrt(2)*sqrt(8*R*T/(%pi*M))
+//Results
+printf("\n Single particle collisional frequency is %4.1e per s",zCO2)
+
diff --git a/3689/CH16/EX16.7/16_7.sce b/3689/CH16/EX16.7/16_7.sce new file mode 100644 index 000000000..dc85dd54f --- /dev/null +++ b/3689/CH16/EX16.7/16_7.sce @@ -0,0 +1,26 @@ +////
+//Variable Declaration
+R = 8.314 //Ideal Gas Constant, J/(mol.K)
+T = 298 //Temperature of Gas, K
+MAr = 0.04 //Molecular wt of Ar, kg/mol
+MKr = 0.084 //Molecular wt of Kr, kg/mol
+pAr = 360 //Partial Pressure Ar, torr
+pKr = 400 //Partial Pressure Kr, torr
+rAr = 0.17e-9 //Hard sphere radius of Ar, m
+rKr = 0.20e-9 //Hard sphere radius of Kr, m
+NA = 6.022e23 //Number of particles per mol
+k = 1.38e-23 //Boltzmann constant, J/K
+
+//Calculations
+pAr = pAr*101325/760
+pKr = pKr*101325/760
+p1 = pAr*NA/(R*T)
+p2 = pKr*NA/(R*T)
+sigm = %pi*(rAr+rKr)**2
+mu = MAr*MKr/((MAr+MKr)*NA)
+p3 = sqrt(8*k*T/(%pi*mu))
+zArKr = p1*p2*sigm*p3
+
+//Results
+printf("\n Collisional frequency is %4.2e m-3s-1",zArKr)
+
|