diff options
Diffstat (limited to '3878/CH11/EX11.1/Ex11_1.sce')
-rw-r--r-- | 3878/CH11/EX11.1/Ex11_1.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/3878/CH11/EX11.1/Ex11_1.sce b/3878/CH11/EX11.1/Ex11_1.sce new file mode 100644 index 000000000..03e5caf5c --- /dev/null +++ b/3878/CH11/EX11.1/Ex11_1.sce @@ -0,0 +1,14 @@ +clear +// Variable declaration +T_c=34// The condensing temperature in °C +T_s=30// The subcooled temperature in °C +g=9.81// m/s**2 + +// Calculation +P_c=15.69// Saturation pressure at 34°C in bar +P_s=14.18// Saturation pressure at 30°C in bar +dp=P_c-P_s// Permissible pressure drop in bar +rho=1022// Specific mass of liquid in kg/m**3 +H=(dp*10**5)/(rho*g)// Possible loss in static head in m +printf("\n Possible loss in static head=%2.1f m",H) + |