summaryrefslogtreecommitdiff
path: root/3845/CH15/EX15.7/Ex15_7.sce
diff options
context:
space:
mode:
Diffstat (limited to '3845/CH15/EX15.7/Ex15_7.sce')
-rw-r--r--3845/CH15/EX15.7/Ex15_7.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/3845/CH15/EX15.7/Ex15_7.sce b/3845/CH15/EX15.7/Ex15_7.sce
new file mode 100644
index 000000000..fa85142c2
--- /dev/null
+++ b/3845/CH15/EX15.7/Ex15_7.sce
@@ -0,0 +1,14 @@
+//Example 15.7
+Tc=100;//Cold reservoir temperature (K)
+Th=600;//Hot reservoir temperature (K)
+Q_h=4000;//Heat transfer to the engine (J)
+Eff_C=1-Tc/Th;//Carnot efficiency
+W=Eff_C*Q_h;//Work output (J)
+printf('a.Work output = %0.1f J',W)
+Tc_b=250;//Cold reservoir temperature for 1st Carnot engine in (b), (K)
+Eff_C_b=1-Tc/Tc_b;//Carnot efficiency
+W_b=Eff_C_b*Q_h;//Work output (J)
+printf('\nb.Work output = %0.1f J',W_b)
+//Answer varies due to round off error
+//Openstax - College Physics
+//Download for free at http://cnx.org/content/col11406/latest