From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 1397/CH2/EX2.1/2_1.sce |  8 ++++++++
 1397/CH2/EX2.2/2_2.sce |  8 ++++++++
 1397/CH2/EX2.3/2_3.sce |  8 ++++++++
 1397/CH2/EX2.4/2_4.sce |  8 ++++++++
 1397/CH2/EX2.5/2_5.sce |  8 ++++++++
 1397/CH2/EX2.6/2_6.sce |  8 ++++++++
 1397/CH2/EX2.7/2_7.sce | 12 ++++++++++++
 7 files changed, 60 insertions(+)
 create mode 100755 1397/CH2/EX2.1/2_1.sce
 create mode 100755 1397/CH2/EX2.2/2_2.sce
 create mode 100755 1397/CH2/EX2.3/2_3.sce
 create mode 100755 1397/CH2/EX2.4/2_4.sce
 create mode 100755 1397/CH2/EX2.5/2_5.sce
 create mode 100755 1397/CH2/EX2.6/2_6.sce
 create mode 100755 1397/CH2/EX2.7/2_7.sce

(limited to '1397/CH2')

diff --git a/1397/CH2/EX2.1/2_1.sce b/1397/CH2/EX2.1/2_1.sce
new file mode 100755
index 000000000..1369be1d2
--- /dev/null
+++ b/1397/CH2/EX2.1/2_1.sce
@@ -0,0 +1,8 @@
+//clc();
+clear;
+//To determine the fundamental frequency of crystal
+t=0.002;            //thickness of the crystal in metres
+V=5750;             //velocity of sound waves in metres per sec
+new=V*10^(-6)/(2*t);
+printf("fundamental frequency of the piezo electric crystal is %f MHz",new);
+
diff --git a/1397/CH2/EX2.2/2_2.sce b/1397/CH2/EX2.2/2_2.sce
new file mode 100755
index 000000000..9fd507ace
--- /dev/null
+++ b/1397/CH2/EX2.2/2_2.sce
@@ -0,0 +1,8 @@
+//clc();
+clear;
+//To determine the frequency of the fundamental note
+l=3*10^(-3);           //vibrating length in metres
+Y=8*10^10;             //Youngs modulus in N/m^2
+rho=2.5*10^3;          //density of crystal in kg/cm^3
+new=(sqrt(Y/rho))/(2*l);
+printf("the frequency of the fundamental note emitted by piezo-electric crystal is %f Hz",new);
diff --git a/1397/CH2/EX2.3/2_3.sce b/1397/CH2/EX2.3/2_3.sce
new file mode 100755
index 000000000..af16fe3a6
--- /dev/null
+++ b/1397/CH2/EX2.3/2_3.sce
@@ -0,0 +1,8 @@
+//clc();
+clear;
+//To determine the natural frequency of ultrasonic waves
+l=5.5*10^(-3);           //thickness of quartz plate in metres
+Y=8.0*10^10;             //youngs modulus of quartz in N/m^2
+rho=2.65*10^3;           //density in kg/m^3
+new=(sqrt(Y/rho))*10^(-3)/(2*l);
+printf("natural frequency of ultrasonic waves is %f KHz",new);
diff --git a/1397/CH2/EX2.4/2_4.sce b/1397/CH2/EX2.4/2_4.sce
new file mode 100755
index 000000000..b6fe82c9f
--- /dev/null
+++ b/1397/CH2/EX2.4/2_4.sce
@@ -0,0 +1,8 @@
+//clc();
+clear;
+//To determine the natural frequency of iron
+l=40*10^(-3);           //length of pure iron rod in metres
+rho=7.25*10^3;          //density of pure iron in kg/m^3
+Y=115*10^9;             //youngs modulus in N/m^2
+new=(sqrt(Y/rho))*10^(-3)/(2*l);
+printf("the natural frequency of pure iron is %f KHz",new);
diff --git a/1397/CH2/EX2.5/2_5.sce b/1397/CH2/EX2.5/2_5.sce
new file mode 100755
index 000000000..5d8e3a282
--- /dev/null
+++ b/1397/CH2/EX2.5/2_5.sce
@@ -0,0 +1,8 @@
+//clc();
+clear;
+//To determine the capacitance
+new=10^6;            //frequency of ultrasonics in Hz
+L=1;                 //Inductance in Henry
+A=4*(%pi^2)*(new^2)*L;
+C=10^12/A;
+printf("the capacitance to produce ultrasonic waves is %f PF",C);
diff --git a/1397/CH2/EX2.6/2_6.sce b/1397/CH2/EX2.6/2_6.sce
new file mode 100755
index 000000000..da4d2fd26
--- /dev/null
+++ b/1397/CH2/EX2.6/2_6.sce
@@ -0,0 +1,8 @@
+//clc();
+clear;
+//To determine the fundamental frequency
+l=3*10^(-3);           //vibrating length of piezo electric crystal in metres
+rho=3.5*10^3;          //density of piezo electric crystal in kg/m^3
+Y=8*10^10;             //youngs modulus in N/m^2
+new=((10^-3)*(sqrt(Y/rho))*10^(-3))/(2*l);
+printf("the fundamental frequency is %f Hz",new);
diff --git a/1397/CH2/EX2.7/2_7.sce b/1397/CH2/EX2.7/2_7.sce
new file mode 100755
index 000000000..739bef271
--- /dev/null
+++ b/1397/CH2/EX2.7/2_7.sce
@@ -0,0 +1,12 @@
+//clc();
+clear;
+//To determine the fundamental frequency
+t=0.001;           //thickness of the crystal in metres
+rho=2650;          //density of quartz in kg/m^3
+Y=7.9*10^10;             //youngs modulus in N/m^2
+V=sqrt(Y/rho);
+printf("the fundamental frequency is %f m/s",V);
+//For fundamental mode of vibration, the thickness must be equal to lambda/2
+lambda=2*t;
+new=V/lambda;
+printf("the fundamental frequency is %f Hz",new);
-- 
cgit