diff options
Diffstat (limited to '1627/CH4/EX4.7')
| -rw-r--r-- | 1627/CH4/EX4.7/Ex4_7.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/1627/CH4/EX4.7/Ex4_7.sce b/1627/CH4/EX4.7/Ex4_7.sce new file mode 100644 index 000000000..ec555e440 --- /dev/null +++ b/1627/CH4/EX4.7/Ex4_7.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+p=65*10^5//N/m^2
+r=8000//liters/minute
+p1=25*10^5//bars
+sg=0.85
+a=1.02*10^-4//m^3
+b=15*10^5//N/m^2
+//CALCULATIONS
+Ha=(a*p)/sg//m
+He=Ha-(a*p1)/sg//m
+H=Ha-He//m
+//RESULTS
+printf('The energy extracted from the fluid in terms corresponding to head=% f m',H)
|