summaryrefslogtreecommitdiff
path: root/3831/CH13/EX13.1/Ex13_1.sce
blob: 885776754cb8426d58365ab262db1da4bba6aeb5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
// Example 13_1
clc;funcprot(0);
// Given data
d_in=10;// Diameter of piston in inch
d_m=0.254;// Diameter of piston in m
L_in=38.0;// Stroke in inch
L_m=0.965;// Stroke in m
mg=291900;// lbf
h=10.0;// ft
m=84.0;// lbm

// Calculation
Duty=mg*h;// ft.lb
n_T=(Duty/(8.5*10^8))*100;// The thermal efficiency of this engine in %
printf("\nThe duty=%7.0f ft.lbf \nThe thermal efficiency of this engine=%0.3f percentage",Duty,n_T);