summaryrefslogtreecommitdiff
path: root/599/CH2/EX2.1.b/example2_1_b.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /599/CH2/EX2.1.b/example2_1_b.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '599/CH2/EX2.1.b/example2_1_b.sce')
-rwxr-xr-x599/CH2/EX2.1.b/example2_1_b.sce25
1 files changed, 25 insertions, 0 deletions
diff --git a/599/CH2/EX2.1.b/example2_1_b.sce b/599/CH2/EX2.1.b/example2_1_b.sce
new file mode 100755
index 000000000..5d6a3bf37
--- /dev/null
+++ b/599/CH2/EX2.1.b/example2_1_b.sce
@@ -0,0 +1,25 @@
+
+clear;
+clc;
+printf("\t Example 2_1_b\n");
+// let A denote Hydrogen chloride and B denote air
+
+//"part(ii)"
+rA=.3339;
+rB=.3711;
+rAB=(rA+rB)/2; //molecular seperation at collision
+ebyk_A=344.7;
+ebyk_B=78.6;
+ebyk_AB=(ebyk_A/ebyk_B)^.5; //energy of molecular attraction
+pt=200*10^3; //absolute total pressure in pascal
+T=298; //absolute temperature in kelvin
+s=T/ebyk_AB; //collision function
+ //from chart f(T/ebyk_AB) = 0.62 let it be = x
+x=0.62; //collision function
+MA=36.5; //molecular weight of hydrogen chloride
+MB=29; //molecular weight of air
+Mnew=((1/MA)+(1/MB))^.5;
+Dab=10^-4*(1.084-.249*(Mnew))*T^1.5*((Mnew))/(pt*x*rAB^2);
+printf("\n the diffisivity of hydrogen chloride-air is :%f *10^-6 m^2/s",Dab/10^-6)
+
+//end \ No newline at end of file