summaryrefslogtreecommitdiff
path: root/3886/CH22/EX22.9/22_9.sce
diff options
context:
space:
mode:
Diffstat (limited to '3886/CH22/EX22.9/22_9.sce')
-rw-r--r--3886/CH22/EX22.9/22_9.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/3886/CH22/EX22.9/22_9.sce b/3886/CH22/EX22.9/22_9.sce
new file mode 100644
index 000000000..996d5d633
--- /dev/null
+++ b/3886/CH22/EX22.9/22_9.sce
@@ -0,0 +1,12 @@
+//Uniform bar
+//refer fig. 22.15(a),(b),(c),(d),(e) and (f)
+beta=atand(0.6928/1.7856) //degree
+//aG=alpha*sqrt((1.7856^2)+(0.6928^2))
+I=(300*1.6^2)/(12*9.81)
+//Equating
+alpha=((300*0.6928)/(82.3160)) //rad/sec^2
+//Taking horizontal components of the forces
+NB=(300*1.7856*2.5249)/(9.81*cosd(45)) //N
+//Taking vertical components of the forces
+NA=(300)-(194.98*sind(45))+((300*0.6928*2.5249)/(9.81)) //N (Printing mistake in text book)
+printf("\nNA=%.2f N\nNB=%.2f N\nalpha=%.2f rad/sec^2",NA,NB,alpha)