Added new codeHEADmaster

14 files changed, 114 insertions, 0 deletions

diff --git a/3886/CH19/EX19.1/19_1.sce b/3886/CH19/EX19.1/19_1.sce
new file mode 100644
index 000000000..19f20d038
--- /dev/null
+++ b/3886/CH19/EX19.1/19_1.sce
@@ -0,0 +1,13 @@
+//Automobile moving on road

+//refer fig. 19.7

+v=13.889  //m/sec

+//case (1)-When vehicle is at A

+CFF1=(25*13.889^2)/(9.81*80)  //kN

+//Vertical reaction

+R1=25-6.145  //kN

+//case (2)-When automobile is at B

+CFF2=(25*13.889^2)/(9.81*120)  //kN

+R2=25+4.097  //kN

+//case (3)-On level track at C

+R3=25  //kN

+printf("\nWhen vehicle is at A, vertical reaction=%.3f kN\nWhen automobile is at B, vertical reaction=%.3f kN\nOn level track at C, vertical reaction=%.3f kN ",R1,R2,R3)

diff --git a/3886/CH19/EX19.1/19_1.txt b/3886/CH19/EX19.1/19_1.txt
new file mode 100644
index 000000000..641ebb6d3
--- /dev/null
+++ b/3886/CH19/EX19.1/19_1.txt
@@ -0,0 +1,6 @@
+ 

+--> exec('E:\My program EM\19. Circular motion of rigid bodies\19.1.sce', -1)

+

+When vehicle is at A, vertical reaction=18.855 kN

+When automobile is at B, vertical reaction=29.097 kN

+On level track at C, vertical reaction=25.000 kN 
\ No newline at end of file
diff --git a/3886/CH19/EX19.2/19_2.sce b/3886/CH19/EX19.2/19_2.sce
new file mode 100644
index 000000000..96fb9fc91
--- /dev/null
+++ b/3886/CH19/EX19.2/19_2.sce
@@ -0,0 +1,14 @@
+//Car on road

+//refer fig. 19.8

+//Consider dynamic equilibrium of car

+v=sqrt(0.4*9.81*50)*((60*60)/(1000))  //kmph

+//Limiting speed from the consideration of preventing overturning

+//Taking moment about point of contact of outer wheel with road and noting that R1=0 when the vehicle is about to overturn

+//Limiting speed v=50.42 kmph

+//If the vehicle moves with a velocity of 40 kmph

+v=11.111  //m/sec

+//Taking moment about outer wheel

+R1=5.612  //kN

+R2=15-R1  //kN 

+printf("\nLimiting speed v=50.42\nR1=%.3f kN\nR2=%.3f kN",R1,R2)

+ 

diff --git a/3886/CH19/EX19.2/19_2.txt b/3886/CH19/EX19.2/19_2.txt
new file mode 100644
index 000000000..76ae615fe
--- /dev/null
+++ b/3886/CH19/EX19.2/19_2.txt
@@ -0,0 +1,6 @@
+ 

+--> exec('E:\My program EM\19. Circular motion of rigid bodies\19.2.sce', -1)

+

+Limiting speed v=50.42

+R1=5.612 kN

+R2=9.388 kN
\ No newline at end of file
diff --git a/3886/CH19/EX19.3/19_3.sce b/3886/CH19/EX19.3/19_3.sce
new file mode 100644
index 000000000..cfab3e396
--- /dev/null
+++ b/3886/CH19/EX19.3/19_3.sce
@@ -0,0 +1,5 @@
+//Angle of banking

+v=33.33  //m/sec

+//If alpha is the angle of banking then

+alpha=atand((v^2)/(9.81*200))  //degree

+printf("\nalpha=%.3f degree",alpha)

diff --git a/3886/CH19/EX19.3/19_3.txt b/3886/CH19/EX19.3/19_3.txt
new file mode 100644
index 000000000..efff762de
--- /dev/null
+++ b/3886/CH19/EX19.3/19_3.txt
@@ -0,0 +1,4 @@
+ 

+--> exec('E:\My program EM\19. Circular motion of rigid bodies\19.3.sce', -1)

+

+alpha=29.519 degree
\ No newline at end of file
diff --git a/3886/CH19/EX19.4/19_4.sce b/3886/CH19/EX19.4/19_4.sce
new file mode 100644
index 000000000..702b91b0f
--- /dev/null
+++ b/3886/CH19/EX19.4/19_4.sce
@@ -0,0 +1,10 @@
+//Vehicle moving round a curve

+r=40  //m

+mu=0.4  

+//(1) On level road, limiting speed from the consideration of avoiding skidding

+v=sqrt(0.4*9.81*40)  //m/sec

+//(2) On a road banked to an inclination of 1 in 10

+v1=sqrt((9.81*40*(0.4+0.1))/(1-0.4*0.1))  //m/sec

+//If lateral forces are not to be experienced

