diff options
Diffstat (limited to '2666/CH6')
-rwxr-xr-x | 2666/CH6/EX6.1/6_1.sce | 10 | ||||
-rwxr-xr-x | 2666/CH6/EX6.2/6_2.sce | 14 | ||||
-rwxr-xr-x | 2666/CH6/EX6.3/6_3.sce | 13 | ||||
-rwxr-xr-x | 2666/CH6/EX6.4/6_4.sce | 13 | ||||
-rwxr-xr-x | 2666/CH6/EX6.5/6_5.sce | 8 |
5 files changed, 58 insertions, 0 deletions
diff --git a/2666/CH6/EX6.1/6_1.sce b/2666/CH6/EX6.1/6_1.sce new file mode 100755 index 000000000..d7c44b905 --- /dev/null +++ b/2666/CH6/EX6.1/6_1.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+w=1500//psia
+t=300//F
+h=2.70//Btu
+h1=269.59//Btu
+//CALCULATIONS
+H=h1+h//Btu
+//RESULTS
+printf('the specific enthalpy of water=% f Btu',H)
diff --git a/2666/CH6/EX6.2/6_2.sce b/2666/CH6/EX6.2/6_2.sce new file mode 100755 index 000000000..ccb98addc --- /dev/null +++ b/2666/CH6/EX6.2/6_2.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+p=200//psia
+w=0.92//lb
+q=92//percent
+h1=355.36//in
+h2=843.0//in
+h3=1198.4//in
+p1=0.08//lb
+//CALCULATIONS
+H=h1+w*(h1)//psia
+hx=h3-p1*(h2)//psia
+//RESULTS
+printf('the enthalpy of pound=% f psia',hx)
diff --git a/2666/CH6/EX6.3/6_3.sce b/2666/CH6/EX6.3/6_3.sce new file mode 100755 index 000000000..fb24e8e41 --- /dev/null +++ b/2666/CH6/EX6.3/6_3.sce @@ -0,0 +1,13 @@ +clc
+//initialisation of variables
+p=100//psia
+e=1100//Btu per pound
+x=87.2//in
+z=888.8//in
+p1=1.6026//lb
+v=1.1286//lb
+//CALCULATIONS
+X=x/z//percent
+S=p1-X*v//units per lb
+//RESULTS
+printf('the specific enthalpy=% f units per lb',S)
diff --git a/2666/CH6/EX6.4/6_4.sce b/2666/CH6/EX6.4/6_4.sce new file mode 100755 index 000000000..547a09fec --- /dev/null +++ b/2666/CH6/EX6.4/6_4.sce @@ -0,0 +1,13 @@ +clc
+//initialisation of variables
+p=2500//psia
+v=0.127//cu ft
+h=0.0037//ft
+x=0.1021//ft
+w=1091.1//lb
+q=360.5//ft lb
+//CALCULATIONS
+X=h/x//percent
+H=w-X*q//Btu per lb
+//RESULTS
+printf('The specific enthaly=% f Btu per lb',H)
diff --git a/2666/CH6/EX6.5/6_5.sce b/2666/CH6/EX6.5/6_5.sce new file mode 100755 index 000000000..5c648085a --- /dev/null +++ b/2666/CH6/EX6.5/6_5.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+t=440//F
+t1=353.02//F
+//CALCULATIONS
+P=t/t1*1000//Btu per lb
+//RESULTS
+printf('the specific enthalpy=% f Btu per lb',P)
|