summaryrefslogtreecommitdiff
path: root/3685/CH4/EX4.3/Ex4_3.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3685/CH4/EX4.3/Ex4_3.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3685/CH4/EX4.3/Ex4_3.sce')
-rw-r--r--3685/CH4/EX4.3/Ex4_3.sce25
1 files changed, 25 insertions, 0 deletions
diff --git a/3685/CH4/EX4.3/Ex4_3.sce b/3685/CH4/EX4.3/Ex4_3.sce
new file mode 100644
index 000000000..47445d284
--- /dev/null
+++ b/3685/CH4/EX4.3/Ex4_3.sce
@@ -0,0 +1,25 @@
+clc
+// Process a-b
+Qab = 0 // Heat transfer along the path ab in kJ/ min
+Wab = 2170 // Work transfer along the path ab in kJ/min
+Eab = Qab-Wab // Change in internal energy along the path ab in kJ/min
+// Process b-c
+Qbc = 21000 // Heat transfer along the path bc in kJ/ min
+Wbc = 0 // Work transfer along the path bc in kJ/min
+Ebc = Qbc-Wbc // Change in internal energy along the path bc in kJ/min
+// Process c-d
+Qcd = -2100 // Heat transfer along the path cd in kJ/ min
+Ecd = -36600 // Change in internal energy along the path cd in kJ/min
+Wcd = Qcd-Ecd // Work transfer along the path cd in kJ/min
+// Process d-a
+Q = -17000 // Total heat transfer in kJ/min
+Qda = Q-Qab-Qbc-Qcd // Heat transfer along the path da in kJ/ min
+Eda = -Eab-Ebc-Ecd // Change in internal energy along the path da in kJ/min
+Wda = Qda-Eda // Work transfer along the path da in kJ/min
+printf("\n Example 4.3")
+
+M = [Qab Wab Eab ; Qbc Wbc Ebc; Qcd Wcd Ecd; Qda Wda Eda];
+disp(M,"The completed table is:")
+W = Qab+Qbc+Qcd+Qda
+printf("\n Net rate of work output is %f kW",W/60)
+