diff options
Diffstat (limited to '32/CH11/EX11.07/11_07.sce')
-rwxr-xr-x | 32/CH11/EX11.07/11_07.sce | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/32/CH11/EX11.07/11_07.sce b/32/CH11/EX11.07/11_07.sce new file mode 100755 index 000000000..573549324 --- /dev/null +++ b/32/CH11/EX11.07/11_07.sce @@ -0,0 +1,28 @@ +//pathname=get_absolute_file_path('11.07.sce')
+//filename=pathname+filesep()+'11.07-data.sci'
+//exec(filename)
+//Draught in water column(in mm):
+hw=50
+//Temperature of burnt gases(in K):
+T=300+273
+//Rate at which coal is burnt(in kg/s):
+M=2000/3600
+//Mass per kg of fuel required for complete combustion(in kg):
+m=19
+//Ambient air temperature(in K):
+T1=27+273
+//Zero temperature(in K):
+T0=273
+//Mechanical efficiency:
+n=0.90
+//Pressure applied by the draught water(in N/m^2):
+P=hw*9.81
+//Density of hot gases(in kg/m^3):
+d=1.293
+//Power required in FD fan(kW):
+PFD=P*m*M*T1/(d*T0*n*1000)
+//Power required in 1D fan(kW):
+P1D=P*m*M*T/(d*T0*n*1000)
+printf("\n RESULT \n")
+printf("\nPower for FD fan = %f kW",PFD)
+printf("\nPower for 1D fan = %f kW",P1D)
\ No newline at end of file |