initial commit / add all books

10 files changed, 63 insertions, 0 deletions

diff --git a/3014/CH6/EX6.1/Ex6_1.sce b/3014/CH6/EX6.1/Ex6_1.sce
new file mode 100755
index 000000000..2b42ec99a
--- /dev/null
+++ b/3014/CH6/EX6.1/Ex6_1.sce
@@ -0,0 +1,11 @@
+

+clc 

+//Given that

+E = 7.9e10 // Young’s modulus in N/m^2

+rho = 2650 // Density in Kg/m^3

+t = 0.003 // Thickness of quartz crystal in m

+printf("Example 6.1\n")

+v = sqrt(E/rho)// Calculation of velocity 

+lambda = 2*t // Calculation of fundamental wavelength

+nu = v/lambda // Calculation of fundamental frequency

+printf("Fundamental frequency is %e Hz.\n\n\n",nu)

diff --git a/3014/CH6/EX6.1/Ex6_1.txt b/3014/CH6/EX6.1/Ex6_1.txt
new file mode 100755
index 000000000..8480c8df7
--- /dev/null
+++ b/3014/CH6/EX6.1/Ex6_1.txt
@@ -0,0 +1,2 @@
+ Example 6.1

+Fundamental frequency is 9.099957e+05 Hz.
\ No newline at end of file
diff --git a/3014/CH6/EX6.2/Ex6_2.sce b/3014/CH6/EX6.2/Ex6_2.sce
new file mode 100755
index 000000000..875b9ca11
--- /dev/null
+++ b/3014/CH6/EX6.2/Ex6_2.sce
@@ -0,0 +1,9 @@
+

+clc 

+//Given that

+v = 5760 // Velocity in m/s

+T = 1.6 // Thickness of quartz crystal in mm

+printf("Example 6.2\n")

+nu = v/(2*T*1e-3)// Calculation of fundamental frequency

+printf("Fundamental frequency of crystal is %f MHz.\n\n\n",nu/1e6)

+

diff --git a/3014/CH6/EX6.2/Ex6_2.txt b/3014/CH6/EX6.2/Ex6_2.txt
new file mode 100755
index 000000000..794c8f6ed
--- /dev/null
+++ b/3014/CH6/EX6.2/Ex6_2.txt
@@ -0,0 +1,3 @@
+

+Example 6.2

+Fundamental frequency of crystal is 1.800000 MHz.

diff --git a/3014/CH6/EX6.3/Ex6_3.sce b/3014/CH6/EX6.3/Ex6_3.sce
new file mode 100755
index 000000000..51313c93d
--- /dev/null
+++ b/3014/CH6/EX6.3/Ex6_3.sce
@@ -0,0 +1,9 @@
+ 

+clc 

+//Given that

+T =40 // Thickness of steel bar in cm

+t1 = 40 // Time in ms

+t2 = 80 // Time in ms

+printf("Example 6.3\n")

+X = T*t1/t2 // Calculation of depth of defect

+printf("Depth of defect is %d cm.\n\n\n",X)

diff --git a/3014/CH6/EX6.3/Ex6_3.txt b/3014/CH6/EX6.3/Ex6_3.txt
new file mode 100755
index 000000000..0644bda81
--- /dev/null
+++ b/3014/CH6/EX6.3/Ex6_3.txt
@@ -0,0 +1,3 @@
+

+Example 6.3

+Depth of defect is 20 cm.

diff --git a/3014/CH6/EX6.4/Ex6_4.sce b/3014/CH6/EX6.4/Ex6_4.sce
new file mode 100755
index 000000000..ce81ea668
--- /dev/null
+++ b/3014/CH6/EX6.4/Ex6_4.sce
@@ -0,0 +1,11 @@
+clc 

+//Given that

+E = 7.9e10 // Young’s modulus in N/m^2

+rho = 2650 // Density in Kg/m^3

+t = 0.006 // Thickness of quartz crystal in m

+printf("Example 6.4\n")

+v = sqrt(E/rho)// Calculation of velocity 

+lambda = 2*t // Calculation of fundamental wavelength

+nu = v/lambda // Calculation of fundamental frequency

+printf("Fundamental frequency is %e Hz.\n\n\n",nu)

+

diff --git a/3014/CH6/EX6.4/Ex6_4.txt b/3014/CH6/EX6.4/Ex6_4.txt
new file mode 100755
index 000000000..1b30d8157
--- /dev/null
+++ b/3014/CH6/EX6.4/Ex6_4.txt
@@ -0,0 +1,3 @@
+

+Example 6.4

+Fundamental frequency is 4.549979e+05 Hz.

diff --git a/3014/CH6/EX6.5/Ex6_5.sce b/3014/CH6/EX6.5/Ex6_5.sce
new file mode 100755
index 000000000..3155fcd7d
--- /dev/null
+++ b/3014/CH6/EX6.5/Ex6_5.sce
@@ -0,0 +1,9 @@
+

+clc 

+//Given that

+L = 1 // Inductance in Hanery

+nu = 2e6 // Frequency in Hz

+printf("Example 6.5\n")

+C= 1/(4*((%pi)^2)*nu^2*L) // Calculation of capacitance

+printf("Capacitance is %e microfarad.\n\n\n",C*1e6)

+// Answer in book is 0.00634 micro Farad

diff --git a/3014/CH6/EX6.5/Ex6_5.txt b/3014/CH6/EX6.5/Ex6_5.txt
new file mode 100755
index 000000000..76984269a
--- /dev/null
+++ b/3014/CH6/EX6.5/Ex6_5.txt
@@ -0,0 +1,3 @@
+

+Example 6.5

+Capacitance is 6.332574e-09microfarad.