diff options
Diffstat (limited to '779/CH13/EX13.6/13_6.sce')
| -rwxr-xr-x | 779/CH13/EX13.6/13_6.sce | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/779/CH13/EX13.6/13_6.sce b/779/CH13/EX13.6/13_6.sce new file mode 100755 index 000000000..8f603e64c --- /dev/null +++ b/779/CH13/EX13.6/13_6.sce @@ -0,0 +1,9 @@ +cp = 1.005;
+Tmax = 1073; Tmin = 300;
+Wnet_max = cp*(sqrt(Tmax)-sqrt(Tmin))^2;
+n_cycle = 1-sqrt(Tmin/Tmax);
+n_carnot = 1-(Tmin/Tmax);
+r = n_cycle/n_carnot;
+disp("kJ/kg",Wnet_max,"Maximum work done per kg of air is")
+disp("%",n_cycle*100,"cycle efficiency is")
+disp(r,"ratio of brayton and carnot efficiency is")
\ No newline at end of file |