From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3875/CH1/EX1.3/1_3.txt   |  2 ++
 3875/CH1/EX1.3/Ex1_3.sce | 21 +++++++++++++++++++++
 2 files changed, 23 insertions(+)
 create mode 100644 3875/CH1/EX1.3/1_3.txt
 create mode 100644 3875/CH1/EX1.3/Ex1_3.sce

(limited to '3875/CH1/EX1.3')

diff --git a/3875/CH1/EX1.3/1_3.txt b/3875/CH1/EX1.3/1_3.txt
new file mode 100644
index 000000000..c564134cb
--- /dev/null
+++ b/3875/CH1/EX1.3/1_3.txt
@@ -0,0 +1,2 @@
+Amplitude of oscillation = 1.26e-02 m
+Phase relative to the applied force is = 161.6 degree
\ No newline at end of file
diff --git a/3875/CH1/EX1.3/Ex1_3.sce b/3875/CH1/EX1.3/Ex1_3.sce
new file mode 100644
index 000000000..55cb9d52e
--- /dev/null
+++ b/3875/CH1/EX1.3/Ex1_3.sce
@@ -0,0 +1,21 @@
+clc ;
+clear ;
+m=0.1 // mass in kg
+K=100 //spring constant in N/m
+c=1 //resistive force in Nsm^-1
+F0=2 //force in N
+omega=50 //frequency in rad/s
+
+//calculation
+
+omega_n=sqrt(K/m) //in rad/s
+r=omega/omega_n 
+delta_st=F0/K //in m
+damp_ratio=c/(2*m*omega_n)
+A=delta_st/(sqrt((1-r^2)^2+(2*r*damp_ratio)^2))
+tan_phi=(2*r*damp_ratio)/(1-r^2) //in degree
+phi=180+atand(tan_phi) //converting degree to postive form
+
+mprintf("Amplitude of oscillation = %1.2e m\n",A)
+mprintf("Phase relative to the applied force is = %1.1f degree",phi) 
+//The answers vary due to round of errors
-- 
cgit