diff options
Diffstat (limited to '797/CH5/EX5.15.s/5_15_solution.sce')
| -rw-r--r-- | 797/CH5/EX5.15.s/5_15_solution.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/797/CH5/EX5.15.s/5_15_solution.sce b/797/CH5/EX5.15.s/5_15_solution.sce new file mode 100644 index 000000000..d5a86bef1 --- /dev/null +++ b/797/CH5/EX5.15.s/5_15_solution.sce @@ -0,0 +1,12 @@ +//Solution 5-15 +WD=get_absolute_file_path('5_15_solution.sce'); +datafile=WD+filesep()+'5_15_example.sci'; +clc; +exec(datafile) +Wdot_shaft = Wdot_shaft * 1000; +Wdot_pump = eta_pump * Wdot_shaft / 100; +mdot = Wdot_pump / (g * (z_2 + h_L)); //energy equation +Vdot = mdot / rho; +printf("Discharge rate of water is %1.4e m^3/s i.e %1.4f L/s", Vdot, Vdot * 1000); +deltaP = Wdot_pump / Vdot; +printf("\nPressure difference across the pump is %1.2f kPa", deltaP / 1000);
\ No newline at end of file |