diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /24/CH17 | |
download | Scilab-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-x | 24/CH17/EX17.1/Example17_1.sce | 30 | ||||
-rwxr-xr-x | 24/CH17/EX17.1/Example17_1_result.txt | 13 | ||||
-rwxr-xr-x | 24/CH17/EX17.2/Example17_2.sce | 13 | ||||
-rwxr-xr-x | 24/CH17/EX17.2/Example17_2_result.txt | 5 | ||||
-rwxr-xr-x | 24/CH17/EX17.3/Example17_3.sce | 18 | ||||
-rwxr-xr-x | 24/CH17/EX17.3/Example17_3_result.txt | 2 | ||||
-rwxr-xr-x | 24/CH17/EX17.4/Example17_4.sce | 12 | ||||
-rwxr-xr-x | 24/CH17/EX17.4/Example17_4_result.txt | 2 | ||||
-rwxr-xr-x | 24/CH17/EX17.5/Example17_5.sce | 16 | ||||
-rwxr-xr-x | 24/CH17/EX17.5/Example17_5_result.txt | 5 | ||||
-rwxr-xr-x | 24/CH17/EX17.6/Example17_6.sce | 17 | ||||
-rwxr-xr-x | 24/CH17/EX17.6/Example17_6_result.txt | 4 | ||||
-rwxr-xr-x | 24/CH17/EX17.7/Example17_7.sce | 24 | ||||
-rwxr-xr-x | 24/CH17/EX17.7/Example17_7_result.txt | 5 |
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 |