summaryrefslogtreecommitdiff
path: root/3878/CH11/EX11.1/Ex11_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '3878/CH11/EX11.1/Ex11_1.sce')
-rw-r--r--3878/CH11/EX11.1/Ex11_1.sce14
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)
+