diff options
Diffstat (limited to '1328/CH13/EX13.4/13_4.sce')
| -rw-r--r-- | 1328/CH13/EX13.4/13_4.sce | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/1328/CH13/EX13.4/13_4.sce b/1328/CH13/EX13.4/13_4.sce new file mode 100644 index 000000000..03e5d39b0 --- /dev/null +++ b/1328/CH13/EX13.4/13_4.sce @@ -0,0 +1,11 @@ +printf("\t example 13.4 \n");
+printf("\t approximate values are mentioned in the book \n");
+vA=2*3.7+(7.4); // for steam
+vB=14.8+(2*7.4); // for CO2
+MA=18;
+MB=44;
+T=403; // K
+Pt=3.04; // atm
+kd=(0.0166)*(((403^(3/2))/(3.04*(14.8^(1/3)+29.6^(1/3))^(2)))*((1/18)+(1/44))^(1/2)); // eq 13.31
+printf("\t diffusivity is : %.2f ft^2/hr \n",kd);
+// end
|