diff options
Diffstat (limited to '3843/CH10/EX10.3/Ex10_3.sce')
| -rw-r--r-- | 3843/CH10/EX10.3/Ex10_3.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/3843/CH10/EX10.3/Ex10_3.sce b/3843/CH10/EX10.3/Ex10_3.sce new file mode 100644 index 000000000..666e006a3 --- /dev/null +++ b/3843/CH10/EX10.3/Ex10_3.sce @@ -0,0 +1,16 @@ +// Example 10_3
+clc;funcprot(0);
+// Given data
+T=200;// °C
+P=1554;// kPa
+R=0.462;// kJ/kg.K
+
+// Calculation
+v_g=(R*(T+273))/P;// m^3/kg
+rho=1000;// kg/m^3
+v_f=0.001;// m^3/kg
+dPbydT=(1906-1254)/(210-190);// kN/m^2.K
+h_fg=(T+273)*(v_g-v_f)*dPbydT;// kJ/kg
+h_fga=1941;// kJ/kg (From steam tables)
+error=((h_fg-h_fga)/h_fga)*100;// The percentage error
+printf("\nThe percent error=%2.1f percentage",error);
|