summaryrefslogtreecommitdiff
path: root/3886/CH22/EX22.4/22_4.sce
diff options
context:
space:
mode:
authorprashantsinalkar2018-02-03 11:01:52 +0530
committerprashantsinalkar2018-02-03 11:01:52 +0530
commit7bc77cb1ed33745c720952c92b3b2747c5cbf2df (patch)
tree449d555969bfd7befe906877abab098c6e63a0e8 /3886/CH22/EX22.4/22_4.sce
parentd1e070fe2d77c8e7f6ba4b0c57b1b42e26349059 (diff)
downloadScilab-TBC-Uploads-7bc77cb1ed33745c720952c92b3b2747c5cbf2df.tar.gz
Scilab-TBC-Uploads-7bc77cb1ed33745c720952c92b3b2747c5cbf2df.tar.bz2
Scilab-TBC-Uploads-7bc77cb1ed33745c720952c92b3b2747c5cbf2df.zip
Added new codeHEADmaster
Diffstat (limited to '3886/CH22/EX22.4/22_4.sce')
-rw-r--r--3886/CH22/EX22.4/22_4.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/3886/CH22/EX22.4/22_4.sce b/3886/CH22/EX22.4/22_4.sce
new file mode 100644
index 000000000..ec7aa2d40
--- /dev/null
+++ b/3886/CH22/EX22.4/22_4.sce
@@ -0,0 +1,17 @@
+//Length of crank
+//refer fig. 22.6 (a)
+//angular velocity
+omega=(1500*2*%pi)/(60) //rad/sec
+r=0.100
+//Tangential velocity of end B
+vB=r*omega //m/sec
+//Consider motion of connecting rod BC
+theta=asind((100*sind(30))/(250)) //degree
+//Refer fig. 22.6
+//Let omega' be the angular velocity of BC
+omega1=13.6035/0.244 //rad/sec
+//Considering horizontal component of velocities
+vC=15.7080*cosd(60)+0.25*55.547*sind(11.5378) //m/sec
+printf("\nomega1=%.3f rad/sec\nvC=%.2f m/sec",omega1,vC)
+
+