diff options
Diffstat (limited to '3532/CH4/EX4.5/Ex4_5.sce')
| -rw-r--r-- | 3532/CH4/EX4.5/Ex4_5.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/3532/CH4/EX4.5/Ex4_5.sce b/3532/CH4/EX4.5/Ex4_5.sce new file mode 100644 index 000000000..6b19a1838 --- /dev/null +++ b/3532/CH4/EX4.5/Ex4_5.sce @@ -0,0 +1,15 @@ +clc
+clear
+mprintf('Mechanical vibrations by G.K.Grover\n Example 4.4.1\n')
+//given data
+T=0.8//time period of free vibration in sec
+t=0.3//time for which the vertical distance has to be calculated
+//y=18*sin(2*pi*t)
+Y=18//max amplitude in mm
+//calculations
+W=2*%pi
+Wn=(2*%pi/T)
+bet=(W/Wn)
+x=(Y/(1-bet^2))*(sin(W*t)-bet*sin(Wn*t))// from eqn 4.4.17 explained in the same problem
+//output
+mprintf('The vertical distance moved by mass in the first 0.3 sec is %4.4f mm',x)
|