diff options
Diffstat (limited to '1100/CH10/EX10.6/10_6.sce')
-rwxr-xr-x | 1100/CH10/EX10.6/10_6.sce | 38 |
1 files changed, 19 insertions, 19 deletions
diff --git a/1100/CH10/EX10.6/10_6.sce b/1100/CH10/EX10.6/10_6.sce index cb9c95d09..7ff780085 100755 --- a/1100/CH10/EX10.6/10_6.sce +++ b/1100/CH10/EX10.6/10_6.sce @@ -1,19 +1,19 @@ - clc
-//initialisation of variables
-P= 15 //psia
-S= 1.7050 //Btu/lb R
-sg= 1.7549 //btu/lb R
-sfg= 1.4415 //Bru/lb R
-hg= 1150.8 //btu/lb
-hfg= 969.7 //Btu/lb
-vg= 26.29 //cu ft/lb
-vfg= 26.27 //cu ft/lb
-//CALCULATIONS
-n= (sg-sx)/sfg
-sx= sg-n*sfg
-hx= hg-n*hfg
-vx= vg-n*vfg
-//RESULTS
-printf ('Volume= %.2f cu ft/lb',vx)
-printf (' \n Entropy = %.2f Btu/lb R',sx)
-printf (' \n Enthalpy= %.1f Btu/lb',hx)
+clc +//initialisation of variables +P= 15 //psia +sx= 1.7050 //Btu/lb R +sg= 1.7549 //btu/lb R +sfg= 1.4415 //Bru/lb R +hg= 1150.8 //btu/lb +hfg= 969.7 //Btu/lb +vg= 26.29 //cu ft/lb +vfg= 26.27 //cu ft/lb +//CALCULATIONS +n= (sg-sx)/sfg +sx= sg-n*sfg +hx= hg-n*hfg +vx= vg-n*vfg +//RESULTS +printf ('Volume= %.2f cu ft/lb',vx) +printf (' \n Entropy = %.2f Btu/lb R',sx) +printf (' \n Enthalpy= %.1f Btu/lb',hx)
\ No newline at end of file |