diff options
Diffstat (limited to '1962/CH12/EX12.5')
| -rwxr-xr-x | 1962/CH12/EX12.5/example12_5.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/1962/CH12/EX12.5/example12_5.sce b/1962/CH12/EX12.5/example12_5.sce new file mode 100755 index 000000000..fe0caaf15 --- /dev/null +++ b/1962/CH12/EX12.5/example12_5.sce @@ -0,0 +1,15 @@ +
+//example 12.5
+//page 457
+clc; funcprot(0);
+//initialisation of variable
+H=60;
+sigma_critical=0.08;
+Pa=98000;//pressure
+Pv=1707;//pressure of vapour
+Gamma=9810;
+HL=1;
+NPSH_min=H*sigma_critical;
+Hs_max=Pa/Gamma-Pv/Gamma-NPSH_min-HL;
+disp(Hs_max,"maximum value of suction lift (m)");
+clear
|