2 files changed, 34 insertions, 0 deletions
diff --git a/2666/CH7/EX7.1/7_1.sce b/2666/CH7/EX7.1/7_1.sce
new file mode 100755
index 000000000..80c46fda1
--- /dev/null
+++ b/2666/CH7/EX7.1/7_1.sce
@@ -0,0 +1,18 @@
+clc
+//initialisation of variables
+p1=100//psia
+p2=14.7//psia
+h=1187.2//in
+s=1.6026//in
+g=1.7566//in
+f=1.4446//in
+q=970.3//lb
+w=180.0//lb
+H=1047.0//Btu
+//CALCULATIONS
+X=(g-s)/f//Btu
+W=h-H//Btu
+Q=h-w//Btu
+E=W/Q*100//percent
+//RESULTS
+printf('the thermal efficiency of Rankine cycle=% f percent',E)
diff --git a/2666/CH7/EX7.2/Ex7_2.sce b/2666/CH7/EX7.2/Ex7_2.sce
new file mode 100755
index 000000000..1eacb9605
--- /dev/null
+++ b/2666/CH7/EX7.2/Ex7_2.sce
@@ -0,0 +1,16 @@
+
+clc
+//initialisation of variables
+p=26//lb
+h3=1187.0//in
+h1=180.0//in
+w=2544//in
+g=13.9//percent
+h=140.2//Btu
+//CALCULATIONS
+E=w/(p*(h3-h1))*100//percent
+R=E/g//R C R
+RC=w/(p*h)//R C R 
+F=w/h//lb per hp hr
+//RESULTS
+printf('The tsteam prime mover operating under condition for Ranking Cycle=% f lb per hp hr',F)