+v3=sqrt(0.1*9.81*40)  //m/sec

+printf("\nOn level road v=%.3f m/sec\nOn a road banked v=%.3f m/sec\nIf lateral forces are not to be experienced v=%.3f m/sec",v,v1,v3)

diff --git a/3886/CH19/EX19.4/19_4.txt b/3886/CH19/EX19.4/19_4.txt
new file mode 100644
index 000000000..67eb8e844
--- /dev/null
+++ b/3886/CH19/EX19.4/19_4.txt
@@ -0,0 +1,6 @@
+ 

+--> exec('E:\My program EM\19. Circular motion of rigid bodies\19.4.sce', -1)

+

+On level road v=12.528 m/sec

+On a road banked v=14.296 m/sec

+If lateral forces are not to be experienced v=6.264 m/sec
\ No newline at end of file
diff --git a/3886/CH19/EX19.5/19_5.sce b/3886/CH19/EX19.5/19_5.sce
new file mode 100644
index 000000000..bb9238806
--- /dev/null
+++ b/3886/CH19/EX19.5/19_5.sce
@@ -0,0 +1,9 @@
+//Car going around a curve

+//refer fig. 19.9

+v=26.667  //m/sec

+F=20*(((26.667^2)/(9.81*60))-sind(30))  //kN

+//Taking moment about point of contact of outer wheel with road surface, we get

+R1=20*(((0.8*sind(30))/(1.6))+((cosd(30))/(2))+((26.667^2)/(9.81*60))*(((sind(30))/(2))-((0.8*cosd(30))/(1.6))))  //kN

+//Taking summation of forces normal to road surface

+R2=(20*((cosd(30))+(((sind(30))*26.667^2)/(9.81*60))))-9.238  //kN

+printf("\nR1=%.3f kN\nR2=%.3f kN",R1,R2)

diff --git a/3886/CH19/EX19.5/19_5.txt b/3886/CH19/EX19.5/19_5.txt
new file mode 100644
index 000000000..ef06351de
--- /dev/null
+++ b/3886/CH19/EX19.5/19_5.txt
@@ -0,0 +1,5 @@
+ 

+--> exec('E:\My program EM\19. Circular motion of rigid bodies\19.5.sce', -1)

+

+R1=9.238 kN

+R2=20.164 kN
\ No newline at end of file
diff --git a/3886/CH19/EX19.6/19_6.sce b/3886/CH19/EX19.6/19_6.sce
new file mode 100644
index 000000000..69353bff5
--- /dev/null
+++ b/3886/CH19/EX19.6/19_6.sce
@@ -0,0 +1,15 @@
+//Super elevation

+G=1.68  //m

+r=800  //m

+//(1)

+v=16.667  //m/sec

+alpha=atand((v^2)/(9.81*800))  //degree

+//Super elevation

+e=1000*G*tand(alpha)  //mm

+//(2) 

+v2=22.222  //m/sec

+F2=1000*(((0.99937*22.222^2)/(9.81*800))-0.03537)  //kN

+printf("\ne=%.3f mm\nF=%.3f kN",e,F2)

+

+

+

diff --git a/3886/CH19/EX19.6/19_6.txt b/3886/CH19/EX19.6/19_6.txt
new file mode 100644
index 000000000..93ea7c503
--- /dev/null
+++ b/3886/CH19/EX19.6/19_6.txt
@@ -0,0 +1,5 @@
+ 

+--> exec('E:\My program EM\19. Circular motion of rigid bodies\19.6.sce', -1)

+

+e=59.466 mm

+F=27.513 kN
\ No newline at end of file
diff --git a/3886/CH19/EX19.7/19_7.sce b/3886/CH19/EX19.7/19_7.sce
new file mode 100644
index 000000000..aaed16aeb
--- /dev/null
+++ b/3886/CH19/EX19.7/19_7.sce
@@ -0,0 +1,11 @@
+//Aeroplane

+//refer fig. 19.10

+r=1300  //m

+W=8  //kN

+v=(400*1000)/(60*60)  //m/sec

+//Angle of bank 

+alpha=atand((111.111^2)/(9.81*1300))  //degree

+//Lift under flight condition is

+N=80*((cosd(alpha))+(((sind(alpha))*111.111^2)/(9.81*1300)))  //kN

+printf("\nalpha=%.2f degree\nN=%.2f kN",alpha,N)

+

diff --git a/3886/CH19/EX19.7/19_7.txt b/3886/CH19/EX19.7/19_7.txt
new file mode 100644
index 000000000..48f1f3158
--- /dev/null
+++ b/3886/CH19/EX19.7/19_7.txt
@@ -0,0 +1,5 @@
+ 

+--> exec('E:\My program EM\19. Circular motion of rigid bodies\19.7.sce', -1)

+

+alpha=44.07 degree

+N=111.34 kN
\ No newline at end of file