summaryrefslogtreecommitdiff
path: root/24/CH17
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /24/CH17
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '24/CH17')
-rwxr-xr-x24/CH17/EX17.1/Example17_1.sce30
-rwxr-xr-x24/CH17/EX17.1/Example17_1_result.txt13
-rwxr-xr-x24/CH17/EX17.2/Example17_2.sce13
-rwxr-xr-x24/CH17/EX17.2/Example17_2_result.txt5
-rwxr-xr-x24/CH17/EX17.3/Example17_3.sce18
-rwxr-xr-x24/CH17/EX17.3/Example17_3_result.txt2
-rwxr-xr-x24/CH17/EX17.4/Example17_4.sce12
-rwxr-xr-x24/CH17/EX17.4/Example17_4_result.txt2
-rwxr-xr-x24/CH17/EX17.5/Example17_5.sce16
-rwxr-xr-x24/CH17/EX17.5/Example17_5_result.txt5
-rwxr-xr-x24/CH17/EX17.6/Example17_6.sce17
-rwxr-xr-x24/CH17/EX17.6/Example17_6_result.txt4
-rwxr-xr-x24/CH17/EX17.7/Example17_7.sce24
-rwxr-xr-x24/CH17/EX17.7/Example17_7_result.txt5
14 files changed, 166 insertions, 0 deletions
diff --git a/24/CH17/EX17.1/Example17_1.sce b/24/CH17/EX17.1/Example17_1.sce
new file mode 100755
index 000000000..01f1e2f81
--- /dev/null
+++ b/24/CH17/EX17.1/Example17_1.sce
@@ -0,0 +1,30 @@
+//Given that
+funcprot(0)
+deff('[y] = wave(t, x)', 'y = 0.00327*sin(72.1*x - 2.72*t)')
+//Comparing the given equation with the standard wave equation
+A = 0.00327 //in m
+k = 72.1 //in rad/s
+w = 2.72 //in rad/s
+
+//Sample Problem 17-1a
+printf("**Sample Problem 17-1a**\n")
+printf("The amplitude of the wave is %fm\n", A)
+
+//Sample Problem 17-1b
+printf("\n**Sample Problem 17-1b**\n")
+lambda = 2*%pi/k
+printf(" wavelength = %fm\n", lambda)
+T = 2*%pi/w
+printf(" period = %fs\n",T)
+f = 1/T
+printf(" frequency = %fHz\n", f)
+
+//Sample Problem 17-1c
+printf("\n**Sample Problem 17-1c**\n")
+v = w/k
+printf("The velocity of the wave is %fm/s\n", v)
+
+//Sample Problem 17-1d
+printf("\n**Sample Problem 17-1d**\n")
+y = wave(18.9, 22.5*10^-2)
+printf("Displacement of the wave is %fm", y) \ No newline at end of file
diff --git a/24/CH17/EX17.1/Example17_1_result.txt b/24/CH17/EX17.1/Example17_1_result.txt
new file mode 100755
index 000000000..2cea0a33e
--- /dev/null
+++ b/24/CH17/EX17.1/Example17_1_result.txt
@@ -0,0 +1,13 @@
+**Sample Problem 17-1a**
+The amplitude of the wave is 0.003270m
+
+**Sample Problem 17-1b**
+ wavelength = 0.087145m
+ period = 2.309995s
+ frequency = 0.432901Hz
+
+**Sample Problem 17-1c**
+The velocity of the wave is 0.037725m/s
+
+**Sample Problem 17-1d**
+Displacement of the wave is 0.001921m \ No newline at end of file
diff --git a/24/CH17/EX17.2/Example17_2.sce b/24/CH17/EX17.2/Example17_2.sce
new file mode 100755
index 000000000..5ecaaa912
--- /dev/null
+++ b/24/CH17/EX17.2/Example17_2.sce
@@ -0,0 +1,13 @@
+exec('Example17_1.sce', -1)
+clc
+
+//Sample Problem 17-2a
+printf("\n\n**Sample Problem 17-2a**\n")
+v = numdiff(list(wave, 22.5*10^-2), 18.9)
+printf("The velocity of the particle is %fm/s\n", v)
+
+//Sample Problem 17-2b
+printf("\n**Sample Problem 17-2b**\n")
+dx = 0.001
+a = (numdiff(list(wave, 22.5*10^-2), 18.9+dx) - numdiff(list(wave, 22.5*10^-2), 18.9))/dx
+printf("The acceleration of the particle is %fm/s^2", a) \ No newline at end of file
diff --git a/24/CH17/EX17.2/Example17_2_result.txt b/24/CH17/EX17.2/Example17_2_result.txt
new file mode 100755
index 000000000..1ffbb9c17
--- /dev/null
+++ b/24/CH17/EX17.2/Example17_2_result.txt
@@ -0,0 +1,5 @@
+**Sample Problem 17-2a**
+The velocity of the particle is 0.007197m/s
+
+**Sample Problem 17-2b**
+The acceleration of the particle is -0.014237m/s^2 \ No newline at end of file
diff --git a/24/CH17/EX17.3/Example17_3.sce b/24/CH17/EX17.3/Example17_3.sce
new file mode 100755
index 000000000..99374f7a4
--- /dev/null
+++ b/24/CH17/EX17.3/Example17_3.sce
@@ -0,0 +1,18 @@
+//Given that
+u1 = 1.4*10^-4 //in kg/m
+u2 = 2.8*10^-4 //in kg/m
+L1 = 3.0 //in m
+L2 = 2.0 //in m
+T = 400 //in N
+
+//Sample Problem 17-3
+printf("**Sample Problem 17-3**\n")
+v1 = sqrt(T/u1)
+v2 = sqrt(T/u2)
+t1 = L1/v1
+t2 = L2/v2
+if t1<t2 then
+ printf("The pulse on string1 will reach the knot first")
+else
+ printf("The pulse on string2 will reach the knot first")
+end \ No newline at end of file
diff --git a/24/CH17/EX17.3/Example17_3_result.txt b/24/CH17/EX17.3/Example17_3_result.txt
new file mode 100755
index 000000000..0be2f5b38
--- /dev/null
+++ b/24/CH17/EX17.3/Example17_3_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 17-3**
+The pulse on string2 will reach the knot first \ No newline at end of file
diff --git a/24/CH17/EX17.4/Example17_4.sce b/24/CH17/EX17.4/Example17_4.sce
new file mode 100755
index 000000000..ab252a47f
--- /dev/null
+++ b/24/CH17/EX17.4/Example17_4.sce
@@ -0,0 +1,12 @@
+//Given that
+u = 525*10^-3 //in kg/m
+T = 45 //in N
+f = 120 //in Hz
+Ym = 8.5*10^-3 //in meter
+
+//Sample Problem 17-4
+printf("**Sample Problem 17-4**\n")
+v = sqrt(T/u)
+w = 2*%pi*f
+Pavg = 0.5*u*v*w^2*Ym^2
+printf("The average power transfered is equal to %fW", Pavg) \ No newline at end of file
diff --git a/24/CH17/EX17.4/Example17_4_result.txt b/24/CH17/EX17.4/Example17_4_result.txt
new file mode 100755
index 000000000..348d2d097
--- /dev/null
+++ b/24/CH17/EX17.4/Example17_4_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 17-4**
+The average power transfered is equal to 99.819639W \ No newline at end of file
diff --git a/24/CH17/EX17.5/Example17_5.sce b/24/CH17/EX17.5/Example17_5.sce
new file mode 100755
index 000000000..6595ba9b9
--- /dev/null
+++ b/24/CH17/EX17.5/Example17_5.sce
@@ -0,0 +1,16 @@
+exec('degree_rad.sci', -1)
+
+//Given that
+Ym = 9.8*10^-3 //in meter
+phi = dtor(100) //in degrees
+
+//Sample Problem 17-5a
+printf("**Sample Problem 17-5a**\n")
+Yn = 2*Ym*cos(phi/2)
+printf("The amplitude of resultant wave is %fmm\n", Yn*10^3)
+
+//Sample Problem 17-5b
+printf("\n**Sample Problem 17-5b**\n")
+Y = 4.9*10^-3 //in meter
+phi = 2*acos(Y/(2*Ym))
+printf("The phase difference required is %frad", phi) \ No newline at end of file
diff --git a/24/CH17/EX17.5/Example17_5_result.txt b/24/CH17/EX17.5/Example17_5_result.txt
new file mode 100755
index 000000000..de8083ba2
--- /dev/null
+++ b/24/CH17/EX17.5/Example17_5_result.txt
@@ -0,0 +1,5 @@
+**Sample Problem 17-5a**
+The amplitude of resultant wave is 12.598637mm
+
+**Sample Problem 17-5b**
+The phase difference required is 2.636232rad \ No newline at end of file
diff --git a/24/CH17/EX17.6/Example17_6.sce b/24/CH17/EX17.6/Example17_6.sce
new file mode 100755
index 000000000..3aee4f3d0
--- /dev/null
+++ b/24/CH17/EX17.6/Example17_6.sce
@@ -0,0 +1,17 @@
+//Given that
+Ym1 = 4.0*10^-3 //in meter
+Ym2 = 3.0*10^-3 //in meter
+phi1 = 0 //in rad
+phi2 = %pi/3 //in rad
+
+//Sample Problem 17-6
+printf("**Sample Problem 17-6**\n")
+//For horizontal component
+Ymh = Ym1*cos(phi1) + Ym2*cos(phi2)
+//For vertical component
+Ymv = Ym1*sin(phi1) + Ym2*sin(phi2)
+Ym = sqrt(Ymv^2 + Ymh^2)
+beta = atan(Ymv/Ymh)
+printf("The amplitude of the resultant wave is equal to %fmm\n", Ym*10^3)
+printf("The phase constant for the wave is %frad\n", beta)
+printf("The equation of wave is %f*sin(k*x - w*t + %frad)",Ym, beta) \ No newline at end of file
diff --git a/24/CH17/EX17.6/Example17_6_result.txt b/24/CH17/EX17.6/Example17_6_result.txt
new file mode 100755
index 000000000..5ad5e5daa
--- /dev/null
+++ b/24/CH17/EX17.6/Example17_6_result.txt
@@ -0,0 +1,4 @@
+**Sample Problem 17-6**
+The amplitude of the resultant wave is equal to 6.082763mm
+The phase constant for the wave is 0.441306rad
+The equation of wave is 0.006083*sin(k*x - w*t + 0.441306rad) \ No newline at end of file
diff --git a/24/CH17/EX17.7/Example17_7.sce b/24/CH17/EX17.7/Example17_7.sce
new file mode 100755
index 000000000..3cafb6b51
--- /dev/null
+++ b/24/CH17/EX17.7/Example17_7.sce
@@ -0,0 +1,24 @@
+//Given that
+L = 1.2 //in meter
+u = 1.6*10^-3 //in kg/m
+f = 120 //in Hz
+g = 9.8 //in m/s^2
+
+//Sample Problem 17-7a
+printf("**Sample Problem 17-7a**\n")
+n = 4
+//T = m*g
+//v = sqrt(m*g/u)
+//f = n*v/(2*L)
+m = (2*L*f)^2*u/(g*n^2)
+printf("The value of m should be %fkg\n", m)
+
+//Sample Problem 17-7b
+printf("\n**Sample Problem 17-7b**\n")
+M = 1 //in kg
+n = sqrt((2*L*f)^2*u/(g*M))
+if abs(n - round(n)) < 0.01 then
+ printf("The allowed wave mode is %d", n)
+else
+ printf("No wave mode will be allowed")
+end \ No newline at end of file
diff --git a/24/CH17/EX17.7/Example17_7_result.txt b/24/CH17/EX17.7/Example17_7_result.txt
new file mode 100755
index 000000000..348ae340e
--- /dev/null
+++ b/24/CH17/EX17.7/Example17_7_result.txt
@@ -0,0 +1,5 @@
+**Sample Problem 17-7a**
+The value of m should be 0.846367kg
+
+**Sample Problem 17-7b**
+No wave mode will be allowed \ No newline at end of file