summaryrefslogtreecommitdiff
path: root/3862/CH6
diff options
context:
space:
mode:
Diffstat (limited to '3862/CH6')
-rw-r--r--3862/CH6/EX6.1/Ex6_1.sce20
-rw-r--r--3862/CH6/EX6.10/Ex6_10.sce10
-rw-r--r--3862/CH6/EX6.11/Ex6_11.sce13
-rw-r--r--3862/CH6/EX6.12/Ex6_12.sce12
-rw-r--r--3862/CH6/EX6.13/Ex6_13.sce11
-rw-r--r--3862/CH6/EX6.14/Ex6_14.sce9
-rw-r--r--3862/CH6/EX6.16/Ex6_16.sce12
-rw-r--r--3862/CH6/EX6.17/Ex6_17.sce24
-rw-r--r--3862/CH6/EX6.18/Ex6_18.sce14
-rw-r--r--3862/CH6/EX6.2/Ex6_2.sce25
-rw-r--r--3862/CH6/EX6.3/Ex6_3.sce25
-rw-r--r--3862/CH6/EX6.7/Ex6_7.sce10
-rw-r--r--3862/CH6/EX6.8/Ex6_8.sce11
-rw-r--r--3862/CH6/EX6.9/Ex6_9.sce13
14 files changed, 209 insertions, 0 deletions
diff --git a/3862/CH6/EX6.1/Ex6_1.sce b/3862/CH6/EX6.1/Ex6_1.sce
new file mode 100644
index 000000000..72f566c04
--- /dev/null
+++ b/3862/CH6/EX6.1/Ex6_1.sce
@@ -0,0 +1,20 @@
+clear
+//
+W = 10000.0 //Load
+P = 500.0 //Effort
+D = 20.0 //Distance moved by the effort
+d = 0.8 //Distance moved by the load
+MA=W/P //Mechanical advantage
+VR=D/d //Velocity Ratio
+Efficiency=MA/VR
+Pi =W/VR //Ideal effort
+Wi = P*VR //ideal load
+efl=P-Pi //Effort lost in friction
+Fr=Wi-W //frictional resistance
+printf(" Mechanical advantage-- %0.3f",MA)
+printf("\n Velocity Ratio %0.3f",VR)
+printf("\n Efficiency %0.3f",Efficiency)
+printf("\n Ideal Load %0.3f",Wi)
+printf("\n Ideal Effort %0.3f",Pi)
+printf("\n Effort lost in friction %0.3f",efl)
+printf("\n frictional resistance %0.3f",Fr)
diff --git a/3862/CH6/EX6.10/Ex6_10.sce b/3862/CH6/EX6.10/Ex6_10.sce
new file mode 100644
index 000000000..204e86659
--- /dev/null
+++ b/3862/CH6/EX6.10/Ex6_10.sce
@@ -0,0 +1,10 @@
+clear
+//
+W = 2500.0 //Load
+N1=2.0 //number of movable pulleys in system 1 in figure B
+N2=2.0 //number of movable puleys in system 2 in figure C
+VR=2**N1-1+2**N2-1 //Velocity Ratio
+Efficiency=0.70
+MA=Efficiency*VR //Mechanical advantage
+P = W/MA //Effort
+printf("\n Effort is %0.3f N",P)
diff --git a/3862/CH6/EX6.11/Ex6_11.sce b/3862/CH6/EX6.11/Ex6_11.sce
new file mode 100644
index 000000000..ea7601285
--- /dev/null
+++ b/3862/CH6/EX6.11/Ex6_11.sce
@@ -0,0 +1,13 @@
+clear
+D=500.0 //diameter of the wheel
+d=200.0 //diameter of axle
+tcw=6.0 //thickness of the cord on the wheel
+tca=20.0 //thickness of the cord on the axle
+W=1200 //effort
+ED=D+tcw //Effective diameter of the wheel
+Ed=d+tca //Effectivediameter of axle
+VR=ED/Ed //Velocity Ratio
+Efficiency=0.7
+MA=Efficiency*VR //Mechanical advantage
+P = W/MA //Effort
+printf("\n Effort is %0.3f N",P)
diff --git a/3862/CH6/EX6.12/Ex6_12.sce b/3862/CH6/EX6.12/Ex6_12.sce
new file mode 100644
index 000000000..38e254ee3
--- /dev/null
+++ b/3862/CH6/EX6.12/Ex6_12.sce
@@ -0,0 +1,12 @@
+clear
+D=800.0 //diameter of the wheel
+d1=250.0 //diameter of axle 1
+d2=300.0 //diameter of axle 2
+
+W=20000.0 //effort
+
+VR=(2*D)/(d2-d1) //Velocity Ratio
+Efficiency=0.55
+MA=Efficiency*VR //Mechanical advantage
+P = W/MA //Effort
+printf("\n Effort is %0.3f N",P)
diff --git a/3862/CH6/EX6.13/Ex6_13.sce b/3862/CH6/EX6.13/Ex6_13.sce
new file mode 100644
index 000000000..0cee86d44
--- /dev/null
+++ b/3862/CH6/EX6.13/Ex6_13.sce
@@ -0,0 +1,11 @@
+clear
+D=500.0 //diameter of the wheel
+d=200.0 //diameter of axle
+
+W=5000.0 //effort
+
+VR=(2*D)/(D-d) //Velocity Ratio
+Efficiency=0.6
+MA=Efficiency*VR //Mechanical advantage
+P = W/MA //Effort
+printf("\n Effort is %0.3f N",P)
diff --git a/3862/CH6/EX6.14/Ex6_14.sce b/3862/CH6/EX6.14/Ex6_14.sce
new file mode 100644
index 000000000..6d9d7fdae
--- /dev/null
+++ b/3862/CH6/EX6.14/Ex6_14.sce
@@ -0,0 +1,9 @@
+clear
+D=40.0 //Screw diameter
+l=20.0 //Screw lwngth
+p=l/3.0 //Lead of the screw
+W=40000.0 //effort
+R = 400 //Lever length
+u = 0.12 //coefficient of friction between screw and nut
+P = (D/(2*R))*W*((u+(p/(3.14*D)))/(1-u*(p/(3.14*D)))) //Effort
+printf("\n Effort is %0.3f N",P)
diff --git a/3862/CH6/EX6.16/Ex6_16.sce b/3862/CH6/EX6.16/Ex6_16.sce
new file mode 100644
index 000000000..7badb22ec
--- /dev/null
+++ b/3862/CH6/EX6.16/Ex6_16.sce
@@ -0,0 +1,12 @@
+clear
+//
+p1=5.0 //Pitch of smaller screw
+p2=10.0 //Pitch of larger screw
+R=500.0 //Lever arm length from centre of screw
+W=15000.0 //Load
+P=185.0 //Effort
+VR=2*3.14*R/(p2-p1) //Velocity Ratio
+MA=W/P //Mechanical advantage
+Efficiency=MA/VR*100.0
+
+printf("\n Efficiency %0.3f percentage",Efficiency)
diff --git a/3862/CH6/EX6.17/Ex6_17.sce b/3862/CH6/EX6.17/Ex6_17.sce
new file mode 100644
index 000000000..b82fd0e3d
--- /dev/null
+++ b/3862/CH6/EX6.17/Ex6_17.sce
@@ -0,0 +1,24 @@
+clear
+d=200.0 //Diameter of the load drum
+R = 1200.0 // Length of lever arm
+T1 = 10.0 //Number of teeth on pinion,
+T2 = 100.0 //Number of teeth on spur wheel
+VR=R*T2/(d*T1)*2.0 //Velocity Ratio
+printf("\n Velocity Ratio is %0.3f",VR)
+W1 = 3000.0 //Load 1
+P1= 100.0 //Effort1
+
+W2 = 9000.0 //Load 2
+P2= 160.0 //Effort2
+
+//law of machine is given by P=mW+C
+m=(P2-P1)/(W2-W1)
+C=P2-m*W2
+printf("\n Law of machine is P= %0.3f W + %0.3f ",m,C)
+MA=W1/P1 //Mechanical advantage
+Efficiency=MA/VR*100.0
+printf("\n Efficiency for first case %0.3f percentage",Efficiency)
+MA=W2/P2 //Mechanical advantage
+Efficiency=MA/VR*100.0
+
+printf("\n Efficiency for second case %0.3f percentage",Efficiency)
diff --git a/3862/CH6/EX6.18/Ex6_18.sce b/3862/CH6/EX6.18/Ex6_18.sce
new file mode 100644
index 000000000..21c3fe117
--- /dev/null
+++ b/3862/CH6/EX6.18/Ex6_18.sce
@@ -0,0 +1,14 @@
+clear
+d=150.0 //Diameter of the load drum
+R = 400.0 // Length of lever arm
+T1 = 15.0 //Number of teeth on pinion,
+T3 = 20.0 //Number of teeth on pinion,
+T2 = 45.0 //Number of teeth on spur wheel
+T4 = 40.0 //Number of teeth on spur wheel
+P= 250.0 //Effort
+Efficiency=0.4
+VR=R*T2/(d*T1)*2.0*T4/T3 //Velocity Ratio
+
+W=VR*Efficiency*P //Load
+
+printf("\n LOad %0.3f N",W)
diff --git a/3862/CH6/EX6.2/Ex6_2.sce b/3862/CH6/EX6.2/Ex6_2.sce
new file mode 100644
index 000000000..809d5f09d
--- /dev/null
+++ b/3862/CH6/EX6.2/Ex6_2.sce
@@ -0,0 +1,25 @@
+clear
+//
+W1 = 2400.0 //Load 1
+P1= 150.0 //Effort1
+
+W2 = 3000.0 //Load 2
+P2= 180.0 //Effort2
+P3= 200.0 //Effort3
+//law of machine is given by P=mW+C
+m=(P2-P1)/(W2-W1)
+C=P2-m*W2
+printf("\n Law of machine is P= %0.3f W + %0.3f ",m,C)
+W3=(P3-C)/m //Load 2
+printf("\n Load is %0.3f N",W3)
+MA=W3/P3 //Mechanical advantage
+VR=30.0 //Velocity Ratio
+Efficiency=MA/VR*100
+Pi =W3/VR //Ideal effort
+printf("\n Ideal effort is %0.3f N",Pi)
+
+efl=P3-Pi //Effort lost in friction
+
+printf("\n Effort lost in friction %0.3f",efl)
+printf("\n Efficiency %0.3f",Efficiency)
+printf("\n Mechanical advantage-- %0.3f",MA)
diff --git a/3862/CH6/EX6.3/Ex6_3.sce b/3862/CH6/EX6.3/Ex6_3.sce
new file mode 100644
index 000000000..e6f89678f
--- /dev/null
+++ b/3862/CH6/EX6.3/Ex6_3.sce
@@ -0,0 +1,25 @@
+clear
+//
+W1 = 7700.0 //Load 1
+P1= 150.0 //Effort1
+MA=W1/P1 //Mechanical advantage
+printf("\n Mechanical advantage-- %0.3f",MA)
+
+Efficiency=0.6
+VR=MA/Efficiency //Velocity Ratio
+W2 = 13200.0 //Load 2
+P2= 250.0 //Effort2
+MA=W2/P2
+Efficiency=MA/VR*100
+//law of machine is given by P=mW+C
+m=(P2-P1)/(W2-W1)
+
+
+MMA=1/m //Maximum Mechanical advantage
+
+MaxEfficiency=MMA/VR*100
+
+printf("\n Velocity Ratio %0.3f",VR)
+printf("\n Efficiency %0.3f",Efficiency)
+printf("\n Maximum Mechanical advantage-- %0.3f",MMA)
+printf("\n Maximum Efficiency %0.3f",MaxEfficiency)
diff --git a/3862/CH6/EX6.7/Ex6_7.sce b/3862/CH6/EX6.7/Ex6_7.sce
new file mode 100644
index 000000000..09efd610f
--- /dev/null
+++ b/3862/CH6/EX6.7/Ex6_7.sce
@@ -0,0 +1,10 @@
+clear
+//
+W = 12000.0 //Load
+N=3.0 //number of movable pulleys
+VR=2*N //Velocity Ratio
+L=0.05 //Efficiency loss in each pulley
+Efficiency=0.85
+MA=Efficiency*VR //Mechanical advantage
+P = W/MA //Effort
+printf("\n Effort is %0.3f N",P)
diff --git a/3862/CH6/EX6.8/Ex6_8.sce b/3862/CH6/EX6.8/Ex6_8.sce
new file mode 100644
index 000000000..b60127654
--- /dev/null
+++ b/3862/CH6/EX6.8/Ex6_8.sce
@@ -0,0 +1,11 @@
+clear
+//
+W = 12000.0 //Load
+N1=2.0 //number of movable pulleys in system 1
+N2=2.0 //number of movable puleys in system 2
+VR=2*N1+2*N2 //Velocity Ratio
+L=0.05 //Efficiency loss in each pulley
+Efficiency=0.78
+MA=Efficiency*VR //Mechanical advantage
+P = W/MA //Effort
+printf("\n Effort is %0.3f N",P)
diff --git a/3862/CH6/EX6.9/Ex6_9.sce b/3862/CH6/EX6.9/Ex6_9.sce
new file mode 100644
index 000000000..e1722bfd2
--- /dev/null
+++ b/3862/CH6/EX6.9/Ex6_9.sce
@@ -0,0 +1,13 @@
+clear
+//
+W = 1000.0 //Load
+N=3.0 //number of pulleys
+VR=2**N-1 //Velocity Ratio
+P = 180.0 //Effort
+MA=W/P //Mechanical advantage
+Efficiency=MA/VR*100
+Pi =W/VR //Ideal effort
+
+efl=P-Pi //Effort lost in friction
+printf("\n Efficiency %0.3f",Efficiency)
+printf("\n Effort lost in friction %0.3f",efl)
generated by cgit (git 2.34.1) at 2024-12-19 13:01:17 +0000