summaryrefslogtreecommitdiff
path: root/629/CH8/EX8.5/example8_5.sce
diff options
context:
space:
mode:
Diffstat (limited to '629/CH8/EX8.5/example8_5.sce')
-rw-r--r--629/CH8/EX8.5/example8_5.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/629/CH8/EX8.5/example8_5.sce b/629/CH8/EX8.5/example8_5.sce
new file mode 100644
index 000000000..8b3ce150b
--- /dev/null
+++ b/629/CH8/EX8.5/example8_5.sce
@@ -0,0 +1,12 @@
+clear
+clc
+//Example 8.5 REYNOLDS-NUMBER SIMILITUDE OF A VALVE
+//p-prototype, m-model
+Lmp=1/6; //Lmp=(Lm/Lp)
+//Vm*Lm/vm=Vp*Lp/vp, vm=vp
+Vmp=1/Lmp //Vmp=(Vm/Vp)
+Qp=700; //[cfs]
+Amp=(Lmp)^2 //Ratio of areas, Amp=(Am/Ap)
+//Discharge
+Qm=Qp*Vmp*Amp //[cfs]
+printf("\n The flow rate required for the model, Q = %.f cfs.\n",Qm)