initial commit / add all books

9 files changed, 116 insertions, 0 deletions

diff --git a/1460/CH4/EX4.1/4_1.sce b/1460/CH4/EX4.1/4_1.sce
new file mode 100755
index 000000000..65bbb6b35
--- /dev/null
+++ b/1460/CH4/EX4.1/4_1.sce
@@ -0,0 +1,25 @@
+clc

+//Initialization of variables

+m=0.5 //lbm/sec

+Pi=14 //lb/in^2

+SVi=13 //ft^3/lbm

+Vi=100 //ft/sec

+P=75.5 //hp

+Hr=8.65 //zB/sec

+Pd=150 //lb/in^2

+SVd=2.1 //ft^3/lb

+Vd=200 //ft/sec

+z1=3 //ft

+z2=10 //ft

+//calculations

+WbyJ=P*550/(m*778)

+Q=Hr/m

+Wi=144*Pi*SVi/(778)

+Wo=144*Pd*SVd/(778)

+PEi=z1/778

+PEf=z2/778

+KEi=Vi^2 /(2*32.2*778)

+KEf=Vd^2 /(2*32.2*778)

+du=-Q+WbyJ+PEi-PEf+KEi-KEf+Wi-Wo

+//results

+printf("Increase in internal energy = %.1f B/lbm",du)

diff --git a/1460/CH4/EX4.2/4_2.sce b/1460/CH4/EX4.2/4_2.sce
new file mode 100755
index 000000000..d5b2e8f76
--- /dev/null
+++ b/1460/CH4/EX4.2/4_2.sce
@@ -0,0 +1,14 @@
+clc

+//Initialization of variables

+d=500 //ft

+Pi=14 //lb/in^2

+Pd=15 //lb/in^2

+Sv=0.016 //ft^3 /lb

+//calculations

+Wi=144*Pi*Sv

+Wf=144*Pd*Sv

+PEi=0

+PEf=d

+Winput=Wf-Wi+PEf-PEi

+//results

+printf("Input work = %.1f ft-lb/lbm",Winput)

diff --git a/1460/CH4/EX4.3/4_3.sce b/1460/CH4/EX4.3/4_3.sce
new file mode 100755
index 000000000..9c955c3cb
--- /dev/null
+++ b/1460/CH4/EX4.3/4_3.sce
@@ -0,0 +1,14 @@
+clc

+//Initialization of variables

+T1=70  //F

+T2=140 //F

+m=10 //lb

+Cp=1 //B/lbm F

+//calculations

+Q=Cp*(T2-T1)

+Qdot=m*Q

+w=0

+//results

+printf("Work done = %d",w)

+printf("\n Change in enthalpy= %d",Qdot)

+printf("\n Heat added per pound = %d ",Q)

diff --git a/1460/CH4/EX4.4/4_4.sce b/1460/CH4/EX4.4/4_4.sce
new file mode 100755
index 000000000..a3ce3b0f1
--- /dev/null
+++ b/1460/CH4/EX4.4/4_4.sce
@@ -0,0 +1,11 @@
+clc

+//Initialization of variables

+W=64000 //ft-lbm/lb

+P=14 //lb/in^2

+W2=48000 //ft-lbm/lb

+//calculations

+dh1=W/778

+dh2=W2/778

+//results

+printf("For the actual process = %.1f B/lbm",dh1)

+printf("\n For the frictionless process = %.1f B/lbm",dh2)

diff --git a/1460/CH4/EX4.5/4_5.sce b/1460/CH4/EX4.5/4_5.sce
new file mode 100755
index 000000000..42741a12b
--- /dev/null
+++ b/1460/CH4/EX4.5/4_5.sce
@@ -0,0 +1,8 @@
+clc

+//Initialization of variables

+ht=308 //B/lbm

+h=298 //B/lbm

+//calculations

+V=sqrt(2*32.2*778*(ht-h))

+//results

+printf("Velocity of tha gas= %d ft/sec",V)

diff --git a/1460/CH4/EX4.6/4_6.sce b/1460/CH4/EX4.6/4_6.sce
new file mode 100755
index 000000000..2090a27eb
--- /dev/null
+++ b/1460/CH4/EX4.6/4_6.sce
@@ -0,0 +1,9 @@
+clc

+//Initialization of variables

+hp=10000 //hp

+v=100 //lbm/sec

+//calculations

+W=hp*550/v

+enthalpy=W/778

+//results

+printf("Decrease in stagnation enthalpy= %.1f B/lbm",enthalpy)

diff --git a/1460/CH4/EX4.7/4_7.sce b/1460/CH4/EX4.7/4_7.sce
new file mode 100755
index 000000000..3df6261be
--- /dev/null
+++ b/1460/CH4/EX4.7/4_7.sce
@@ -0,0 +1,14 @@
+clc

+//Initialization of variables

+w1=100 //lbm

+w2=2 //lbm

+h1=127 //B/lbm

+h2=125 //B/lbm

+hc=401 //B/lbm

+//calculations

+ht1=w1*h1

+ht2=w2*h2

+ht3=(w1+w2)*hc

+Q=ht3-ht1-ht2

+//results

+printf("Heat liberated = %d B/sec",Q)

diff --git a/1460/CH4/EX4.8/4_8.sce b/1460/CH4/EX4.8/4_8.sce
new file mode 100755
index 000000000..aaa8b8718
--- /dev/null
+++ b/1460/CH4/EX4.8/4_8.sce
@@ -0,0 +1,9 @@
+clc

+//Initialization of variables

+du=75 //B/lbm

+m=0.01 //lbm

+//calculations

+W=778*du

+Wdot=m*W

+//results

+printf("Work for the process = %d ft-lb",Wdot)

diff --git a/1460/CH4/EX4.9/4_9.sce b/1460/CH4/EX4.9/4_9.sce
new file mode 100755
index 000000000..ea6d91a8d
--- /dev/null
+++ b/1460/CH4/EX4.9/4_9.sce
@@ -0,0 +1,12 @@
+clc

+//Initialization of variables

+m=0.5 //lbm

+//calculations

+disp("From tables")

+h1=48.02 //B/lbm

+hf=180.07 //B/lbm

+hfg=970.3 //B/lbm

+h2=hf+m*hfg

+Q=h2-h1

+//results

+printf("Heat added = %.1f B",Q)