summaryrefslogtreecommitdiff
path: root/3456/CH17
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /3456/CH17
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '3456/CH17')
-rw-r--r--3456/CH17/EX17.1/Ex17_1.sce13
-rw-r--r--3456/CH17/EX17.2/Ex17_2.sce20
-rw-r--r--3456/CH17/EX17.3/Ex17_3.sce24
-rw-r--r--3456/CH17/EX17.4/Ex17_4.sce21
4 files changed, 78 insertions, 0 deletions
diff --git a/3456/CH17/EX17.1/Ex17_1.sce b/3456/CH17/EX17.1/Ex17_1.sce
new file mode 100644
index 000000000..2a316728e
--- /dev/null
+++ b/3456/CH17/EX17.1/Ex17_1.sce
@@ -0,0 +1,13 @@
+//Example 17.1
+//Forces in rolling
+//Page No. 596
+clc;clear;close;
+
+mu=0.08; //no unit
+R=12; //in inches
+alpha=atand(mu);
+dh=mu^2*R;
+printf('\nMaximum possible reduction when mu is 0.08 = %g in\n',dh);
+mu=0.5; //no unit
+dh=mu^2*R;
+printf('Maximum possible reduction when mu is 0.5 = %g in',dh);
diff --git a/3456/CH17/EX17.2/Ex17_2.sce b/3456/CH17/EX17.2/Ex17_2.sce
new file mode 100644
index 000000000..b82483733
--- /dev/null
+++ b/3456/CH17/EX17.2/Ex17_2.sce
@@ -0,0 +1,20 @@
+//Example 17.2
+//Rolling Load
+//Page No. 598
+clc;clear;close;
+
+h0=1.5; //in inches
+mu=0.3; //no unit
+D=36; //in inches
+s_en=20; //in ksi
+s_ex=30; //in ksi
+h1=h0-0.3*h0;
+dh=h0-h1;
+h_=(h1+h0)/2;
+Lp=sqrt(D/2*dh);
+Q=mu*Lp/h_;
+sigma0=(s_en+s_ex)/2;
+P=sigma0*(exp(Q)-1)*s_ex*Lp/Q;
+printf('\nRolling Load = %g kips',P);
+P=sigma0*(Lp/(4*dh)+1)*s_ex*Lp;
+printf('\nRolling Load if sticking friction occurs = %g kips',P);
diff --git a/3456/CH17/EX17.3/Ex17_3.sce b/3456/CH17/EX17.3/Ex17_3.sce
new file mode 100644
index 000000000..9bfcf6ee6
--- /dev/null
+++ b/3456/CH17/EX17.3/Ex17_3.sce
@@ -0,0 +1,24 @@
+//Example 17.3
+//Rolling Load
+//Page No. 599
+clc;clear;close;
+
+h0=1.5; //in inches
+mu=0.3; //no unit
+D=36; //in inches
+s_en=20; //in ksi
+s_ex=30; //in ksi
+C=3.34*10^-4; //in inches^2/ton
+P_=1357; //in tons
+h1=h0-0.3*h0;
+dh=h0-h1;
+h_=(h1+h0)/2;
+R=D/2;
+R1=R*(1+C*P_/(s_ex*(dh)));
+Lp=sqrt(R1*dh);
+Q=mu*Lp/h_;
+sigma0=(s_en+s_ex)/2;
+P2=sigma0*(exp(Q)-1)*s_ex*Lp/Q;
+P2=P2*0.45359 ///conversion to tons
+R2=R*(1+C*P2/(s_ex*(dh)));
+printf('\nP2 = %g tons\nR2 = %g in',P2,R2);
diff --git a/3456/CH17/EX17.4/Ex17_4.sce b/3456/CH17/EX17.4/Ex17_4.sce
new file mode 100644
index 000000000..5771005a6
--- /dev/null
+++ b/3456/CH17/EX17.4/Ex17_4.sce
@@ -0,0 +1,21 @@
+//Example 17.4
+//Torque and Horsepower
+//Page No. 614
+clc;clear;close;
+
+w=12; //in inches
+hi=0.8; //in inches
+hf=0.6; //in inches
+D=40; //in inches
+N=100; //in rpm
+R=D/2;
+dh=abs(hf-hi);
+e1=log(hi/hf);
+r=(hi-hf)/hi;
+sigma=20*e1^0.2/1.2;
+Qp=1.5; //no unit
+P=2*sigma*w*(R*(hi-hf))^(1/2)*Qp/sqrt(3);
+a=0.5*sqrt(R*dh);
+a=a/12; //conversion to ft
+hp=4*%pi*a*P*N*1000/33000;
+printf('\nRolling Load = %g\nHorsepower = %g',P,hp);