4 files changed, 69 insertions, 0 deletions
diff --git a/2666/CH4/EX4.1/4_1.sce b/2666/CH4/EX4.1/4_1.sce
new file mode 100755
index 000000000..a2cf344c9
--- /dev/null
+++ b/2666/CH4/EX4.1/4_1.sce
@@ -0,0 +1,20 @@
+clc
+//initialisation of variables
+a=60//cu ft per min
+p=14.0//psia
+t1=75//F
+t2=275//F
+m=6//in
+h=144//ft
+w=53.35//cu ft
+t3=535//F
+h1=0.24//ft
+k=33000//ft
+t4=778//R
+//CALCULATIONS
+W=(h*p*a)/(w*t3)//lb per min
+H=W*h1*(t1-t2)//Btu per min
+J=m*(k/t4)//Btu per min
+Q=H+J//Btu per min
+//RESULTS
+printf('The radiation from the compressor per minute=% f Btu per min',Q)
diff --git a/2666/CH4/EX4.2/4_2.sce b/2666/CH4/EX4.2/4_2.sce
new file mode 100755
index 000000000..555fc16fe
--- /dev/null
+++ b/2666/CH4/EX4.2/4_2.sce
@@ -0,0 +1,19 @@
+clc
+//initialisation of variables
+d=0.24//ft
+p1=40//psia
+t=240//F
+p2=39//psi
+t2=70//F
+b=26.48//in
+f=200//cu ft
+h=0.491//ft
+w=144//ft
+q=53.35//ft
+t3=700//ft
+//CALCULATIONS
+P=p1+h*b//psia
+W=(w*P*f)/(q*t3)//lb per min
+H=W*d*(t-t2)//Btu per min
+//RESULTS
+printf('The heat removed from the air =% f Btu per min',H)
diff --git a/2666/CH4/EX4.3/Ex4_3.sce b/2666/CH4/EX4.3/Ex4_3.sce
new file mode 100755
index 000000000..98f37eb36
--- /dev/null
+++ b/2666/CH4/EX4.3/Ex4_3.sce
@@ -0,0 +1,16 @@
+
+clc
+//initialisation of variables
+p=1250//Btu per lb
+E=1075//Btu per lb
+f=4290//lb per hr
+d=290//hp
+h=33000//ft
+t=778//R
+t1=60//sec
+//CALCULATIONS
+H=f*(p-E)//Btu per hr
+W=(d*h*t1)/t//Btu per hr
+Q=H-W//Btu per hr
+//RESULTS
+printf('The radiation loss per hour from the engine=% f Btu per hr',Q)
diff --git a/2666/CH4/EX4.4/4_4.sce b/2666/CH4/EX4.4/4_4.sce
new file mode 100755
index 000000000..6f23cb373
--- /dev/null
+++ b/2666/CH4/EX4.4/4_4.sce
@@ -0,0 +1,14 @@
+clc
+//initialisation of variables
+t=1200//F
+t1=1660//F
+p1=39.7//lbf
+p2=14.7//lbf
+cp=0.24//Btu
+v1=4930000//ft
+//CALCULATIONS
+T=(t1)/(p1/p2)^(0.4/1.4)//R
+V=cp*(t1-T)//Btu
+V2=sqrt(v1)//ft per sec
+//RESULTS
+printf('the steady of flow equation reduces=% f ft per sec',V2)