diff options
Diffstat (limited to '1709/CH7/EX7.6')
| -rwxr-xr-x | 1709/CH7/EX7.6/7_6.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/1709/CH7/EX7.6/7_6.sce b/1709/CH7/EX7.6/7_6.sce new file mode 100755 index 000000000..e7e49cb63 --- /dev/null +++ b/1709/CH7/EX7.6/7_6.sce @@ -0,0 +1,15 @@ +clc
+//Initialization of variables
+T=-150+460 //R
+v=0.6 //ft^3/lbm
+vc=1.44
+Tc=227 //R
+Pc=482 //psia
+//calculations
+disp("From tables of z")
+vr=v/vc
+Tr=T/Tc
+Pr=1.75
+P=Pr*Pc
+//results
+printf("Final pressure = %d psia",P)
|