summaryrefslogtreecommitdiff
path: root/1394/CH21/EX21.5.1/Ex21_5_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '1394/CH21/EX21.5.1/Ex21_5_1.sce')
-rwxr-xr-x1394/CH21/EX21.5.1/Ex21_5_1.sce26
1 files changed, 26 insertions, 0 deletions
diff --git a/1394/CH21/EX21.5.1/Ex21_5_1.sce b/1394/CH21/EX21.5.1/Ex21_5_1.sce
new file mode 100755
index 000000000..d1cff006c
--- /dev/null
+++ b/1394/CH21/EX21.5.1/Ex21_5_1.sce
@@ -0,0 +1,26 @@
+
+clc
+//initialization of variables
+A = 0.01 // cm^2
+l = 1 // cm
+VA = 3 // cc
+VB = 3 // cc
+alphagas = 0.29
+alphaliquid = -1.3
+x1 = 0.5
+x2 = 0.5
+deltaT = 50 // Kelvin Thot-Tcold = 50
+Tavg = 298 // kelvin
+Dgas = 0.3 // cm^2/sec
+Dliquid = 10^-5 // cm^2/sec
+//calculations
+deltaY = alphagas*x1*x2*deltaT/Tavg // Y1hot-Y1cold = DeltaY
+deltaX = alphaliquid*x1*x2*deltaT/Tavg// X1hot-X1cold = DeltaX
+Beta = (A/l)*((1/VA)+(1/VB))//cm^-2
+BetaDgasinverse = 1/(Beta*Dgas)// sec
+BetaDliquidinverse = (1/(Beta*Dliquid))/(365*24*60*60)
+//Results
+printf("The seperation achieved for gas is %.3f",deltaY)
+printf("\nThe seperation achieved for liquid is %.2f",deltaY)
+printf("\nThe time taken for seperation for gas will be %.f seconds",BetaDgasinverse)
+printf("\nThe time taken for seperation for liquid will be %.1f year",BetaDliquidinverse)