summaryrefslogtreecommitdiff
path: root/2309/CH1/EX1.1/Ex1_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '2309/CH1/EX1.1/Ex1_1.sce')
-rwxr-xr-x2309/CH1/EX1.1/Ex1_1.sce20
1 files changed, 20 insertions, 0 deletions
diff --git a/2309/CH1/EX1.1/Ex1_1.sce b/2309/CH1/EX1.1/Ex1_1.sce
new file mode 100755
index 000000000..607521f92
--- /dev/null
+++ b/2309/CH1/EX1.1/Ex1_1.sce
@@ -0,0 +1,20 @@
+// Chapter 1 Example 1
+//==============================================================================
+clc;
+clear;
+
+//input data
+
+P = 1; // for fundamental mode
+t = 0.1*10^-2; // thickness of piezo electric crystal
+E = 80*10^9 // young's modulus
+p = 2654 // density in kg/m^3
+
+//Calculations
+
+f = (P/(2*t))*sqrt(E/p); // frequency of the oscillator circuit
+
+//Output
+mprintf('The Frequency of the oscillator circuit = %e Hz',f);
+
+//==============================================================================