diff options
Diffstat (limited to '1226/CH17/EX17.15/EX17_15.sce')
| -rwxr-xr-x | 1226/CH17/EX17.15/EX17_15.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/1226/CH17/EX17.15/EX17_15.sce b/1226/CH17/EX17.15/EX17_15.sce new file mode 100755 index 000000000..e8cfd34f8 --- /dev/null +++ b/1226/CH17/EX17.15/EX17_15.sce @@ -0,0 +1,15 @@ +clc;funcprot(0);//EXAMPLE 17.15
+//Initialisation of Variables
+IP=30;........................//Indicated power in kW
+BP=26;........................//Brake power in kW
+N=1000;.......................//Engine rpm
+fpbph=0.35;...................//Fuel per brake power hour in kg/B.P.h
+C=43900;......................//Calorific value of fuel used in kJ/kg
+//Calculations
+mf=BP*fpbph;.............//Fuel consumption per hour in kg/h
+etaIth=IP/((mf/3600)*C);.................//Indicated thermal efficiency
+etaBth=BP/((mf/3600)*C);.................//Indicated brake efficiency
+etamech=BP/IP;...........................//Mechanical efficiency
+disp(etaIth*100,"Indicated thermal efficiency (in %):")
+disp(etaBth*100,"Indicated brake efficiency (in %):")
+disp(etamech*100,"Mechanical efficiency (in %):")
|