diff options
Diffstat (limited to '1268/CH4/EX4.10')
| -rw-r--r-- | 1268/CH4/EX4.10/4_10.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/1268/CH4/EX4.10/4_10.sce b/1268/CH4/EX4.10/4_10.sce new file mode 100644 index 000000000..6fcb7a563 --- /dev/null +++ b/1268/CH4/EX4.10/4_10.sce @@ -0,0 +1,14 @@ +clc;
+disp("Example 4.10")
+d=0.05 // diameter in m
+density=1000 // density in kg/m^3
+mew= 0.001 // viscosity in kg/ms
+flowrate= 100/60 // in kg/s
+avgvelo=flowrate*4/(%pi*density*d*d)
+
+Re= avgvelo*d*density/mew
+if Re<50000 then
+ f=0.079/(Re^0.25)
+end
+disp(" The friction factor is ")
+disp(f)
|