summaryrefslogtreecommitdiff
path: root/32/CH9/EX9.06
diff options
context:
space:
mode:
Diffstat (limited to '32/CH9/EX9.06')
-rwxr-xr-x32/CH9/EX9.06/9_06.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/32/CH9/EX9.06/9_06.sce b/32/CH9/EX9.06/9_06.sce
new file mode 100755
index 000000000..8486c2f2c
--- /dev/null
+++ b/32/CH9/EX9.06/9_06.sce
@@ -0,0 +1,18 @@
+//pathname=get_absolute_file_path('9.06.sce')
+//filename=pathname+filesep()+'9.06-data.sci'
+//exec(filename)
+//Maximum temperature(in K):
+T5=1200
+//Minimum temperature(in K):
+T1=300
+T3=300
+//Isentropic efficiency:
+ni=0.85
+//Turbine efficiency:
+nt=0.9
+//Adiabatic index of compression:
+n=1.4
+//Overall optimum pressure ratio:
+rpopt=(T1/(T5*ni*nt))^(2*n/(3*(1-n)))
+printf("\nRESULT")
+printf("\nOverall optimum pressure ratio = %f",rpopt) \ No newline at end of file