1 files changed, 12 insertions, 0 deletions
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);