initial commit / add all books

4 files changed, 54 insertions, 0 deletions

diff --git a/3422/CH7/EX7.1/Ex7_1.sce b/3422/CH7/EX7.1/Ex7_1.sce
new file mode 100755
index 000000000..009bb0c8f
--- /dev/null
+++ b/3422/CH7/EX7.1/Ex7_1.sce
@@ -0,0 +1,11 @@
+//Example 7.1, page 147
+clc
+G=500//in kg
+h=700// in j/kg/c
+s_lambda=%pi*.7*1*12.5
+h=(G*h)/s_lambda
+//disp(h)
+L=((10*1000)/.9)-10000
+w=1111
+T=w/s_lambda
+printf("Final tempearture rise is %f k",T)
diff --git a/3422/CH7/EX7.3/Ex7_3.sce b/3422/CH7/EX7.3/Ex7_3.sce
new file mode 100755
index 000000000..fd497cc55
--- /dev/null
+++ b/3422/CH7/EX7.3/Ex7_3.sce
@@ -0,0 +1,8 @@
+//Example 7.3, page 162
+clc
+alpha=0.9
+N=.5//in hr
+tou=1.5//in hr
+pr=25//in kw
+px=pr*sqrt(((1+alpha)/(1-exp(-N/tou)))-.9)
+printf("Power id %f kw",px)
\ No newline at end of file
diff --git a/3422/CH7/EX7.4/Ex7_4.sce b/3422/CH7/EX7.4/Ex7_4.sce
new file mode 100755
index 000000000..f4efae8cf
--- /dev/null
+++ b/3422/CH7/EX7.4/Ex7_4.sce
@@ -0,0 +1,11 @@
+//example 7.4, page 165
+clc
+pr=100//in kw
+N=18//in min
+tou=90//in min
+R=30//in min
+tou_1=120//in min
+a=N/tou
+b=R/tou_1
+px=pr*sqrt((1-exp(-(a+b)))/(1-exp(-(a))))
+printf("The power is %f kw",px)
\ No newline at end of file
diff --git a/3422/CH7/EX7.5/Ex5_7.sce b/3422/CH7/EX7.5/Ex5_7.sce
new file mode 100755
index 000000000..bb6d12cf1
--- /dev/null
+++ b/3422/CH7/EX7.5/Ex5_7.sce
@@ -0,0 +1,24 @@
+//Example , page 162//169
+clc
+Tr=(50*1000*60)/(2*%pi*960)
+//disp(Tr)
+Tmax=2*Tr
+Tmin=300//in nm
+Tlh=1500+Tmin
+t=10//in sec
+ws=(2*%pi*1000)/60//angular f
+wr=(2*%pi*960)/60//angular f
+temp=log((Tlh-Tmin)/(Tlh-Tmax))
+j=(Tr/(ws-wr))*(t/temp)
+//disp(j)
+r=.9//in m
+wt=j/r^2
+//disp(wt)
+printf("Weight of fly wheel is %f kg",wt)
+//Part b
+Tmax=994.72
+Tmin=700
+TL1=300
+temp=log((Tmax-TL1)/(Tmin-TL1))
+t=(j*temp*(ws-wr))/Tr
+printf("\n The estimated time is %f s",t)
\ No newline at end of file