diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /617/CH16/EX12.3/Example16_3.sci | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '617/CH16/EX12.3/Example16_3.sci')
-rwxr-xr-x | 617/CH16/EX12.3/Example16_3.sci | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/617/CH16/EX12.3/Example16_3.sci b/617/CH16/EX12.3/Example16_3.sci new file mode 100755 index 000000000..2e61d6961 --- /dev/null +++ b/617/CH16/EX12.3/Example16_3.sci @@ -0,0 +1,17 @@ +clc();
+clear;
+
+// To compute the ammonia diffusing through the stagnant air
+
+x=0.1/12; // thickness of still air layer in ft
+T=77+460; // temperature in degR
+p=1; // Atmospheric pressure in atm
+pa1=0.3; // Pressure of ammonia in still air in atm
+pb1=p-pa1; // pressure of air in atm
+pa2=0; // pressure of ammonia in the absorption plane
+pb2=p-pa2; // pressure of air in absorption plane
+pbm=(pb2-pb1)/(log(pb2/pb1)); // Logarithmic mean pressure
+D=0.914; // Diffusion coefficient for ammonia
+R=0.729; // Gas constant in ft^3-atm/lb-mole-degR
+N=D*p*(pa1-pa2)/(R*T*x*pbm);
+printf("The amount of ammonia diffusing through the stagnant air is %.1f lb-mol/hr-ft^2",N);
\ No newline at end of file |