diff options
Diffstat (limited to '2519/CH10')
-rwxr-xr-x | 2519/CH10/EX10.1/Ex10_1.sce | 17 | ||||
-rwxr-xr-x | 2519/CH10/EX10.2/Ex10_2.sce | 16 | ||||
-rwxr-xr-x | 2519/CH10/EX10.3/Ex10_3.sce | 18 |
3 files changed, 51 insertions, 0 deletions
diff --git a/2519/CH10/EX10.1/Ex10_1.sce b/2519/CH10/EX10.1/Ex10_1.sce new file mode 100755 index 000000000..d5d035b7b --- /dev/null +++ b/2519/CH10/EX10.1/Ex10_1.sce @@ -0,0 +1,17 @@ +clc
+clear
+//Initialization of variables
+m=1 //lbm
+T1=212+460 //R
+sv=0.193 //ft^3/lbm
+M=44
+a=924.2 //atm ft^2 /mole^2
+b=0.685 //ft^3/mol
+R=0.73 //atm ft^3/R mol
+//calculations
+v=sv*M
+p=R*T1/v
+p2=R*T1/(v-b) -a/v^2
+//results
+printf("In ideal gas case, pressure = %.1f atm",p)
+printf("\n In vanderwaals equation, pressure = %.1f atm",p2)
diff --git a/2519/CH10/EX10.2/Ex10_2.sce b/2519/CH10/EX10.2/Ex10_2.sce new file mode 100755 index 000000000..82e903060 --- /dev/null +++ b/2519/CH10/EX10.2/Ex10_2.sce @@ -0,0 +1,16 @@ +clc
+clear
+//Initialization of variables
+m=1 //lbm
+p=50.9 //atm
+t=212+460 //R
+R=0.73
+//calculations
+pc=72.9 //atm
+tc=87.9 +460 //R
+pr=p/pc
+Tr=t/tc
+z=0.88
+v=z*R*t/p
+//results
+printf("volume = %.3f ft^3/mole",v)
diff --git a/2519/CH10/EX10.3/Ex10_3.sce b/2519/CH10/EX10.3/Ex10_3.sce new file mode 100755 index 000000000..c5d47d0d0 --- /dev/null +++ b/2519/CH10/EX10.3/Ex10_3.sce @@ -0,0 +1,18 @@ +clc
+clear
+//Initialization of variables
+t=212+460 //R
+v=0.193 //ft^3/lbm
+M=44
+R=0.73
+//calculations
+tc=87.9+460 //F
+zc=0.275
+vc=1.51 //ft^3/mol
+tr=t/tc
+vr=v*M/vc
+vrd=vr*zc
+z=0.88
+p=z*R*t/(M*v)
+//results
+printf("Pressure = %.1f atm",p)
|