summaryrefslogtreecommitdiff
path: root/1052/CH18/EX18.5/185.sce
diff options
context:
space:
mode:
Diffstat (limited to '1052/CH18/EX18.5/185.sce')
-rwxr-xr-x1052/CH18/EX18.5/185.sce10
1 files changed, 10 insertions, 0 deletions
diff --git a/1052/CH18/EX18.5/185.sce b/1052/CH18/EX18.5/185.sce
new file mode 100755
index 000000000..c23f74d98
--- /dev/null
+++ b/1052/CH18/EX18.5/185.sce
@@ -0,0 +1,10 @@
+clc;
+//Example 18.5
+//page no 230
+printf(" Example 18.5 page no. 230\n\n");
+//refer to example no. 18.3 and 18.4
+P_drop=34.16//pressure drop ,ft
+h_f=43//friction loss due to fitting
+rho=62.4//density,lb/ft^3
+P_d_t=(P_drop+h_f)*rho//total pressure drop
+printf("\n total pressure drop P_d_t=%f lbf/ft^2",P_d_t);