summaryrefslogtreecommitdiff
path: root/3537/CH8/EX8.8/Ex8_8.sce
blob: f8c9ec33b517ff446025668ac17df466b0037205 (plain)
1
2
3
4
5
6
7
8
9
//Example 8_8
clc();
clear;
//To calculate fundamental frequency of piezo electric crystal
l=3*10^-3                        //units in meters
Y=8*10^10                       //units in N/m^2
d=2.5*10^3                     //units in kg/m^3
v=(1/(2*l))*sqrt(Y/d)
printf("Frequency=%d Hz",v)